1 2 3 4 5 6 7 8 9
-- test for unboxed fields in datatypes :l print022.hs seq test () :print test :break f f test2 :step :fo x :t x