Skip to content
Snippets Groups Projects
Commit af4450c8 authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1999-01-19 09:49:55 by simonm]

Remove debugging code from freeStablePtr.
parent af5d6df3
No related branches found
No related tags found
No related merge requests found
/* ----------------------------------------------------------------------------- /* -----------------------------------------------------------------------------
* $Id: PrimOps.h,v 1.6 1999/01/18 14:36:13 sof Exp $ * $Id: PrimOps.h,v 1.7 1999/01/19 09:49:55 simonm Exp $
* *
* Macros for primitive operations in STG-ish C code. * Macros for primitive operations in STG-ish C code.
* *
...@@ -643,7 +643,6 @@ extern StgPtr *stable_ptr_free; ...@@ -643,7 +643,6 @@ extern StgPtr *stable_ptr_free;
#define freeStablePointer(stable_ptr) \ #define freeStablePointer(stable_ptr) \
{ \ { \
stable_ptr_table[stable_ptr] = (P_)stable_ptr_free; \ stable_ptr_table[stable_ptr] = (P_)stable_ptr_free; \
IF_DEBUG(weak,fprintf(stderr, "Freed stable pointer %d\n", stable_ptr)); \
stable_ptr_free = &stable_ptr_table[stable_ptr]; \ stable_ptr_free = &stable_ptr_table[stable_ptr]; \
} }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment