summaryrefslogtreecommitdiff
path: root/src/Substitute.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/Substitute.ml')
-rw-r--r--src/Substitute.ml5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Substitute.ml b/src/Substitute.ml
index 9db58812..01ce3a4e 100644
--- a/src/Substitute.ml
+++ b/src/Substitute.ml
@@ -9,7 +9,10 @@ module E = Expressions
module A = CfimAst
module C = Contexts
-(** Substitute types variables and regions in a type *)
+(** Substitute types variables and regions in a type.
+
+ TODO: we can reimplement that with visitors.
+ *)
let rec ty_substitute (rsubst : 'r1 -> 'r2)
(tsubst : T.TypeVarId.id -> 'r2 T.ty) (ty : 'r1 T.ty) : 'r2 T.ty =
let open T in