diff options
Diffstat (limited to 'exportclight')
-rw-r--r-- | exportclight/Clightgen.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/exportclight/Clightgen.ml b/exportclight/Clightgen.ml index 0a586acd..7d1b0657 100644 --- a/exportclight/Clightgen.ml +++ b/exportclight/Clightgen.ml @@ -165,7 +165,9 @@ let _ = Machine.config := begin match Configuration.arch with | "powerpc" -> Machine.ppc_32_bigendian - | "arm" -> Machine.arm_littleendian + | "arm" -> if Configuration.is_big_endian + then Machine.arm_bigendian + else Machine.arm_littleendian | "ia32" -> Machine.x86_32 | _ -> assert false end; |