diff options
author | Xavier Leroy <xavier.leroy@college-de-france.fr> | 2019-05-31 11:55:57 +0200 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@college-de-france.fr> | 2019-05-31 12:00:37 +0200 |
commit | 8b0724fdb1af4f89a603f7bde4b5b625c870e111 (patch) | |
tree | 728c79a8ed3f2d99a24d181f712665f3a80fbd23 /debug | |
parent | e10555313645cf3c35f244f42afa5a03fba2bac1 (diff) | |
download | compcert-8b0724fdb1af4f89a603f7bde4b5b625c870e111.tar.gz compcert-8b0724fdb1af4f89a603f7bde4b5b625c870e111.zip |
Fix misspellings in messages, man pages, and comments
This is a manual, partial merge of Github pull request #296 by @Fourchaux.
flocq/, cparser/MenhirLib/ and parts of test/ have not been changed
because these are local copies and the fixes should be performed upstream.
Diffstat (limited to 'debug')
-rw-r--r-- | debug/DebugInformation.ml | 4 | ||||
-rw-r--r-- | debug/DwarfPrinter.ml | 2 | ||||
-rw-r--r-- | debug/Dwarfgen.ml | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/debug/DebugInformation.ml b/debug/DebugInformation.ml index 21c2ad19..3498a779 100644 --- a/debug/DebugInformation.ml +++ b/debug/DebugInformation.ml @@ -223,7 +223,7 @@ let name_to_definition: (string,int) Hashtbl.t = Hashtbl.create 7 (* Mapping from atom to debug id *) let atom_to_definition: (atom, int) Hashtbl.t = Hashtbl.create 7 -(* Various lookup functions for defintions *) +(* Various lookup functions for definitions *) let find_gvar_stamp id = let id = (Hashtbl.find stamp_to_definition id) in let var = Hashtbl.find definitions id in @@ -342,7 +342,7 @@ let insert_global_declaration env dec = replace_var id ({var with gvar_declaration = false;}) end end else begin - (* Implict declarations need special handling *) + (* Implicit declarations need special handling *) let id' = try Hashtbl.find name_to_definition id.name with Not_found -> let id' = next_id () in Hashtbl.add name_to_definition id.name id';id' in diff --git a/debug/DwarfPrinter.ml b/debug/DwarfPrinter.ml index c5df5637..bbfcf311 100644 --- a/debug/DwarfPrinter.ml +++ b/debug/DwarfPrinter.ml @@ -241,7 +241,7 @@ module DwarfPrinter(Target: DWARF_TARGET): let abbrev = !curr_abbrev in incr curr_abbrev;abbrev - (* Mapping from abbreviation string to abbreviaton id *) + (* Mapping from abbreviation string to abbreviation id *) let abbrev_mapping: (string,int) Hashtbl.t = Hashtbl.create 7 (* Mapping from abbreviation range id to label *) diff --git a/debug/Dwarfgen.ml b/debug/Dwarfgen.ml index 0004e901..e1b71f13 100644 --- a/debug/Dwarfgen.ml +++ b/debug/Dwarfgen.ml @@ -595,7 +595,7 @@ let string_table: (string,int) Hashtbl.t = Hashtbl.create 7 let gnu_string_entry s = if (String.length s < 4 && Configuration.system <> "macosx") (* macosx needs debug_str *) - || Configuration.system = "cygwin" then (*Cygwin does not use the debug_str seciton*) + || Configuration.system = "cygwin" then (*Cygwin does not use the debug_str section*) Simple_string s else try |