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

prepend scene labels with number

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-04-03 09:21:38 -06:00
parent ef3cf65256
commit fc9edf6f86
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
kiss/src/kiss/AsyncEmbeddedScript.hx
View File

@@ -13,6 +13,7 @@ import kiss.Kiss;
import kiss.ReaderExp; import kiss.ReaderExp;
import kiss.Prelude; import kiss.Prelude;
import kiss.cloner.Cloner; import kiss.cloner.Cloner;
using StringTools;
typedef Continuation = () -> Void; typedef Continuation = () -> Void;
typedef AsyncCommand = (AsyncEmbeddedScript, Continuation) -> Void; typedef AsyncCommand = (AsyncEmbeddedScript, Continuation) -> Void;
@@ -147,9 +148,11 @@ class AsyncEmbeddedScript {
var labelsList:Array<Expr> = []; var labelsList:Array<Expr> = [];
var noSkipList:Array<Expr> = []; var noSkipList:Array<Expr> = [];
var labelNum = 0;
k.macros["label"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> { k.macros["label"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> {
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;
labelsList.push(macro labels[$v{label}] = $v{commandList.length}); labelsList.push(macro labels[$v{label}] = $v{commandList.length});
wholeExp.expBuilder().callSymbol("cc", []); wholeExp.expBuilder().callSymbol("cc", []);