diff options
Diffstat (limited to 'x86')
| -rw-r--r-- | x86/AsmToJSON.ml | 4 | ||||
| -rw-r--r-- | x86/AsmToJSON.mli | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/x86/AsmToJSON.ml b/x86/AsmToJSON.ml index 3214491f..ca18999a 100644 --- a/x86/AsmToJSON.ml +++ b/x86/AsmToJSON.ml @@ -13,5 +13,5 @@ (* Simple functions to serialize ia32 Asm to JSON *) (* Dummy function *) -let p_program oc prog = - () +let pp_program pp prog = + Format.fprintf pp "null" diff --git a/x86/AsmToJSON.mli b/x86/AsmToJSON.mli index 20bcba5e..e4d9c39a 100644 --- a/x86/AsmToJSON.mli +++ b/x86/AsmToJSON.mli @@ -10,4 +10,4 @@ (* *) (* *********************************************************************) -val p_program: out_channel -> (Asm.coq_function AST.fundef, 'a) AST.program -> unit +val pp_program: Format.formatter -> (Asm.coq_function AST.fundef, 'a) AST.program -> unit |