From a504c5e6249042200f31d356fe18dd9f3a9df37e Mon Sep 17 00:00:00 2001
From: Cloud Wu <cloudwu@gmail.com>
Date: Mon, 8 May 2017 15:07:00 +0800
Subject: [PATCH] lua 5.3.4 bugfix

---
 3rd/lua/lparser.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/3rd/lua/lparser.c b/3rd/lua/lparser.c
index 8ede1268..4aa3e356 100644
--- a/3rd/lua/lparser.c
+++ b/3rd/lua/lparser.c
@@ -1395,6 +1395,7 @@ static void test_then_block (LexState *ls, int *escapelist) {
     luaK_goiffalse(ls->fs, &v);  /* will jump to label if condition is true */
     enterblock(fs, &bl, 0);  /* must enter block before 'goto' */
     gotostat(ls, v.t);  /* handle goto/break */
+    while (testnext(ls, ';')) {}  /* skip colons */
     if (block_follow(ls, 0)) {  /* 'goto' is the entire block? */
       leaveblock(fs);
       return;  /* and that is it */