1- local function assert_eq (actual , expected , msg )
1+ local function assertEquals (actual , expected , msg )
22 if actual ~= expected then
3- error (' assert_eq failed: ' .. msg )
3+ error (' assertEquals failed: ' .. msg )
44 end
55end
66
@@ -17,12 +17,12 @@ local function assertThrows(substr, fn)
1717end
1818
1919-- 1. Strings: raw length, ignore metamethods
20- assert_eq (# " " , 0 , " empty string length" )
21- assert_eq (# " abc" , 3 , " string length" )
20+ assertEquals (# " " , 0 , " empty string length" )
21+ assertEquals (# " abc" , 3 , " string length" )
2222
2323-- 2. Tables (raw length for sequence or `__len`)
24- assert_eq (# {}, 0 , " empty table length" )
25- assert_eq (# {1 ,2 ,3 }, 3 , " array length" )
24+ assertEquals (# {}, 0 , " empty table length" )
25+ assertEquals (# {1 ,2 ,3 }, 3 , " array length" )
2626
2727do
2828 local t = {}
3434 end ,
3535 })
3636
37- assert_eq (# t , 42 , " __len should override raw table length" )
37+ assertEquals (# t , 42 , " __len should override raw table length" )
3838end
3939
4040-- 2.1. Metamethod result handling
4848 end ,
4949 })
5050
51- assert_eq (# t , 42 , " __len must use only first return value" )
51+ assertEquals (# t , 42 , " __len must use only first return value" )
5252end
5353
5454-- 2.2. Raw length when no array part
5858 b = 2 ,
5959 }
6060
61- assert_eq (# t , 0 , " table with only non-integer keys has length 0" )
61+ assertEquals (# t , 0 , " table with only non-integer keys has length 0" )
6262end
6363
6464-- 2.3. Length when both array and key-value parts
7272 3 ,
7373 }
7474
75- assert_eq (# t , 3 , " table with mixed non-integer and integer keys" )
75+ assertEquals (# t , 3 , " table with mixed non-integer and integer keys" )
7676end
7777
7878-- 3. Non-strings and non-tables
113113 __len = function (_ ) return 99 end ,
114114 })
115115
116- assert_eq (# t , 99 , " #t uses __len" )
117- assert_eq (rawlen (t ), 3 , " rawlen(t) ignores __len" )
116+ assertEquals (# t , 99 , " #t uses __len" )
117+ assertEquals (rawlen (t ), 3 , " rawlen(t) ignores __len" )
118118end
119119
120120-- 5. Trailing-nil shrinking behavior
121121do
122122 local t = { 1 , 2 , 3 }
123- assert_eq (# t , 3 , " initial sequence length" )
123+ assertEquals (# t , 3 , " initial sequence length" )
124124
125125 t [3 ] = nil
126- assert_eq (# t , 2 , " sequence length shrinks when last element is set to nil" )
127- assert_eq (rawlen (t ), 2 , " rawlen shrinks with trailing nil (array part shrinks)" )
126+ assertEquals (# t , 2 , " sequence length shrinks when last element is set to nil" )
127+ assertEquals (rawlen (t ), 2 , " rawlen shrinks with trailing nil (array part shrinks)" )
128128
129129 t [2 ] = nil
130- assert_eq (# t , 1 , " sequence length shrinks again after removing new last element" )
131- assert_eq (rawlen (t ), 1 , " rawlen shrinks again after trailing nil" )
130+ assertEquals (# t , 1 , " sequence length shrinks again after removing new last element" )
131+ assertEquals (rawlen (t ), 1 , " rawlen shrinks again after trailing nil" )
132132end
133133
134134-- 6. rawlen on strings
135- assert_eq (rawlen (" abc" ), 3 , " rawlen on strings" )
135+ assertEquals (rawlen (" abc" ), 3 , " rawlen on strings" )
136136
137137-- 7. rawlen(t) must ignore the __len metamethod
138138local t = {1 ,2 ,3 }
0 commit comments