+
+Convenient boxed Integer PrimOps. These are 'thin-air' Ids, so
+it's nice to have them in PrelBase.
+
+\begin{code}
+{-# INLINE int2Integer #-}
+{-# INLINE addr2Integer #-}
+int2Integer i = case int2Integer# i of (# a, s, d #) -> J# a s d
+addr2Integer s = case addr2Integer# s of (# a, s, d #) -> J# a s d
+
+integer_0, integer_1, integer_2, integer_m1 :: Integer
+integer_0 = int2Integer 0#
+integer_1 = int2Integer 1#
+integer_2 = int2Integer 2#
+integer_m1 = int2Integer (negateInt# 1#)
+\end{code}