From ff2f01e71224eaa16b257556d7cb31716dbbe8a3 Mon Sep 17 00:00:00 2001
From: panne <unknown>
Date: Wed, 5 Apr 2000 13:56:30 +0000
Subject: [PATCH] [project @ 2000-04-05 13:56:30 by panne] Ooops, forgot that
 one in my previous commit (don't mention HsFalse/HsTrue
 anymore).

---
 ghc/compiler/deSugar/DsCCall.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/deSugar/DsCCall.lhs b/ghc/compiler/deSugar/DsCCall.lhs
index 030f98a..f5fa47f 100644
--- a/ghc/compiler/deSugar/DsCCall.lhs
+++ b/ghc/compiler/deSugar/DsCCall.lhs
@@ -179,7 +179,7 @@ unboxArg arg
 	      \ body -> Case arg case_bndr [(DataAlt box_data_con,[prim_arg],body)]
     )
 
-  -- Booleans; Hacking alert: the 0/1 literals should match the HsFalse/HsTrue constants
+  -- Booleans
   | arg_ty == boolTy
   = newSysLocalDs intPrimTy		`thenDs` \ prim_arg ->
     returnDs (Var prim_arg,
-- 
1.7.10.4