Handle LongArg's in the FFI on x86

e940d0ad · Ian Lynagh · 6dcff14b · e940d0ad · e940d0ad
Commit e940d0ad authored Dec 22, 2006 by Ian Lynagh
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

compiler/ghci/ByteCodeFFI.lhs compiler/ghci/ByteCodeFFI.lhs +1 -1

compiler/ghci/ByteCodeGen.lhs compiler/ghci/ByteCodeGen.lhs +1 -0

No files found.
--- a/compiler/ghci/ByteCodeFFI.lhs
+++ b/compiler/ghci/ByteCodeFFI.lhs
@@ -263,7 +263,7 @@ mkMarshalCode_wrk cconv (r_offW, r_rep) addr_offW arg_offs_n_reps
           NonPtrArg -> i32
           DoubleArg -> f64  
           FloatArg  -> f32
-           -- LongArg -> i64
+           LongArg   -> i64
           VoidArg   -> []
           other     -> moan64 "ByteCodeFFI.mkMarshalCode_wrk(x86)" 
                               (ppr r_rep)

--- a/compiler/ghci/ByteCodeGen.lhs
+++ b/compiler/ghci/ByteCodeGen.lhs
@@ -954,6 +954,7 @@ mkDummyLiteral pr
        NonPtrArg -> MachWord 0
        DoubleArg -> MachDouble 0
        FloatArg  -> MachFloat 0
+        LongArg   -> MachWord64 0
        _         -> moan64 "mkDummyLiteral" (ppr pr)