diff options
Diffstat (limited to 'testes/all.lua')
-rwxr-xr-x[-rw-r--r--] | testes/all.lua | 38 |
1 files changed, 8 insertions, 30 deletions
diff --git a/testes/all.lua b/testes/all.lua index 4ffa9efe..d3e2f123 100644..100755 --- a/testes/all.lua +++ b/testes/all.lua | |||
@@ -1,7 +1,11 @@ | |||
1 | #!../lua | 1 | #!../lua |
2 | -- $Id: testes/all.lua $ | 2 | -- $Id: testes/all.lua $ |
3 | -- See Copyright Notice at the end of this file | 3 | -- See Copyright Notice in file lua.h |
4 | 4 | ||
5 | global <const> * | ||
6 | |||
7 | global _soft, _port, _nomsg | ||
8 | global T | ||
5 | 9 | ||
6 | local version = "Lua 5.5" | 10 | local version = "Lua 5.5" |
7 | if _VERSION ~= version then | 11 | if _VERSION ~= version then |
@@ -34,7 +38,7 @@ if usertests then | |||
34 | end | 38 | end |
35 | 39 | ||
36 | -- tests should require debug when needed | 40 | -- tests should require debug when needed |
37 | debug = nil | 41 | global debug; debug = nil |
38 | 42 | ||
39 | 43 | ||
40 | if usertests then | 44 | if usertests then |
@@ -71,7 +75,7 @@ do -- ( | |||
71 | 75 | ||
72 | -- track messages for tests not performed | 76 | -- track messages for tests not performed |
73 | local msgs = {} | 77 | local msgs = {} |
74 | function Message (m) | 78 | global function Message (m) |
75 | if not _nomsg then | 79 | if not _nomsg then |
76 | print(m) | 80 | print(m) |
77 | msgs[#msgs+1] = string.sub(m, 3, -3) | 81 | msgs[#msgs+1] = string.sub(m, 3, -3) |
@@ -182,6 +186,7 @@ dofile('nextvar.lua') | |||
182 | dofile('pm.lua') | 186 | dofile('pm.lua') |
183 | dofile('utf8.lua') | 187 | dofile('utf8.lua') |
184 | dofile('api.lua') | 188 | dofile('api.lua') |
189 | dofile('memerr.lua') | ||
185 | assert(dofile('events.lua') == 12) | 190 | assert(dofile('events.lua') == 12) |
186 | dofile('vararg.lua') | 191 | dofile('vararg.lua') |
187 | dofile('closure.lua') | 192 | dofile('closure.lua') |
@@ -282,30 +287,3 @@ end | |||
282 | 287 | ||
283 | print("final OK !!!") | 288 | print("final OK !!!") |
284 | 289 | ||
285 | |||
286 | |||
287 | --[[ | ||
288 | ***************************************************************************** | ||
289 | * Copyright (C) 1994-2016 Lua.org, PUC-Rio. | ||
290 | * | ||
291 | * Permission is hereby granted, free of charge, to any person obtaining | ||
292 | * a copy of this software and associated documentation files (the | ||
293 | * "Software"), to deal in the Software without restriction, including | ||
294 | * without limitation the rights to use, copy, modify, merge, publish, | ||
295 | * distribute, sublicense, and/or sell copies of the Software, and to | ||
296 | * permit persons to whom the Software is furnished to do so, subject to | ||
297 | * the following conditions: | ||
298 | * | ||
299 | * The above copyright notice and this permission notice shall be | ||
300 | * included in all copies or substantial portions of the Software. | ||
301 | * | ||
302 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, | ||
303 | * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF | ||
304 | * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. | ||
305 | * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY | ||
306 | * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, | ||
307 | * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE | ||
308 | * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | ||
309 | ***************************************************************************** | ||
310 | ]] | ||
311 | |||