diff options
-rw-r--r-- | typing/btype.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/typing/btype.ml b/typing/btype.ml index 1a700b5af..0ba35671c 100644 --- a/typing/btype.ml +++ b/typing/btype.ml @@ -128,7 +128,7 @@ let iter_type_expr f ty = | Tfield (_, _, ty1, ty2) -> f ty1; f ty2 | Tnil -> () | Tlink ty -> f ty - | Tsubst ty -> assert false; f ty + | Tsubst ty -> assert false let saved_desc = ref [] (* Saved association of generic nodes with their description. *) |