aboutsummaryrefslogtreecommitdiffstats
path: root/powerpc/AsmToJSON.ml
diff options
context:
space:
mode:
Diffstat (limited to 'powerpc/AsmToJSON.ml')
-rw-r--r--powerpc/AsmToJSON.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/powerpc/AsmToJSON.ml b/powerpc/AsmToJSON.ml
index 48e8f766..7862aad8 100644
--- a/powerpc/AsmToJSON.ml
+++ b/powerpc/AsmToJSON.ml
@@ -34,7 +34,7 @@ let p_freg oc reg =
let p_atom oc a = p_jstring oc (extern_atom a)
-let p_atom_constant oc a = fprintf oc "{\"Atom\":%a}" p_atom a
+let p_atom_constant oc a = p_jsingle_object oc "Atom" p_atom a
let p_int oc i = fprintf oc "%ld" (camlint_of_coqint i)
let p_int64 oc i = fprintf oc "%Ld" (camlint64_of_coqint i)