Hi,
I tried a simple use of the _ccall_ construct:
import Posix
import PosixUtil
main = vol 100
vol :: Int -> IO ()
vol v = do fd <- openFd "/dev/mixer" ReadOnly Nothing
(OpenFileFlags False False False False False)
let s = [toEnum v, toEnum v]
Tommy Thorn writes:
> Hi,
>
> I tried a simple use of the _ccall_ construct:
>
> import Posix
> import PosixUtil
>
> main = vol 100
>
> vol :: Int -> IO ()
> vol v = do fd <- openFd "/dev/mixer" ReadOnly Nothing
> (OpenFileFlags False False False False False)
Compilation fails when entering the lib subdirectory because:
make[1]: Entering directory `/home/src/hdirect-230698/lib'
Makefile:4: ../mk/boilerplate.mk: No such file or directory
And indeed, there is no mk directory anywhere in the distribution.
--Jeff