From 2ee4f4b48b7c13ea121ab37a73fdf238db464b5f Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 12 Oct 2000 14:25:35 +0000
Subject: [PATCH] [project @ 2000-10-12 14:25:35 by simonmar] update FAST_INT
 names

---
 ghc/utils/genprimopcode/Main.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/utils/genprimopcode/Main.hs b/ghc/utils/genprimopcode/Main.hs
index fce372e..aaff9c1 100644
--- a/ghc/utils/genprimopcode/Main.hs
+++ b/ghc/utils/genprimopcode/Main.hs
@@ -114,7 +114,7 @@ gen_primop_tag (Info defaults pos)
    = unlines (zipWith f pos [1..])
      where
         f i n = "tagOf_PrimOp " ++ cons i 
-                ++ " = ILIT(" ++ show n ++ ") :: FAST_INT"
+                ++ " = _ILIT(" ++ show n ++ ") :: FastInt"
 
 gen_enum_decl (Info defaults pos)
    = let conss = map cons pos
-- 
1.7.10.4