[project @ 2003-04-10 14:43:52 by simonpj]

comments

diff --git a/ghc/compiler/hsSyn/HsLit.lhs b/ghc/compiler/hsSyn/HsLit.lhs
index 03dd717..0d90098 100644 (file)
--- a/ghc/compiler/hsSyn/HsLit.lhs
+++ b/ghc/compiler/hsSyn/HsLit.lhs
@@ -33,7 +33,9 @@ data HsLit
                                        --      and from TRANSLATION
   | HsIntPrim      Integer             -- Unboxed Int
   | HsInteger      Integer             -- Genuinely an integer; arises only from TRANSLATION
+                                       --      (overloaded literals are done with HsOverLit)
   | HsRat          Rational Type       -- Genuinely a rational; arises only from TRANSLATION
+                                       --      (overloaded literals are done with HsOverLit)
   | HsFloatPrim            Rational            -- Unboxed Float
   | HsDoublePrim    Rational           -- Unboxed Double
   | HsLitLit       FastString PostTcType       -- to pass ``literal literals'' through to C