blob: 1b2f7458f6149668a764da4376b4709f7e627d90 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
(* *********************************************************************)
(* *)
(* The Compcert verified compiler *)
(* *)
(* Bernhard Schommer, AbsInt Angewandte Informatik GmbH *)
(* *)
(* AbsInt Angewandte Informatik GmbH. All rights reserved. This file *)
(* is distributed under the terms of the INRIA Non-Commercial *)
(* License Agreement. *)
(* *)
(* *********************************************************************)
(* Simple functions to serialize RISC-V Asm to JSON *)
(* Dummy function *)
let pp_program pp prog =
Format.fprintf pp "null"
let pp_mnemonics pp = ()
|