summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lexer.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/lexer.c b/lexer.c
index d269e11..36000c8 100644
--- a/lexer.c
+++ b/lexer.c
@@ -23,7 +23,7 @@ lexline(Rune *line, Symtab *symtab)
if(isspacerune(line[offset])){
offset++;
continue;
- }else if(runestrchr(L"(){}[]←⋄", line[offset])){
+ }else if(runestrchr(L"(){}[]←⋄⍝", line[offset])){
switch(line[offset]){
case '(': stmt->toks[stmt->ntoks].tag = LParTag; break;
case ')': stmt->toks[stmt->ntoks].tag = RParTag; break;
@@ -35,6 +35,8 @@ lexline(Rune *line, Symtab *symtab)
case L'⋄':
stmt->next = lexline(&line[offset+1], symtab);
goto end;
+ case L'⍝':
+ goto end;
}
offset++;
}else if(p = runestrchr(primfuncnames, line[offset])){