Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/44f61d398a55c3dca74bc173cd6fb66e1762d982 >--------------------------------------------------------------- commit 44f61d398a55c3dca74bc173cd6fb66e1762d982 Author: Simon Marlow <[email protected]> Date: Tue Jul 19 08:54:18 2011 +0100 Support 64-bit literals in the byte code generator (fixes recent test failures in print002 etc. on 32-bit platforms) >--------------------------------------------------------------- compiler/ghci/ByteCodeGen.lhs | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/compiler/ghci/ByteCodeGen.lhs b/compiler/ghci/ByteCodeGen.lhs index 30bcef2..e5898a2 100644 --- a/compiler/ghci/ByteCodeGen.lhs +++ b/compiler/ghci/ByteCodeGen.lhs @@ -1232,7 +1232,9 @@ pushAtom _ _ (AnnLit lit) = case lit of MachLabel _ _ _ -> code NonPtrArg MachWord _ -> code NonPtrArg - MachInt _ -> code PtrArg + MachInt _ -> code NonPtrArg + MachWord64 _ -> code LongArg + MachInt64 _ -> code LongArg MachFloat _ -> code FloatArg MachDouble _ -> code DoubleArg MachChar _ -> code NonPtrArg _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
