X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=cbits%2FwriteError.c;h=d3a3b4bfebc32f280bd1f1a7252b88c3631d1359;hb=c81f31abd5c00d14a95a94a7b66d9853fc6c03ac;hp=2ab4ce929f9d726a3d82957e67c8efc35f6dfe99;hpb=260e7f2ed9a43c6ecf5a556d77817f39ed2893ab;p=ghc-base.git diff --git a/cbits/writeError.c b/cbits/writeError.c index 2ab4ce9..d3a3b4b 100644 --- a/cbits/writeError.c +++ b/cbits/writeError.c @@ -1,7 +1,7 @@ /* - * (c) The GRASP/AQUA Project, Glasgow University, 1998 + * (c) The University of Glasgow 2002 * - * $Id: writeError.c,v 1.3 2001/12/21 15:07:26 simonmar Exp $ + * $Id: writeError.c,v 1.5 2002/02/07 11:13:30 simonmar Exp $ * * hPutStr Runtime Support */ @@ -18,9 +18,7 @@ implementation in one or two places.) #include "Rts.h" #include "RtsUtils.h" -#include "HsCore.h" - -#include "PrelIOUtils.h" +#include "HsBase.h" void writeErrString__(HsAddr msg_hdr, HsAddr msg, HsInt len)