2 % (c) The University of Glasgow, 2000
4 \section{Fast integers and booleans}
8 FastInt, _ILIT, iBox, iUnbox,
9 (+#), (-#), (*#), quotFastInt, negateFastInt,
10 (==#), (<#), (<=#), (>=#), (>#),
12 FastBool, fastBool, isFastTrue, fastOr
15 #if defined(__GLASGOW_HASKELL__)
19 ( Int(..), Int#, (+#), (-#), (*#),
20 quotInt#, negateInt#, (==#), (<#), (<=#), (>=#), (>#)
27 quotFastInt = quotInt#
28 negateFastInt = negateInt#
33 isFastTrue x = x ==# 1#
41 #else {- ! __GLASGOW_HASKELL__ -}
51 negateFastInt = negate
62 #endif {- ! __GLASGOW_HASKELL__ -}