Prevent CI timeout

g-andrade · Mar 16, 2024 · ccfb078 · ccfb078
1 parent 287756d
commit ccfb078
Show file tree

Hide file tree

Showing 2 changed files with 1,487 additions and 1,369 deletions.
diff --git a/support/test_cases/generate_code.py b/support/test_cases/generate_code.py
@@ -9,6 +9,12 @@ def eunit_safe_number_str(v):
     else:
         return str(v)
 
+def case_function_name(coord_dim, coord_from, coord_to):
+    return '\'%dd_from_%s_to_%s_test_\'' % (
+            coord_dim,
+            eunit_safe_number_str(coord_from),
+            eunit_safe_number_str(coord_to)
+    )
 
 test_data_filepaths = sys.argv[1:-1]
 code_output_filepath = sys.argv[-1]
@@ -30,82 +36,82 @@ def eunit_safe_number_str(v):
 for path in test_data_filepaths:
     with open(path, 'r') as test_data_file:
         test_data_filename = os.path.basename(path)
-        parse_result = parse.parse(
-                '{:d}dim_from_{:d}_to_{:d}.data', test_data_filename)
+        parse_result = parse.parse('{:d}dim_from_{:d}_to_{:d}.data', test_data_filename)
         (coord_dim, coord_from, coord_to) = parse_result
-        function_name = '\'%dd_from_%s_to_%s_test_\'' % (
-                coord_dim,
-                eunit_safe_number_str(coord_from),
-                eunit_safe_number_str(coord_to))
+        function_name = case_function_name(coord_dim, coord_from, coord_to)
         output += '''
 -spec {function_name}() -> fun(() -> ok).
 {function_name}() ->
-    fun () ->
-        Config = erlzord:config(#{{
-            dimension => {coord_dim},
-            min_coordinate_value => {coord_from},
-            max_coordinate_value => {coord_to}
-        }}),
-
-        ?assertEqual(
-            Config,
-            erlzord:config(#{{
-                dimensions => {coord_dim},
+    {{
+        timeout,
+        10,
+        fun () ->
+            Config = erlzord:config(#{{
+                dimension => {coord_dim},
                 min_coordinate_value => {coord_from},
                 max_coordinate_value => {coord_to}
-            }})
-        ),
+            }}),
 
-        ?assertEqual(
-            Config,
-            erlzord:config({coord_dim}, {coord_from}, {coord_to})
-        ),
+            ?assertEqual(
+                Config,
+                erlzord:config(#{{
+                    dimensions => {coord_dim},
+                    min_coordinate_value => {coord_from},
+                    max_coordinate_value => {coord_to}
+                }})
+            ),
 
-        {{ok, Terms}} = file:consult("{erl_test_data_filepath}"),
-        lists:foreach(
-            fun ({{Coordinates, ExpectedValue}}) ->
-                Value = erlzord:encode(Coordinates, Config),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, Value}}),
+            ?assertEqual(
+                Config,
+                erlzord:config({coord_dim}, {coord_from}, {coord_to})
+            ),
 
-                ListValue = erlzord:encode(tuple_to_list(Coordinates), Config),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, ListValue}}),
+            {{ok, Terms}} = file:consult("{erl_test_data_filepath}"),
+            lists:foreach(
+                fun ({{Coordinates, ExpectedValue}}) ->
+                    Value = erlzord:encode(Coordinates, Config),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, Value}}),
 
+                    ListValue = erlzord:encode(tuple_to_list(Coordinates), Config),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, ListValue}}),
 
-                DirectValue = erlzord:encode(Coordinates, {coord_from}, {coord_to}),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, DirectValue}}),
 
-                DirectValueList = erlzord:encode(tuple_to_list(Coordinates), {coord_from}, {coord_to}),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, DirectValueList}}),
+                    DirectValue = erlzord:encode(Coordinates, {coord_from}, {coord_to}),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, DirectValue}}),
 
+                    DirectValueList = erlzord:encode(tuple_to_list(Coordinates), {coord_from}, {coord_to}),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, DirectValueList}}),
 
-                LegacyDirectValue = erlzord:encode(Coordinates, {coord_dim}, {coord_from}, {coord_to}),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, LegacyDirectValue}}),
 
-                LegacyDirectListValue = erlzord:encode(tuple_to_list(Coordinates), {coord_dim}, {coord_from}, {coord_to}),
-                ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, LegacyDirectListValue}}),
+                    LegacyDirectValue = erlzord:encode(Coordinates, {coord_dim}, {coord_from}, {coord_to}),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, LegacyDirectValue}}),
 
+                    LegacyDirectListValue = erlzord:encode(tuple_to_list(Coordinates), {coord_dim}, {coord_from}, {coord_to}),
+                    ?assertEqual({{Coordinates, ExpectedValue}}, {{Coordinates, LegacyDirectListValue}}),
 
-                DecodedTupleCoordinates = erlzord:decode_tuple(Value, Config),
-                ?assertEqual({{Value, DecodedTupleCoordinates}}, {{Value, Coordinates}}),
 
-                DecodedListCoordinates = erlzord:decode_list(Value, Config),
-                ?assertEqual({{Value, list_to_tuple(DecodedListCoordinates)}}, {{Value, Coordinates}}),
+                    DecodedTupleCoordinates = erlzord:decode_tuple(Value, Config),
+                    ?assertEqual({{Value, DecodedTupleCoordinates}}, {{Value, Coordinates}}),
 
-                DecodedLegacyTupleCoordinates = erlzord:decode(Value, Config),
-                ?assertEqual({{Value, DecodedLegacyTupleCoordinates}}, {{Value, Coordinates}}),
+                    DecodedListCoordinates = erlzord:decode_list(Value, Config),
+                    ?assertEqual({{Value, list_to_tuple(DecodedListCoordinates)}}, {{Value, Coordinates}}),
 
+                    DecodedLegacyTupleCoordinates = erlzord:decode(Value, Config),
+                    ?assertEqual({{Value, DecodedLegacyTupleCoordinates}}, {{Value, Coordinates}}),
 
-                DirectDecodedTupleCoordinates = erlzord:decode_tuple(Value, {coord_dim}, {coord_from}, {coord_to}),
-                ?assertEqual({{Value, DirectDecodedTupleCoordinates}}, {{Value, Coordinates}}),
 
-                DirectDecodedListCoordinates = erlzord:decode_list(Value, {coord_dim}, {coord_from}, {coord_to}),
-                ?assertEqual({{Value, list_to_tuple(DirectDecodedListCoordinates)}}, {{Value, Coordinates}}),
+                    DirectDecodedTupleCoordinates = erlzord:decode_tuple(Value, {coord_dim}, {coord_from}, {coord_to}),
+                    ?assertEqual({{Value, DirectDecodedTupleCoordinates}}, {{Value, Coordinates}}),
 
-                DirectDecodedLegacyTupleCoordinates = erlzord:decode(Value, {coord_dim}, {coord_from}, {coord_to}),
-                ?assertEqual({{Value, DirectDecodedLegacyTupleCoordinates}}, {{Value, Coordinates}})
-            end,
-            Terms)
-    end.
+                    DirectDecodedListCoordinates = erlzord:decode_list(Value, {coord_dim}, {coord_from}, {coord_to}),
+                    ?assertEqual({{Value, list_to_tuple(DirectDecodedListCoordinates)}}, {{Value, Coordinates}}),
+
+                    DirectDecodedLegacyTupleCoordinates = erlzord:decode(Value, {coord_dim}, {coord_from}, {coord_to}),
+                    ?assertEqual({{Value, DirectDecodedLegacyTupleCoordinates}}, {{Value, Coordinates}})
+                end,
+                Terms)
+        end
+    }}.
 '''.format(
         function_name=function_name,
         coord_dim=coord_dim,