diff options
| author | Jim Blandy <jimb@red-bean.com> | 1998-12-05 18:52:15 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@red-bean.com> | 1998-12-05 18:52:15 +0000 |
| commit | f233316662b120fe6c956fb1f471ba66ce1384ee (patch) | |
| tree | 9a64288148ab2a7fa07ed1de7ad0bf4b4a2dc9a7 /libguile/pairs.h | |
| parent | 105ac23a5bfd442d5e5b6319d760e723dc9476e6 (diff) | |
| download | guile-f233316662b120fe6c956fb1f471ba66ce1384ee.tar.gz | |
* pairs.h (SCM_NEWCELL): When DEBUG_FREELIST is defined, don't
take the address of _into; it might be a register. Just have
scm_debug_newcell return the new cell.
* gc.c (scm_debug_newcell): Just return the new cell, instead of
taking the address of a place to store it as an argument.
* gc.h (scm_debug_newcell): Change declaration.
(Thanks to Greg Harvey.)
Diffstat (limited to 'libguile/pairs.h')
| -rw-r--r-- | libguile/pairs.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/pairs.h b/libguile/pairs.h index e3e6355ef..3b5661041 100644 --- a/libguile/pairs.h +++ b/libguile/pairs.h @@ -145,7 +145,7 @@ typedef SCM huge *SCMPTR; #ifdef DEBUG_FREELIST -#define SCM_NEWCELL(_into) (scm_debug_newcell (&_into)) +#define SCM_NEWCELL(_into) (_into = scm_debug_newcell ()) #else #define SCM_NEWCELL(_into) \ { \ |