diff options
author | simonmar <unknown> | 2000-11-13 14:40:38 +0000 |
---|---|---|
committer | simonmar <unknown> | 2000-11-13 14:40:38 +0000 |
commit | 34a98f40dea6d31ced5213b7810dc39b4989c395 (patch) | |
tree | e58ab54caf86851321927fd909a0f71426703ee2 /ghc/includes/SchedAPI.h | |
parent | dc7a3d8cec60b14b2fc6f79e69a78691e1477b40 (diff) | |
download | haskell-34a98f40dea6d31ced5213b7810dc39b4989c395.tar.gz |
[project @ 2000-11-13 14:40:36 by simonmar]
Change the names of several RTS symbols so they don't potentially
clash with user code. All the symbols that may clash now have an
"stg_" prefix.
Diffstat (limited to 'ghc/includes/SchedAPI.h')
-rw-r--r-- | ghc/includes/SchedAPI.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/includes/SchedAPI.h b/ghc/includes/SchedAPI.h index 05d3ca8599..6757a5ed0f 100644 --- a/ghc/includes/SchedAPI.h +++ b/ghc/includes/SchedAPI.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: SchedAPI.h,v 1.10 2000/04/14 15:18:05 sewardj Exp $ + * $Id: SchedAPI.h,v 1.11 2000/11/13 14:40:36 simonmar Exp $ * * (c) The GHC Team 1998 * @@ -82,7 +82,7 @@ createStrictIOThread(nat stack_size, StgClosure *closure) { t = createThread(stack_size); #endif pushClosure(t,closure); - pushClosure(t,(StgClosure*)&forceIO_closure); + pushClosure(t,(StgClosure*)&stg_forceIO_closure); return t; } |