diff options
| author | Matej Kosik | 2016-10-18 10:58:42 +0200 |
|---|---|---|
| committer | Matej Kosik | 2016-10-19 13:48:52 +0200 |
| commit | 7b4dbbb83e3da2fe716dacad627ddd3497653f07 (patch) | |
| tree | 2d3d81fc36bc1180e2244fa9a02b8e7ae8516d2f /plugins/extraction/common.ml | |
| parent | ad81c04a923c594b7a893f08bb5571a6db74c92a (diff) | |
CLEANUP: rename "Nameops.lift_subscript" to "Nameops.increment_subscript".
The word "increment" is more appropriate in this case than "lifting".
The world "lifting", in computer science, usually denotes something else:
https://en.wikipedia.org/wiki/Lambda_lifting
Diffstat (limited to 'plugins/extraction/common.ml')
| -rw-r--r-- | plugins/extraction/common.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/extraction/common.ml b/plugins/extraction/common.ml index 3c5f6cb720..9446cf667c 100644 --- a/plugins/extraction/common.ml +++ b/plugins/extraction/common.ml @@ -145,7 +145,7 @@ type env = Id.t list * Id.Set.t (*s Generic renaming issues for local variable names. *) let rec rename_id id avoid = - if Id.Set.mem id avoid then rename_id (lift_subscript id) avoid else id + if Id.Set.mem id avoid then rename_id (increment_subscript id) avoid else id let rec rename_vars avoid = function | [] -> |