From 9b8f0f6c4683dd00ee0e3422b84c9cc34510011e Mon Sep 17 00:00:00 2001
From: xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>
Date: Sun, 1 Jul 2012 07:40:04 +0000
Subject: Added option -falign-functions

git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1945 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
---
 driver/Clflags.ml | 1 +
 driver/Driver.ml  | 2 ++
 2 files changed, 3 insertions(+)

(limited to 'driver')

diff --git a/driver/Clflags.ml b/driver/Clflags.ml
index 2be48de7..47336b5b 100644
--- a/driver/Clflags.ml
+++ b/driver/Clflags.ml
@@ -24,6 +24,7 @@ let option_fvararg_calls = ref true
 let option_fpacked_structs = ref false
 let option_fsse = ref true
 let option_ffloatconstprop = ref 2
+let option_falignfunctions = ref (None: int option)
 let option_dparse = ref false
 let option_dcmedium = ref false
 let option_dclight = ref false
diff --git a/driver/Driver.ml b/driver/Driver.ml
index 3d0cc162..881a895a 100644
--- a/driver/Driver.ml
+++ b/driver/Driver.ml
@@ -373,6 +373,7 @@ Code generation options: (use -fno-<opt> to turn off -f<opt>) :
   -fsmall-const <n>  Set maximal size <n> for allocation in small constant area
   -ffloat-const-prop <n>  Control constant propagation of floats
                    (<n>=0: none, <n>=1: limited, <n>=2: full; default is full)
+  -falign_functions <n>  Set alignment (in bytes) of function entry points
   -Wa,<opt>      Pass option <opt> to the assembler
 Tracing options:
   -dparse        Save C file after parsing and elaboration in <file>.parse.c
@@ -467,6 +468,7 @@ let cmdline_actions =
   "-fsmall-data$", Integer(fun n -> option_small_data := n);
   "-fsmall-const$", Integer(fun n -> option_small_const := n);
   "-ffloat-const-prop$", Integer(fun n -> option_ffloatconstprop := n);
+  "-falign-functions$", Integer(fun n -> option_falignfunctions := Some n);
   "-fall$", Self (fun _ ->
               List.iter (fun r -> r := true) language_support_options);
   "-fnone$", Self (fun _ ->
-- 
cgit