Bindings.Uname
Documentation
uname :: Ptr Utsname -> IO CIntSource
stores nul-terminated strings of information
identifying the current system info to the structure referenced
by name.
uname name
import Foreign.C
import Foreign.Marshal
sysName :: IO String
sysName = alloca $ \ ptr ->
do throwErrnoIfMinus1_ "uname" $ uname ptr
peekCString $ sysname ptr