diff options
| author | Marius Vollmer <mvo@zagadka.de> | 2005-03-02 20:42:01 +0000 |
|---|---|---|
| committer | Marius Vollmer <mvo@zagadka.de> | 2005-03-02 20:42:01 +0000 |
| commit | 9de87eea47536e25ef99bc25f07afdd759ee3575 (patch) | |
| tree | 936d52588ace67469aba68f6ad47cbf1a12462ca /libguile/stackchk.h | |
| parent | cb1cfc42a4f5ac4d60a64b425795432a0388ad7e (diff) | |
| download | guile-9de87eea47536e25ef99bc25f07afdd759ee3575.tar.gz | |
See ChangeLog from 2005-03-02.
Diffstat (limited to 'libguile/stackchk.h')
| -rw-r--r-- | libguile/stackchk.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/stackchk.h b/libguile/stackchk.h index 938794114..4bf6e4163 100644 --- a/libguile/stackchk.h +++ b/libguile/stackchk.h @@ -37,11 +37,11 @@ # if SCM_STACK_GROWS_UP # define SCM_STACK_OVERFLOW_P(s)\ (SCM_STACK_PTR (s) \ - > ((SCM_STACKITEM *) SCM_BASE (scm_rootcont) + SCM_STACK_LIMIT)) + > (SCM_I_CURRENT_THREAD->base + SCM_STACK_LIMIT)) # else # define SCM_STACK_OVERFLOW_P(s)\ (SCM_STACK_PTR (s) \ - < ((SCM_STACKITEM *) SCM_BASE (scm_rootcont) - SCM_STACK_LIMIT)) + < (SCM_I_CURRENT_THREAD->base - SCM_STACK_LIMIT)) # endif # define SCM_CHECK_STACK\ {\ |