_ccall_

1998-08-10 Thread Tommy Thorn
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 = [to

Re: _ccall_

1998-08-10 Thread Sigbjorn Finne
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 >