RosettaCodeData/Task/Host-introspection/Haskell/host-introspection.hs
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

8 lines
236 B
Haskell

import Data.Bits
import ADNS.Endian -- http://hackage.haskell.org/package/hsdns
main = do
putStrLn $ "Word size: " ++ bitsize
putStrLn $ "Endianness: " ++ show endian
where
bitsize = show $ bitSize (undefined :: Int)