give PUSH_COMP access to the updated source string

This commit is contained in:
dzaima 2023-05-20 13:22:19 +03:00
parent f73e15f8a3
commit e781ae21ee

View File

@ -186,8 +186,8 @@ B bqn_repr(B x) {
if (CATCH) { POP_COMP; rethrow(); }
static NOINLINE Block* bqn_compc(B str, B path, B args, B comp, B compArg) { // consumes str,path,args
PUSH_COMP;
str = chr_squeeze(str);
PUSH_COMP;
Block* r = load_compObj(c2G(comp, incG(compArg), inc(str)), str, path, NULL);
dec(path); dec(args);
POP_COMP; popCatch();
@ -197,8 +197,8 @@ Block* bqn_comp(B str, B path, B args) { // consumes all
return bqn_compc(str, path, args, load_comp, load_compArg);
}
Block* bqn_compScc(B str, B path, B args, Scope* sc, B comp, B rt, bool repl) { // consumes str,path,args
PUSH_COMP;
str = chr_squeeze(str);
PUSH_COMP;
B vName = emptyHVec();
B vDepth = emptyIVec();
if (repl && (!sc || sc->psc)) thrM("VM compiler: REPL mode must be used at top level scope");