1 files changed, 2 insertions, 2 deletions
diff --git a/lparser.c b/lparser.c
index 7e6da470..b635a418 100644
--- a/lparser.c
+++ b/lparser.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lparser.c,v 1.115 2000/10/10 19:51:15 roberto Exp roberto $
+** $Id: lparser.c,v 1.116 2000/10/27 11:39:52 roberto Exp roberto $
 ** LL(1) Parser and code generator for Lua
 ** See Copyright Notice in lua.h
 */
@@ -997,7 +997,7 @@ static void retstat (LexState *ls) {
  /* stat -> RETURN explist */
  FuncState *fs = ls->fs;
  next(ls);  /* skip RETURN */
-  if (!block_follow(ls->t.token))
+  if (!block_follow(ls->t.token) && ls->t.token != ';')
    explist1(ls);  /* optional return values */
  luaK_code1(fs, OP_RETURN, ls->fs->nactloc);
  fs->stacklevel = fs->nactloc;  /* removes all temp values */

diff --git a/lparser.c b/lparser.c index 7e6da470..b635a418 100644 --- a/lparser.c +++ b/lparser.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: lparser.c,v 1.115 2000/10/10 19:51:15 roberto Exp roberto $	2	** $Id: lparser.c,v 1.116 2000/10/27 11:39:52 roberto Exp roberto $
3	** LL(1) Parser and code generator for Lua	3	** LL(1) Parser and code generator for Lua
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -997,7 +997,7 @@ static void retstat (LexState *ls) {
997	/* stat -> RETURN explist */	997	/* stat -> RETURN explist */
998	FuncState *fs = ls->fs;	998	FuncState *fs = ls->fs;
999	next(ls); /* skip RETURN */	999	next(ls); /* skip RETURN */
1000	if (!block_follow(ls->t.token))	1000	if (!block_follow(ls->t.token) && ls->t.token != ';')
1001	explist1(ls); /* optional return values */	1001	explist1(ls); /* optional return values */
1002	luaK_code1(fs, OP_RETURN, ls->fs->nactloc);	1002	luaK_code1(fs, OP_RETURN, ls->fs->nactloc);
1003	fs->stacklevel = fs->nactloc; /* removes all temp values */	1003	fs->stacklevel = fs->nactloc; /* removes all temp values */