Merge pull request #8 from nineties/fix_c_free

Fix a bug: add missing next() to (free) in C version
This commit is contained in:
Koichi NAKAMURA 2021-05-05 21:14:50 +09:00 committed by GitHub
commit 5fb0a39783
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -207,6 +207,9 @@ defcode("(allocate)", allocate) {
push((cell) p);
next();
}
defcode("(free)", free_) { free((void*) pop()); }
defcode("(free)", free_) {
free((void*) pop());
next();
}
#endif