kiss-lang/kiss
1
0
Fork 0
Code Issues 6 Pull Requests Actions Packages Projects Releases Wiki Activity

fix labels and noSkip when caching AsyncEmbeddedScript

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-07-19 13:42:14 -06:00
parent 763c36dcc9
commit 462d5d64a8
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/kiss/AsyncEmbeddedScript.hx
View File

@@ -261,6 +261,7 @@ class AsyncEmbeddedScript {
var labelNum = 0; var labelNum = 0;
k.macros["label"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> { k.macros["label"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> {
k.stateChanged = true;
wholeExp.checkNumArgs(1, 1, '(label <label>)'); wholeExp.checkNumArgs(1, 1, '(label <label>)');
var label = Prelude.symbolNameValue(args[0]); var label = Prelude.symbolNameValue(args[0]);
label = '${++labelNum}. '.lpad("0", 5) + label; label = '${++labelNum}. '.lpad("0", 5) + label;
@@ -270,6 +271,7 @@ class AsyncEmbeddedScript {
}; };
k.macros["noSkip"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> { k.macros["noSkip"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> {
k.stateChanged = true;
wholeExp.checkNumArgs(1, null, '(noSkip <body...>)'); wholeExp.checkNumArgs(1, null, '(noSkip <body...>)');
noSkipList.push(macro noSkipInstructions[$v{commandList.length}] = true); noSkipList.push(macro noSkipInstructions[$v{commandList.length}] = true);