diff options
| author | simonmar <unknown> | 2001-12-21 15:07:26 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2001-12-21 15:07:26 +0000 |
| commit | ceb68b9118fa883e88abfaa532fc78f6640cf17f (patch) | |
| tree | b90b04a394fee4abd0cb09205120bee964684d7b /libraries/base/cbits/writeError.c | |
| parent | b83cfb91b4d36d148ebe171d31e2676c8f10f371 (diff) | |
| download | haskell-ceb68b9118fa883e88abfaa532fc78f6640cf17f.tar.gz | |
[project @ 2001-12-21 15:07:20 by simonmar]
Merge up to the ghc/lib/std on the HEAD (tagged as
new-libraries-last-merged).
Diffstat (limited to 'libraries/base/cbits/writeError.c')
| -rw-r--r-- | libraries/base/cbits/writeError.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/libraries/base/cbits/writeError.c b/libraries/base/cbits/writeError.c index e4f0247388..2ab4ce929f 100644 --- a/libraries/base/cbits/writeError.c +++ b/libraries/base/cbits/writeError.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1998 * - * $Id: writeError.c,v 1.2 2001/07/31 11:51:09 simonmar Exp $ + * $Id: writeError.c,v 1.3 2001/12/21 15:07:26 simonmar Exp $ * * hPutStr Runtime Support */ @@ -20,8 +20,10 @@ implementation in one or two places.) #include "RtsUtils.h" #include "HsCore.h" +#include "PrelIOUtils.h" + void -writeErrString__ (HsAddr msg_hdr, HsAddr msg, HsInt len) +writeErrString__(HsAddr msg_hdr, HsAddr msg, HsInt len) { int count = 0; char* p = (char*)msg; |