aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/Unblock.ml
diff options
context:
space:
mode:
authorMichael Schmidt <github@mschmidt.me>2018-06-04 14:47:16 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2018-08-02 10:29:44 +0200
commitd13f1e243ff5ac94ecfc64f2bd81ae5d1c33bfcc (patch)
treee01d30310ccddee46fb854f7dc69e001447b91f6 /cparser/Unblock.ml
parenta2064197c9dc5578e6f0155b8d0cc9cb3eecef90 (diff)
downloadcompcert-kvx-d13f1e243ff5ac94ecfc64f2bd81ae5d1c33bfcc.tar.gz
compcert-kvx-d13f1e243ff5ac94ecfc64f2bd81ae5d1c33bfcc.zip
Various improvements in the wording of diagnostics.
Fix various typos in diagnostic messages and unified wording and capitalization. Bug 23850
Diffstat (limited to 'cparser/Unblock.ml')
-rw-r--r--cparser/Unblock.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Unblock.ml b/cparser/Unblock.ml
index 5df2e2cf..da8049a5 100644
--- a/cparser/Unblock.ml
+++ b/cparser/Unblock.ml
@@ -31,7 +31,7 @@ let rec local_initializer env path init k =
let (ty_elt, sz) =
match unroll env path.etyp with
| TArray(ty_elt, Some sz, _) -> (ty_elt, sz)
- | _ -> Diagnostics.fatal_error Diagnostics.no_loc "Wrong type for array initializer" in
+ | _ -> Diagnostics.fatal_error Diagnostics.no_loc "wrong type for array initializer" in
let rec array_init pos il =
if pos >= sz then k else begin
let (i1, il') =