diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2019-08-16 14:58:02 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2019-08-16 14:58:02 -0300 |
| commit | b96b0b5abbf40cbdbed7952bf35a5a27ddf75928 (patch) | |
| tree | 5d9d5463cb7d3424833abab20dd87bce1f4b240f /testes/pm.lua | |
| parent | ca13be9af784b7288d3a07d9b5bccb329086e885 (diff) | |
| download | lua-b96b0b5abbf40cbdbed7952bf35a5a27ddf75928.tar.gz lua-b96b0b5abbf40cbdbed7952bf35a5a27ddf75928.tar.bz2 lua-b96b0b5abbf40cbdbed7952bf35a5a27ddf75928.zip | |
Added macro 'luaL_pushfail'
The macro 'luaL_pushfail' documents all places in the standard libraries
that return nil to signal some kind of failure. It is defined as
'lua_pushnil'. The manual also got a notation (@fail) to document those
returns. The tests were changed to be agnostic regarding whether 'fail'
is 'nil' or 'false'.
Diffstat (limited to 'testes/pm.lua')
| -rw-r--r-- | testes/pm.lua | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/testes/pm.lua b/testes/pm.lua index 4d87fad2..94bb63ca 100644 --- a/testes/pm.lua +++ b/testes/pm.lua | |||
| @@ -28,10 +28,10 @@ a,b = string.find('a\0a\0a\0a\0\0ab', '\0ab', 2); -- finds at the end | |||
| 28 | assert(a == 9 and b == 11); | 28 | assert(a == 9 and b == 11); |
| 29 | a,b = string.find('a\0a\0a\0a\0\0ab', 'b') -- last position | 29 | a,b = string.find('a\0a\0a\0a\0\0ab', 'b') -- last position |
| 30 | assert(a == 11 and b == 11) | 30 | assert(a == 11 and b == 11) |
| 31 | assert(string.find('a\0a\0a\0a\0\0ab', 'b\0') == nil) -- check ending | 31 | assert(not string.find('a\0a\0a\0a\0\0ab', 'b\0')) -- check ending |
| 32 | assert(string.find('', '\0') == nil) | 32 | assert(not string.find('', '\0')) |
| 33 | assert(string.find('alo123alo', '12') == 4) | 33 | assert(string.find('alo123alo', '12') == 4) |
| 34 | assert(string.find('alo123alo', '^12') == nil) | 34 | assert(not string.find('alo123alo', '^12')) |
| 35 | 35 | ||
| 36 | assert(string.match("aaab", ".*b") == "aaab") | 36 | assert(string.match("aaab", ".*b") == "aaab") |
| 37 | assert(string.match("aaa", ".*a") == "aaa") | 37 | assert(string.match("aaa", ".*a") == "aaa") |
| @@ -57,17 +57,17 @@ assert(f('aaa', 'ab*a') == 'aa') | |||
| 57 | assert(f('aba', 'ab*a') == 'aba') | 57 | assert(f('aba', 'ab*a') == 'aba') |
| 58 | assert(f('aaab', 'a+') == 'aaa') | 58 | assert(f('aaab', 'a+') == 'aaa') |
| 59 | assert(f('aaa', '^.+$') == 'aaa') | 59 | assert(f('aaa', '^.+$') == 'aaa') |
| 60 | assert(f('aaa', 'b+') == nil) | 60 | assert(not f('aaa', 'b+')) |
| 61 | assert(f('aaa', 'ab+a') == nil) | 61 | assert(not f('aaa', 'ab+a')) |
| 62 | assert(f('aba', 'ab+a') == 'aba') | 62 | assert(f('aba', 'ab+a') == 'aba') |
| 63 | assert(f('a$a', '.$') == 'a') | 63 | assert(f('a$a', '.$') == 'a') |
| 64 | assert(f('a$a', '.%$') == 'a$') | 64 | assert(f('a$a', '.%$') == 'a$') |
| 65 | assert(f('a$a', '.$.') == 'a$a') | 65 | assert(f('a$a', '.$.') == 'a$a') |
| 66 | assert(f('a$a', '$$') == nil) | 66 | assert(not f('a$a', '$$')) |
| 67 | assert(f('a$b', 'a$') == nil) | 67 | assert(not f('a$b', 'a$')) |
| 68 | assert(f('a$a', '$') == '') | 68 | assert(f('a$a', '$') == '') |
| 69 | assert(f('', 'b*') == '') | 69 | assert(f('', 'b*') == '') |
| 70 | assert(f('aaa', 'bb*') == nil) | 70 | assert(not f('aaa', 'bb*')) |
| 71 | assert(f('aaab', 'a-') == '') | 71 | assert(f('aaab', 'a-') == '') |
| 72 | assert(f('aaa', '^.-$') == 'aaa') | 72 | assert(f('aaa', '^.-$') == 'aaa') |
| 73 | assert(f('aabaaabaaabaaaba', 'b.*b') == 'baaabaaabaaab') | 73 | assert(f('aabaaabaaabaaaba', 'b.*b') == 'baaabaaabaaab') |
| @@ -101,7 +101,7 @@ end | |||
| 101 | assert(f1('alo alx 123 b\0o b\0o', '(..*) %1') == "b\0o b\0o") | 101 | assert(f1('alo alx 123 b\0o b\0o', '(..*) %1') == "b\0o b\0o") |
| 102 | assert(f1('axz123= 4= 4 34', '(.+)=(.*)=%2 %1') == '3= 4= 4 3') | 102 | assert(f1('axz123= 4= 4 34', '(.+)=(.*)=%2 %1') == '3= 4= 4 3') |
| 103 | assert(f1('=======', '^(=*)=%1$') == '=======') | 103 | assert(f1('=======', '^(=*)=%1$') == '=======') |
| 104 | assert(string.match('==========', '^([=]*)=%1$') == nil) | 104 | assert(not string.match('==========', '^([=]*)=%1$')) |
| 105 | 105 | ||
| 106 | local function range (i, j) | 106 | local function range (i, j) |
| 107 | if i <= j then | 107 | if i <= j then |
| @@ -135,7 +135,7 @@ print('+'); | |||
| 135 | assert(string.match("alo xyzK", "(%w+)K") == "xyz") | 135 | assert(string.match("alo xyzK", "(%w+)K") == "xyz") |
| 136 | assert(string.match("254 K", "(%d*)K") == "") | 136 | assert(string.match("254 K", "(%d*)K") == "") |
| 137 | assert(string.match("alo ", "(%w*)$") == "") | 137 | assert(string.match("alo ", "(%w*)$") == "") |
| 138 | assert(string.match("alo ", "(%w+)$") == nil) | 138 | assert(not string.match("alo ", "(%w+)$")) |
| 139 | assert(string.find("(álo)", "%(á") == 1) | 139 | assert(string.find("(álo)", "%(á") == 1) |
| 140 | local a, b, c, d, e = string.match("âlo alo", "^(((.).).* (%w*))$") | 140 | local a, b, c, d, e = string.match("âlo alo", "^(((.).).* (%w*))$") |
| 141 | assert(a == 'âlo alo' and b == 'âl' and c == 'â' and d == 'alo' and e == nil) | 141 | assert(a == 'âlo alo' and b == 'âl' and c == 'â' and d == 'alo' and e == nil) |
| @@ -209,7 +209,7 @@ assert(s == r and t[1] == 1 and t[3] == 3 and t[7] == 4 and t[13] == 4) | |||
| 209 | 209 | ||
| 210 | 210 | ||
| 211 | function isbalanced (s) | 211 | function isbalanced (s) |
| 212 | return string.find(string.gsub(s, "%b()", ""), "[()]") == nil | 212 | return not string.find(string.gsub(s, "%b()", ""), "[()]") |
| 213 | end | 213 | end |
| 214 | 214 | ||
| 215 | assert(isbalanced("(9 ((8))(\0) 7) \0\0 a b ()(c)() a")) | 215 | assert(isbalanced("(9 ((8))(\0) 7) \0\0 a b ()(c)() a")) |
