about summary refs log tree commit diff
path: root/lib/Ast.ml
diff options
context:
space:
mode:
authorMalte Voos <git@mal.tc>2024-02-19 12:57:26 +0100
committerMalte Voos <git@mal.tc>2024-02-19 16:54:45 +0100
commit407a2a4a0a440c41adc19fbe8b67283b7b7c65ab (patch)
treec55ed80f1a90741e547c0b3fa102f5f709aa1836 /lib/Ast.ml
parent169ff6c0d196246e28c4413b43895ad5a377a2e5 (diff)
downloadtoytt-407a2a4a0a440c41adc19fbe8b67283b7b7c65ab.tar.gz
toytt-407a2a4a0a440c41adc19fbe8b67283b7b7c65ab.zip
core syntax, semantic domain, evaluation
Diffstat (limited to 'lib/Ast.ml')
-rw-r--r--lib/Ast.ml16
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/Ast.ml b/lib/Ast.ml
index f7c90dd..d26cc0f 100644
--- a/lib/Ast.ml
+++ b/lib/Ast.ml
@@ -6,6 +6,14 @@ and arg = raw_arg Asai.Range.located
 
 and raw_expr =
   | Var of raw_ident
+  | Pi of arg * expr
+  | Lam of ident * expr
+  | App of expr * expr
+  | Sg of arg * expr
+  | Pair of expr * expr
+  | Fst of expr
+  | Snd of expr
+  | Type
   | Bool
   | True
   | False
@@ -16,14 +24,6 @@ and raw_expr =
       false_case : expr;
       scrut : expr;
     }
-  | Pi of arg * expr
-  | Lam of ident * expr
-  | App of expr * expr
-  | Sg of arg * expr
-  | Pair of expr * expr
-  | Fst of expr
-  | Snd of expr
-  | Type
 
 and expr = raw_expr Asai.Range.located