diff options
| author | Son Ho | 2022-01-06 10:10:33 +0100 |
|---|---|---|
| committer | Son Ho | 2022-01-06 10:10:33 +0100 |
| commit | 6179fed42a11365c753aee55470bb69dc780e1ba (patch) | |
| tree | 422ad872c9599f812a64045a4b0a667554292f69 /src/Substitute.ml | |
| parent | 5ba37ac224892a4c52cf8ab97c2352c217c27270 (diff) | |
Implement statement_has_loops and make minor modifications
Diffstat (limited to 'src/Substitute.ml')
| -rw-r--r-- | src/Substitute.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Substitute.ml b/src/Substitute.ml index d3c3c430..1b6003bb 100644 --- a/src/Substitute.ml +++ b/src/Substitute.ml @@ -52,7 +52,6 @@ let fresh_regions_with_substs (region_vars : T.region_var list) let ctx, fresh_region_ids = List.fold_left_map (fun ctx _ -> C.fresh_region_id ctx) ctx region_vars in - let fresh_regions = List.map (fun rid -> T.Var rid) fresh_region_ids in (* Generate the map from region var ids to regions *) let ls = List.combine region_vars fresh_region_ids in let rid_map = |