Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-26 21:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge pull request #8 from nineties/fix_c_free

Browse source 
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
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
others/planck.c
View file

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