diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-08-20 01:20:58 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-08-20 01:20:58 +0200 |
commit | 75d315e1fbb0da6af8c48d17fd5b2a7a759fe849 (patch) | |
tree | 40afef06dfc73c80dec8fe090e38a46ec174e7d2 /libguile/vm-engine.h | |
parent | 1f7de769402cf8a9ad54b5283dc96d60e86fb5bb (diff) | |
download | guile-75d315e1fbb0da6af8c48d17fd5b2a7a759fe849.tar.gz |
Fix bogus computation of `vm->stack_limit'.
* libguile/vm.c (make_vm): Remove bogus "- 3" when computing
`stack_size'.
* libguile/vm-engine.h (CHECK_OVERFLOW): Change accordingly.
Diffstat (limited to 'libguile/vm-engine.h')
-rw-r--r-- | libguile/vm-engine.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vm-engine.h b/libguile/vm-engine.h index 240969c37..b819b9028 100644 --- a/libguile/vm-engine.h +++ b/libguile/vm-engine.h @@ -252,7 +252,7 @@ #endif #define CHECK_OVERFLOW() \ - if (sp > stack_limit) \ + if (sp >= stack_limit) \ goto vm_error_stack_overflow #define CHECK_UNDERFLOW() \ |