From 44c6f87fa44a7c5239a0ca805818ca4d3e00578e Mon Sep 17 00:00:00 2001 From: simonmar Date: Wed, 13 Feb 2002 15:57:19 +0000 Subject: [PATCH] [project @ 2002-02-13 15:57:19 by simonmar] print comes from System.IO these days --- ghc/compiler/prelude/PrelNames.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/prelude/PrelNames.lhs b/ghc/compiler/prelude/PrelNames.lhs index 74ce7df..daa0495 100644 --- a/ghc/compiler/prelude/PrelNames.lhs +++ b/ghc/compiler/prelude/PrelNames.lhs @@ -244,7 +244,6 @@ pREL_TUP_Name = mkModuleName "Data.Tuple" pREL_PACK_Name = mkModuleName "GHC.Pack" pREL_CONC_Name = mkModuleName "GHC.Conc" pREL_IO_BASE_Name = mkModuleName "GHC.IOBase" -pREL_IO_Name = mkModuleName "GHC.IO" pREL_ST_Name = mkModuleName "GHC.ST" pREL_ARR_Name = mkModuleName "GHC.Arr" pREL_BYTEARR_Name = mkModuleName "PrelByteArr" @@ -257,6 +256,7 @@ pREL_ERR_Name = mkModuleName "GHC.Err" pREL_REAL_Name = mkModuleName "GHC.Real" pREL_FLOAT_Name = mkModuleName "GHC.Float" pREL_TOP_HANDLER_Name = mkModuleName "GHC.TopHandler" +sYSTEM_IO_Name = mkModuleName "System.IO" mAIN_Name = mkModuleName "Main" pREL_INT_Name = mkModuleName "GHC.Int" @@ -532,7 +532,7 @@ returnIOName = varQual pREL_IO_BASE_Name SLIT("returnIO") returnIOIdKey failIOName = varQual pREL_IO_BASE_Name SLIT("failIO") failIOIdKey -- IO things -printName = varQual pREL_IO_Name SLIT("print") printIdKey +printName = varQual sYSTEM_IO_Name SLIT("print") printIdKey -- Int, Word, and Addr things int8TyConName = tcQual pREL_INT_Name SLIT("Int8") int8TyConKey -- 1.7.10.4