mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 15:40:19 +02:00
Code Activity

Fix bogus computation of `vm->stack_limit'.

Browse source 
* libguile/vm.c (make_vm): Remove bogus "- 3" when computing
  `stack_size'.

* libguile/vm-engine.h (CHECK_OVERFLOW): Change accordingly.
This commit is contained in:
Ludovic Courtès 2009-08-20 01:20:58 +02:00
parent 1f7de76940
commit 75d315e1fb
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/vm-engine.h
View file

@ -252,7 +252,7 @@
#endif
#define CHECK_OVERFLOW() \
if (sp > stack_limit) \
if (sp >= stack_limit) \
goto vm_error_stack_overflow
#define CHECK_UNDERFLOW() \