diff options
Diffstat (limited to 'ghc/rts/Assembler.c')
| -rw-r--r-- | ghc/rts/Assembler.c | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/ghc/rts/Assembler.c b/ghc/rts/Assembler.c index 76878e9ef0..fa0984adc7 100644 --- a/ghc/rts/Assembler.c +++ b/ghc/rts/Assembler.c @@ -5,8 +5,8 @@ * Copyright (c) 1994-1998. * * $RCSfile: Assembler.c,v $ - * $Revision: 1.28 $ - * $Date: 2000/05/09 10:00:35 $ + * $Revision: 1.29 $ + * $Date: 2000/05/10 09:00:20 $ * * This module provides functions to construct BCOs and other closures * required by the bytecode compiler. @@ -368,14 +368,6 @@ void asmCopyAndLink ( void ) } -#if 0 -void asmMarkObject ( AsmObject obj ) -{ - ASSERT(obj->num_unresolved == 0 && obj->closure); - obj->closure = MarkRoot(obj->closure); -} -#endif - /* -------------------------------------------------------------------------- * Keeping track of the simulated stack pointer * ------------------------------------------------------------------------*/ |