aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/Cflow.ml
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2018-09-03 14:55:13 +0200
committerXavier Leroy <xavier.leroy@inria.fr>2018-09-03 14:55:34 +0200
commit9f71a6f054dfa0c9942e28114ea29e6527678289 (patch)
tree43e51a4594dec96bea3c6c7592a57749b1192732 /cparser/Cflow.ml
parent3389bd5b2b7875243738afeb28109bfc5a5a853d (diff)
downloadcompcert-kvx-9f71a6f054dfa0c9942e28114ea29e6527678289.tar.gz
compcert-kvx-9f71a6f054dfa0c9942e28114ea29e6527678289.zip
Typo in comment
Diffstat (limited to 'cparser/Cflow.ml')
-rw-r--r--cparser/Cflow.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Cflow.ml b/cparser/Cflow.ml
index c7236ce8..cc257189 100644
--- a/cparser/Cflow.ml
+++ b/cparser/Cflow.ml
@@ -135,7 +135,7 @@ let catch_continue (s: flow) : flow = fun i ->
let o = s i in
{ o with onormal = o.onormal || o.ocontinue; ocontinue = false}
-(* Convert "continue" into "fallthrough". Typically applied to a loop. *)
+(* Convert "break" into "fallthrough". Typically applied to a loop. *)
let catch_break (s: flow) : flow = fun i ->
let o = s i in