From af32621e837d1a751abd2cb23e7163e362e003c9 Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 7 May 2001 11:42:31 +0000 Subject: [PATCH] [project @ 2001-05-07 11:42:31 by simonmar] typo in Word64 code pointed out by Alastair Reid. --- ghc/lib/std/PrelWord.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/lib/std/PrelWord.lhs b/ghc/lib/std/PrelWord.lhs index 7848de2..d2e44de 100644 --- a/ghc/lib/std/PrelWord.lhs +++ b/ghc/lib/std/PrelWord.lhs @@ -629,7 +629,7 @@ foreign import "stg_shiftRL64" unsafe shiftRL64# :: Word64# -> Int# -> W #else -data Word32 = W64# Word# deriving (Eq, Ord) +data Word64 = W64# Word# deriving (Eq, Ord) instance Num Word64 where (W64# x#) + (W64# y#) = W64# (x# `plusWord#` y#) -- 1.7.10.4