summaryrefslogtreecommitdiff
path: root/driver/Driver.ml
diff options
context:
space:
mode:
Diffstat (limited to 'driver/Driver.ml')
-rw-r--r--driver/Driver.ml8
1 files changed, 6 insertions, 2 deletions
diff --git a/driver/Driver.ml b/driver/Driver.ml
index 54a9c47..ee48ffc 100644
--- a/driver/Driver.ml
+++ b/driver/Driver.ml
@@ -358,8 +358,12 @@ let cmdline_actions =
let _ =
Gc.set { (Gc.get()) with Gc.minor_heap_size = 524288 };
Cparser.Machine.config :=
- { Cparser.Machine.ilp32ll64
- with Cparser.Machine.char_signed = Configuration.signed_char };
+ begin match Configuration.arch with
+ | "powerpc" -> Cparser.Machine.ppc_32_bigendian
+ | "arm" -> Cparser.Machine.arm_littleendian
+ | "ia32" -> Cparser.Machine.x86_32
+ | _ -> assert false
+ end;
Cparser.Builtins.set C2C.builtins;
CPragmas.initialize();
parse_cmdline cmdline_actions usage_string;