From 1d62b4bf478a17d7b825bb0064a50dba570dfe01 Mon Sep 17 00:00:00 2001 From: Quentin Carbonneaux Date: Fri, 10 Jul 2015 05:51:16 -0400 Subject: fix multiple block definition check --- lisc/parse.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisc') 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: -- cgit 1.4.1