diff options
author | Son Ho | 2022-01-18 18:03:32 +0100 |
---|---|---|
committer | Son Ho | 2022-01-18 18:03:32 +0100 |
commit | bb158d611c9138fe0c49d669807dff84dc5fba21 (patch) | |
tree | a028c47397320e1404a180f7797041e4cdc8538b | |
parent | 32eadcca12c4061bd09e36a65447123da6a4826c (diff) |
Make a minor modification
-rw-r--r-- | src/TypesUtils.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/TypesUtils.ml b/src/TypesUtils.ml index 3accb9c5..b0cd57c5 100644 --- a/src/TypesUtils.ml +++ b/src/TypesUtils.ml @@ -94,6 +94,7 @@ let rec ety_no_regions_to_rty (ty : ety) : rty = (** Check if a [ty] contains regions. TODO: rename to "has_borrows"? + TODO: update, and check the usage. *) let ty_has_regions (ty : 'r ty) : bool = let obj = @@ -107,6 +108,7 @@ let ty_has_regions (ty : 'r ty) : bool = method! visit_Ref _ _ _ _ = raise Found end in + raise Errors.Unimplemented; try obj#visit_ty () ty; false |