pieuvre/types.ml

12 lines
166 B
OCaml
Raw Normal View History

2024-04-15 12:07:49 +02:00
type ty_id = string
type ty =
TVar of ty_id
| Arr of ty * ty
2024-05-05 20:33:39 +02:00
| And of ty * ty
| Or of ty * ty
2024-04-15 12:07:49 +02:00
| Bot
2024-05-14 15:23:44 +02:00
| Unknown (* for Or *)
2024-04-15 12:07:49 +02:00
2024-04-16 10:07:09 +02:00
type gam = (ty_id * ty) list