diff --git a/exercises/practice/forth/dune-project b/exercises/practice/forth/dune-project index 2c07af9a57..d466ad7c44 100644 --- a/exercises/practice/forth/dune-project +++ b/exercises/practice/forth/dune-project @@ -1,2 +1,2 @@ (lang dune 1.1) -(version 1.7.1) +(version 1.0) diff --git a/templates/forth/.broken b/templates/forth/.broken deleted file mode 100644 index 3552bdbaae..0000000000 --- a/templates/forth/.broken +++ /dev/null @@ -1,55 +0,0 @@ -forth/test.ml.tpl -====== -open Base -open OUnit2 -open Forth - -let print_int_list_option (xs: int list option) = match xs with -| None -> "None" -| Some xs -> "Some [" ^ String.concat ~sep:";" (List.map ~f:Int.to_string xs) ^ "]" -let ae exp got _test_ctxt = assert_equal ~printer:print_int_list_option exp got - -{{#cases}} - let {{slug}}_tests = [ - {{#cases}} - "{{description}}" >:: - ae {{#input}}{{expected}} ({{property}} {{instructions}}){{/input}}; - {{/cases}} - ] - - -{{/cases}} - -let () = - run_test_tt_main ( - "forth tests" >::: - List.concat [ - {{#cases}} - {{slug}}_tests; - {{/cases}} - ] - ) -Uncaught exception: - - Mustache_types.Missing_variable("instructions") - -Raised at Mustache.Lookup.dotted_name.(fun) in file "lib/mustache.ml", line 176, characters 25-51 -Called from Mustache.Lookup.str.(fun) in file "lib/mustache.ml", line 179, characters 10-37 -Called from Mustache.Without_locations.render_fmt.(fun).render' in file "lib/mustache.ml", line 310, characters 48-81 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Stdlib__List.iter in file "list.ml", line 110, characters 12-15 -Called from Mustache.Without_locations.render in file "lib/mustache.ml", line 345, characters 4-41 -Called from Generator__Template.render in file "lib_generator/template.ml", line 29, characters 4-80 -Re-raised at Generator__Template.render in file "lib_generator/template.ml", line 37, characters 4-13 -Called from Generator__Controller.run.(fun) in file "lib_generator/controller.ml", line 24, characters 8-48 -Called from Base__List.count_map in file "src/list.ml", line 465, characters 13-17 -Called from Base__List.concat_map.aux in file "src/list.ml", line 709, characters 34-40 -Called from Generator__Controller.run in file "lib_generator/controller.ml", line 15, characters 4-858 -Called from Dune__exe__Test_gen.command.(fun) in file "bin_test_gen/test_gen.ml", line 42, characters 11-170 -Called from Core__Command.For_unix.run.(fun) in file "core/src/command.ml", line 2871, characters 8-270 -Called from Base__Exn.handle_uncaught_aux in file "src/exn.ml", line 127, characters 6-10 -make: *** [Makefile:49: forth.gen] Error 1