diff options
Diffstat (limited to 'common/Sections.mli')
| -rw-r--r-- | common/Sections.mli | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/common/Sections.mli b/common/Sections.mli index 8b7c9dc..ff6c8c9 100644 --- a/common/Sections.mli +++ b/common/Sections.mli @@ -27,14 +27,19 @@ type section_name = | Section_jumptable | Section_user of string * bool (*writable*) * bool (*executable*) +type access_mode = + | Access_default + | Access_near + | Access_far + val initialize: unit -> unit val define_section: string -> ?iname:string -> ?uname:string - -> ?writable:bool -> ?executable:bool -> ?near:bool -> unit -> unit + -> ?writable:bool -> ?executable:bool -> ?access:access_mode -> unit -> unit val use_section_for: AST.ident -> string -> bool val for_variable: Env.t -> AST.ident -> C.typ -> bool -> - section_name * bool + section_name * access_mode val for_function: Env.t -> AST.ident -> C.typ -> section_name list val for_stringlit: unit -> section_name |