From e9d95aa0fdcf7b630f4277d486cbe373737971db Mon Sep 17 00:00:00 2001 From: Adam Sampson Date: Sun, 6 Apr 2008 00:48:02 +0000 Subject: [PATCH] Tidy up OccValue a bit. --- common/EvalLiterals.hs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/common/EvalLiterals.hs b/common/EvalLiterals.hs index 6ba3c29..eccd481 100644 --- a/common/EvalLiterals.hs +++ b/common/EvalLiterals.hs @@ -39,18 +39,16 @@ type EvalM = ErrorT ErrorReport (StateT CompState Identity) instance Die EvalM where dieReport = throwError --- | Occam values of various types. +-- | Evaluated values of various types. data OccValue = OccBool Bool | OccByte Word8 - -- The following four aren't occam types, but I need to put them in here for handling Rain code: | OccUInt16 Word16 | OccUInt32 Word32 | OccUInt64 Word64 | OccInt8 Int8 - - | OccInt Int32 | OccInt16 Int16 + | OccInt Int32 | OccInt32 Int32 | OccInt64 Int64 -- FIXME This should include the type of the elements, so we can handle