lua

commit 6a0dace25a4b5b77f0fa6911de2ba26ef0fdff2c
parent 04e19712a5d48b84869f9942836ff8314fb0be8e
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Sun, 20 Jun 2021 15:36:09 -0300

Bug: 'local function' can assign to '<const>' variables

Diffstat:
M
lparser.c
 | 
1
+
M
testes/locals.lua
 | 
2
++

2 files changed, 3 insertions(+), 0 deletions(-)
diff --git a/lparser.c b/lparser.c
@@ -1785,6 +1785,7 @@ static void funcstat (LexState *ls, int line) {
   luaX_next(ls);  /* skip FUNCTION */
   ismethod = funcname(ls, &v);
   body(ls, &b, ismethod, line);
+  check_readonly(ls, &v);
   luaK_storevar(ls->fs, &v, &b);
   luaK_fixline(ls->fs, line);  /* definition "happens" in the first line */
 }
diff --git a/testes/locals.lua b/testes/locals.lua
@@ -187,6 +187,8 @@ do   -- constants
   checkro("y", "local x, y <const>, z = 10, 20, 30; x = 11; y = 12")
   checkro("x", "local x <const>, y, z <const> = 10, 20, 30; x = 11")
   checkro("z", "local x <const>, y, z <const> = 10, 20, 30; y = 10; z = 11")
+  checkro("foo", "local foo <const> = 10; function foo() end")
+  checkro("foo", "local foo <const> = {}; function foo() end")
 
   checkro("z", [[
     local a, z <const>, b = 10;