関数内ラベル実装と引数なし関数を正常に呼べるようにした
This commit is contained in:
@@ -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 "テスト正常終了"
|
||||
Reference in New Issue
Block a user