Add support for simple structs and var inits

This commit is contained in:
Joey Yakimowich-Payne 2018-06-06 17:31:17 +09:00
commit 4d17ba3d65
10 changed files with 210 additions and 22 deletions

View file

@ -46,7 +46,8 @@ let get_code_pairs name =
let gen_pair_test suite_name ((cfile, test_code), (nim_file, correct_code)) =
"Test " ^ suite_name ^ ": " ^ (basename cfile) >:: (fun () ->
let res = compare (strip_string test_code) (strip_string correct_code) == 0 in
assert_bool ("Func is wrong: \n\n" ^ test_code ^ "\n\n" ^ correct_code) res
assert_bool ("Func is wrong: \n\nGenerated:\n" ^ test_code ^
"\n\nExpected:\n" ^ correct_code) res
)
let tests suite_name test_file_name =
@ -65,4 +66,5 @@ let unittest =
tests "structs" "test_struct" @
tests "casting" "test_cast" @
tests "conditionals" "test_conditional" @
tests "vars" "test_var" @
[]