diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-10-01 14:27:35 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-10-01 14:27:35 +0200 |
| commit | 886f5550616272d899745d62ec3076fb63a71054 (patch) | |
| tree | 39f87466ddf1c3f3fa01878f26b07b77a2456a9f /debug/Debug.mli | |
| parent | 36892f59ced6dd06d6a9cfc6e8af49db8721dd65 (diff) | |
| download | compcert-kvx-886f5550616272d899745d62ec3076fb63a71054.tar.gz compcert-kvx-886f5550616272d899745d62ec3076fb63a71054.zip | |
Use also fucntion id for local variables since atom is not unique.
Diffstat (limited to 'debug/Debug.mli')
| -rw-r--r-- | debug/Debug.mli | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/debug/Debug.mli b/debug/Debug.mli index a1b4408d..e9b566a5 100644 --- a/debug/Debug.mli +++ b/debug/Debug.mli @@ -37,9 +37,9 @@ type implem = mutable add_lvar_scope: int -> ident -> int -> unit; mutable open_scope: atom -> int -> positive -> unit; mutable close_scope: atom -> int -> positive -> unit; - mutable start_live_range: atom -> positive -> int * int builtin_arg -> unit; - mutable end_live_range: atom -> positive -> unit; - mutable stack_variable: atom -> int * int builtin_arg -> unit; + mutable start_live_range: (atom * atom) -> positive -> int * int builtin_arg -> unit; + mutable end_live_range: (atom * atom) -> positive -> unit; + mutable stack_variable: (atom * atom) -> int * int builtin_arg -> unit; mutable function_end: atom -> positive -> unit; mutable add_label: atom -> positive -> int -> unit; mutable atom_parameter: ident -> ident -> atom -> unit; @@ -68,9 +68,9 @@ val enter_function_scope: int -> int -> unit val add_lvar_scope: int -> ident -> int -> unit val open_scope: atom -> int -> positive -> unit val close_scope: atom -> int -> positive -> unit -val start_live_range: atom -> positive -> (int * int builtin_arg) -> unit -val end_live_range: atom -> positive -> unit -val stack_variable: atom -> int * int builtin_arg -> unit +val start_live_range: (atom * atom) -> positive -> (int * int builtin_arg) -> unit +val end_live_range: (atom * atom) -> positive -> unit +val stack_variable: (atom * atom) -> int * int builtin_arg -> unit val function_end: atom -> positive -> unit val add_label: atom -> positive -> int -> unit val generate_debug_info: (atom -> string) -> string -> debug_entries option |