+{-# LANGUAGE BangPatterns #-}
{-# OPTIONS_GHC -O #-}
-- We always optimise this, otherwise performance of a non-optimised
-- compiler is severely affected
import Foreign
import Data.Char
import Numeric
-import Data.Bits
import GHC.Ptr ( Ptr(..) )
import GHC.Base