diff options
| -rw-r--r-- | lisc/parse.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisc/parse.c b/lisc/parse.c index 76c2d65..a6957f2 100644 --- a/lisc/parse.c +++ b/lisc/parse.c @@ -515,8 +515,12 @@ parseline(PState ps) JRetc, JRet0 }[rcls]; curb->jmp.rettyn = rtyn; - if (rcls < 3) - curb->jmp.arg = parseref(); + if (rcls < 3) { + r = parseref(); + if (req(r, R)) + err("return value expected"); + curb->jmp.arg = r; + } goto Close; case TJmp: curb->jmp.type = JJmp; |