1
0

関数内ラベル実装と引数なし関数を正常に呼べるようにした

This commit is contained in:
otya128
2015-07-13 21:39:42 +09:00
parent b51fe86fd6
commit 5dff13b64f
8 changed files with 215 additions and 47 deletions

View File

@@ -24,6 +24,18 @@ DEF INCTEST A
DEC A
ASSERT__ A==10, "A==10"
END
GOTOTEST
GOTO@SKIP
@LOCAL
ASSERT__ 0, "LOCAL LABEL"
@SKIP
DEF GOTOTEST
GOTO @LOCAL
ASSERT__ 0, "LOCAL LABEL"
@LOCAL
END
@DATA_1
DATA "A",1,2,3,4
LOCATE 10,
COLOR 1,15
PRINT "テスト正常終了"