summaryrefslogtreecommitdiff
path: root/src/initial_check.ml
diff options
context:
space:
mode:
authorThomas Bauereiss2017-11-02 14:10:28 +0000
committerThomas Bauereiss2017-11-02 14:10:28 +0000
commit28d471755b0882c5c069a95e07ce6bb9352f06b9 (patch)
tree61caea55cea5c3c53b63427fc4ac04d82423d7f8 /src/initial_check.ml
parentaa35f90fe4e7da4a6bbbe1396c23f9a5795b6909 (diff)
parentf8107b6b4dc4738d57a1a0c367de72a6d811f4cb (diff)
Merge branch 'experiments'
Diffstat (limited to 'src/initial_check.ml')
-rw-r--r--src/initial_check.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/initial_check.ml b/src/initial_check.ml
index 61e352f5..b33d90f5 100644
--- a/src/initial_check.ml
+++ b/src/initial_check.ml
@@ -913,6 +913,7 @@ let initial_kind_env =
("atom", {k = K_Lam( [ {k=K_Nat} ], {k=K_Typ})});
("option", { k = K_Lam( [{k=K_Typ}], {k=K_Typ}) });
("implicit", {k = K_Lam( [{k = K_Nat}], {k=K_Typ})} );
+ ("itself", {k = K_Lam( [ {k=K_Nat} ], {k=K_Typ})});
]
let typschm_of_string order str =