jhc -v -ffast --optc=-march=opteron -o recursive recursive.hs
jhc 0.1 20070302 (nioteadd+0)
Compiling [Right "recursive.hs"]
Loading libraries: ["base","haskell98"]
Loading library: "base-1.0" @ "/home/dons/lib/jhc/base-1.0.hl"
Found object file: ~/lib/jhc/base-1.0.hl
Loading library: "haskell98-1.0" @ "/home/dons/lib/jhc/haskell98-1.0.hl"
Found object file: ~/lib/jhc/haskell98-1.0.hl
recursive.hs:1   - Warning: The pragma 'OPTIONS_GHC' is unknown
Found dependency: recursive.hs at recursive.hs
Determining Exports/Imports: [Main]
Typing: ["Main"]
Kind inference
Type inference
....!
-- FloatInward-PreInit
-- typeAnalyze-PreInit
Initial optimization pass
infertype: 
>>> internal error:
Strong': ? x160
Cannot strong: 
(?, [x160])