diff options
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")) |