From 6c7dde382811b8512d73ddb902e915c47c57d9a8 Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 18 Mar 2002 09:45:54 +0000 Subject: [PATCH] [project @ 2002-03-18 09:45:54 by simonmar] PrelGHC ==> GHC.Prim (in comments only) --- ghc/compiler/ghci/ByteCodeGen.lhs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/ghc/compiler/ghci/ByteCodeGen.lhs b/ghc/compiler/ghci/ByteCodeGen.lhs index 1863229..8c5ae8c 100644 --- a/ghc/compiler/ghci/ByteCodeGen.lhs +++ b/ghc/compiler/ghci/ByteCodeGen.lhs @@ -591,7 +591,7 @@ schemeE d s p other -- and enter. Four cases: -- -- 0. (Nasty hack). --- An application "PrelGHC.tagToEnum# unboxed-int". +-- An application "GHC.Prim.tagToEnum# unboxed-int". -- The int will be on the stack. Generate a code sequence -- to convert it to the relevant constructor, SLIDE and ENTER. -- @@ -961,16 +961,16 @@ mkDummyLiteral pr -- Convert (eg) --- PrelGHC.Char# -> PrelGHC.State# PrelGHC.RealWorld --- -> (# PrelGHC.State# PrelGHC.RealWorld, PrelGHC.Int# #) +-- GHC.Prim.Char# -> GHC.Prim.State# GHC.Prim.RealWorld +-- -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #) -- -- to Just IntRep -- and check that an unboxed pair is returned wherein the first arg is VoidRep'd. -- -- Alternatively, for call-targets returning nothing, convert -- --- PrelGHC.Char# -> PrelGHC.State# PrelGHC.RealWorld --- -> (# PrelGHC.State# PrelGHC.RealWorld #) +-- GHC.Prim.Char# -> GHC.Prim.State# GHC.Prim.RealWorld +-- -> (# GHC.Prim.State# GHC.Prim.RealWorld #) -- -- to Nothing -- 1.7.10.4