diff options
-rw-r--r-- | src/CfimAst.ml | 2 | ||||
-rw-r--r-- | src/main.ml | 8 |
2 files changed, 7 insertions, 3 deletions
diff --git a/src/CfimAst.ml b/src/CfimAst.ml index bb821bb7..6b882edb 100644 --- a/src/CfimAst.ml +++ b/src/CfimAst.ml @@ -39,7 +39,7 @@ type statement = | Assert of assertion | Call of call | Panic - | Returna + | Return | Break of int (** Break to (outer) loop. The [int] identifies the loop to break to: * 0: break to the first outer loop (the current loop) diff --git a/src/main.ml b/src/main.ml index 3a1d56ed..fc9e4efd 100644 --- a/src/main.ml +++ b/src/main.ml @@ -17,7 +17,11 @@ type rust_module = { let () = (* let json = Yojson.Basic.from_file "../charon/charon/tests/test1.cfim" in *) - let json = Yojson.Safe.from_file "../charon/charon/tests/test1.cfim" in - match rust_module_of_yojson json with + let _json1 = Yojson.Safe.from_file "../charon/charon/tests/test1.cfim" in + let json2 = Yojson.Safe.from_file "../charon/charon/tests/test4.cfim" in + match statement_of_yojson json2 with | Error s -> Printf.printf "error: %s\n" s | Ok _ast -> print_endline "ast" +(* match rust_module_of_yojson json with + | Error s -> Printf.printf "error: %s\n" s + | Ok _ast -> print_endline "ast"*) |