nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Collective declaration for globals ('global *')

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2025-05-13 11:43:10 -03:00
parent 7dc6aae290
commit 3b9dd52be0
14 changed files with 156 additions and 64 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
testes/code.lua
View File

@@ -1,6 +1,8 @@
-- $Id: testes/code.lua $
-- See Copyright Notice in file lua.h
global * <const>
if T==nil then
(Message or print)('\n >>> testC not active: skipping opcode tests <<<\n')
return
@@ -405,8 +407,8 @@ do -- tests for table access in upvalues
end
-- de morgan
checkequal(function () local a; if not (a or b) then b=a end end,
function () local a; if (not a and not b) then b=a end end)
checkequal(function () local a, b; if not (a or b) then b=a end end,
function () local a, b; if (not a and not b) then b=a end end)
checkequal(function (l) local a; return 0 <= a and a <= l end,
function (l) local a; return not (not(a >= 0) or not(a <= l)) end)