diff options
author | Jacques-Henri Jourdan <jacques-henri.jourdan@inria.fr> | 2015-11-04 14:54:04 +0100 |
---|---|---|
committer | Jacques-Henri Jourdan <jacques-henri.jourdan@inria.fr> | 2015-11-04 14:54:04 +0100 |
commit | 15e6fc9861641d03ac32ae9ac03b9a6fa68036e9 (patch) | |
tree | 58fd757a04d32cb8f230175a96e1912020663e93 | |
parent | 6d9ac9af098f546cf9a6a0adfbd6a20ee5e8281e (diff) | |
parent | 8b24bf0f0fe164e39a2f5ca81e7c0214723b2be3 (diff) | |
download | compcert-15e6fc9861641d03ac32ae9ac03b9a6fa68036e9.tar.gz compcert-15e6fc9861641d03ac32ae9ac03b9a6fa68036e9.zip |
Merge remote-tracking branch 'origin/master' into parser_fix
-rw-r--r-- | powerpc/AsmToJSON.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/powerpc/AsmToJSON.ml b/powerpc/AsmToJSON.ml index 9735966c..80fce39e 100644 --- a/powerpc/AsmToJSON.ml +++ b/powerpc/AsmToJSON.ml @@ -130,8 +130,6 @@ let p_crbit oc c = let p_label oc l = fprintf oc "{\"Label\":%ld}" (P.to_int32 l) -let p_char_list oc l = fprintf oc "{\"String\":\"%a\"}" (fun oc -> List.iter (output_char oc)) l - let p_list elem oc l = match l with | [] -> fprintf oc "[]" |