aboutsummaryrefslogtreecommitdiffstats
path: root/arm/AsmToJSON.ml
diff options
context:
space:
mode:
Diffstat (limited to 'arm/AsmToJSON.ml')
-rw-r--r--arm/AsmToJSON.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/arm/AsmToJSON.ml b/arm/AsmToJSON.ml
index 49cca929..22adc44c 100644
--- a/arm/AsmToJSON.ml
+++ b/arm/AsmToJSON.ml
@@ -310,7 +310,7 @@ let print_if prog sourcename =
| None -> ()
| Some f ->
let f = Filename.concat !sdump_folder f in
- let oc = open_out f in
+ let oc = open_out_bin f in
JsonAST.pp_ast (Format.formatter_of_out_channel oc) pp_instructions prog sourcename;
close_out oc