File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -186,7 +186,7 @@ let parse_id_table_node (json : Yojson.Safe.t) :
186
186
in
187
187
(table, value)
188
188
189
- let load_table (check_version : bool ) : Yojson.Safe.t =
189
+ let load_table ? (check_version = true ) : Yojson.Safe.t =
190
190
let table, json =
191
191
Hax_io. read_json () |> Option. value_exn |> parse_id_table_node
192
192
in
@@ -212,7 +212,7 @@ Please reinstall hax.
212
212
json
213
213
214
214
let parse_options () =
215
- let json = load_table true in
215
+ let json = load_table ~ check_version : true in
216
216
let options = [%of_yojson : Types. engine_options ] json in
217
217
Profiling. enabled := options .backend .profile ;
218
218
options
@@ -258,7 +258,7 @@ module ExportFStarAst = Export_ast.Make (Fstar_backend.InputLanguage)
258
258
let driver_for_rust_engine () : unit =
259
259
let query : Rust_engine_types. query =
260
260
(* TODO: support for table * )
261
- (* let json = load_table false in *)
261
+ (* let json = load_table ~check_version: false in *)
262
262
let json = Hax_io. read_json () |> Option. value_exn in
263
263
[%of_yojson : Rust_engine_types. query ] json
264
264
in
You can’t perform that action at this time.
0 commit comments