RosettaCodeData/Task/Host-introspection/Haskell/host-introspection.hs
2023-07-01 13:44:08 -04: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)