diff options
| author | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2015-07-10 05:51:16 -0400 |
|---|---|---|
| committer | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2015-09-15 23:01:27 -0400 |
| commit | 1d62b4bf478a17d7b825bb0064a50dba570dfe01 (patch) | |
| tree | 4c04315030832883e10bc8a51a66bb94901f5b4a /lisc | |
| parent | 1e0d8e2f64ee03027439a111267a46d143ea5430 (diff) | |
| download | roux-1d62b4bf478a17d7b825bb0064a50dba570dfe01.tar.gz | |
fix multiple block definition check
Diffstat (limited to 'lisc')
| -rw-r--r-- | lisc/parse.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisc/parse.c b/lisc/parse.c index 49be67a..6beb8a6 100644 --- a/lisc/parse.c +++ b/lisc/parse.c @@ -317,8 +317,8 @@ parseline(PState ps) } } curb = b; - if (curb->np || curb->ni) - err("block already defined"); + if (curb->jmp.type != JXXX) + err("multiple definitions of block"); expect(TNL); return PPhi; case TRet: |