aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/Unblock.ml
diff options
context:
space:
mode:
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 71d800c3..32e09399 100644
--- a/cparser/Unblock.ml
+++ b/cparser/Unblock.ml
@@ -300,7 +300,7 @@ let rec unblock_stmt env ctx ploc s =
if s.sloc <> s1.sloc then
add_lineno ctx ploc s.sloc (unblock_stmt env ctx s.sloc s1)
else
- unblock_stmt env cts ploc s1 in
+ unblock_stmt env ctx ploc s1 in
{s with sdesc = Slabeled(lbl, s1')}
| Sgoto lbl ->
add_lineno ctx ploc s.sloc s