diff options
| -rw-r--r-- | src/ExtractToFStar.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ExtractToFStar.ml b/src/ExtractToFStar.ml index 8b7ac244..06f82ac4 100644 --- a/src/ExtractToFStar.ml +++ b/src/ExtractToFStar.ml @@ -856,7 +856,7 @@ let extract_global (ctx : extraction_ctx) (fmt : F.formatter) (** [inside]: see [extract_ty]. - As an pattern can introduce new variables, we return an extraction context + As a pattern can introduce new variables, we return an extraction context updated with new bindings. *) let rec extract_typed_pattern (ctx : extraction_ctx) (fmt : F.formatter) |