From edbbcf3250aea3924a1999e8f7ba4dcee90af147 Mon Sep 17 00:00:00 2001 From: otya128 Date: Tue, 18 Aug 2015 22:50:37 +0900 Subject: [PATCH] =?UTF-8?q?ON=20GOTO,GOSUB=E3=82=92=E5=AE=9A=E7=BE=A9?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- SMILEBASIC/node.d | 15 +++++++++++++++ SMILEBASIC/token.d | 1 + 2 files changed, 16 insertions(+) diff --git a/SMILEBASIC/node.d b/SMILEBASIC/node.d index 8fb808d..d825a8c 100644 --- a/SMILEBASIC/node.d +++ b/SMILEBASIC/node.d @@ -39,6 +39,7 @@ enum NodeType Data, Read, Restore, + On, } abstract class Node { @@ -448,3 +449,17 @@ class Data : Statement data ~= v; } } +class On : Statement +{ + bool isGosub; + wstring[] labels; + this(bool isgosub) + { + this.isGosub = isgosub; + this.labels = new wstring[0]; + } + void addLabel(wstring label) + { + this.labels ~= label; + } +} diff --git a/SMILEBASIC/token.d b/SMILEBASIC/token.d index 93a2d27..c84a2bf 100644 --- a/SMILEBASIC/token.d +++ b/SMILEBASIC/token.d @@ -61,6 +61,7 @@ enum TokenType Data, Read, Restore, + On, } struct Token