st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-06 06:48:48 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixes, cleanup, some copies removed

Browse source
This commit is contained in:
ProgramSnail 2024-12-15 16:19:54 +03:00
parent 2589f6166f
commit d90a8cf89f
16 changed files with 373 additions and 666 deletions
Download patch file Download diff file Expand all files Collapse all files

6
byterun/include/stack.h
View file

@ -196,9 +196,11 @@ static inline void s_enter_f(char *rp, bool is_closure_call, auint args_sz,
}
static inline void s_exit_f() {
#ifndef WITH_CHECK
if (s.fp == NULL) {
s_failure(&s, "exit: no func");
}
#endif
struct Frame frame = *s.fp;
@ -274,13 +276,15 @@ static inline void **var_by_category(enum VarCategory category, size_t id) {
#endif
var = f_args(s.fp) + (f_args_sz(s.fp) - id - 1);
break;
case VAR_CLOSURE: // TODO: check that clojure vars are used only in clojures
case VAR_CLOSURE:
#ifndef WITH_CHECK
if (s.fp == NULL) {
s_failure(&s, "can't read closure parameter outside of function");
}
if (s.fp->closure == NULL) {
s_failure(&s, "can't read closure parameter not in closure");
}
#endif
if (UNBOXED(s.fp->closure)) {
s_failure(&s, "not boxed value expected in closure index");
}