diff options
| author | Malte Voos <git@mal.tc> | 2024-02-20 12:48:36 +0100 |
|---|---|---|
| committer | Malte Voos <git@mal.tc> | 2024-02-20 12:48:36 +0100 |
| commit | 5252fe93e5e7ef77888c06c97de4e350dce90448 (patch) | |
| tree | da057c49ece07e6fd80ec55ad59fbf337162063a /lib/Domain.ml | |
| parent | 407a2a4a0a440c41adc19fbe8b67283b7b7c65ab (diff) | |
| download | toytt-5252fe93e5e7ef77888c06c97de4e350dce90448.tar.gz toytt-5252fe93e5e7ef77888c06c97de4e350dce90448.zip | |
nbe: quotation
Diffstat (limited to 'lib/Domain.ml')
| -rw-r--r-- | lib/Domain.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Domain.ml b/lib/Domain.ml index cf07a4b..88560c2 100644 --- a/lib/Domain.ml +++ b/lib/Domain.ml @@ -25,3 +25,7 @@ and frame = and env = value bwd and clos = Clos of { body : Syntax.tm; env : env } + +type cell = { tm : value; tp : value } + +let var i = Neutral (Var i, Bwd.Emp) |