Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-09 14:07:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing typo

Browse source
This commit is contained in:
Alex Shinn 2010-09-17 01:48:17 +00:00
parent d451a053ca
commit f9677d7a0c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
vm.c
View file

@ -633,7 +633,7 @@ sexp sexp_vm (sexp ctx, sexp proc) {
tmp2 = stack[fp+3]; tmp2 = stack[fp+3];
j = sexp_unbox_fixnum(stack[fp]); j = sexp_unbox_fixnum(stack[fp]);
self = stack[fp+2]; self = stack[fp+2];
bc = sexp_procedure_vars(self); bc = sexp_procedure_code(self);
cp = sexp_procedure_vars(self); cp = sexp_procedure_vars(self);
ip = (sexp_bytecode_data(bc) ip = (sexp_bytecode_data(bc)
+ sexp_unbox_fixnum(stack[fp+1])) - sizeof(sexp); + sexp_unbox_fixnum(stack[fp+1])) - sizeof(sexp);