From 97f84ccace4e634b4e02178a702818e69292dc9f Mon Sep 17 00:00:00 2001 From: Malte Voos Date: Mon, 8 Jul 2024 22:01:42 +0200 Subject: implement top-level definitions --- src/ast/Ast.ml | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'src/ast/Ast.ml') diff --git a/src/ast/Ast.ml b/src/ast/Ast.ml index 3a6fac6..974409f 100644 --- a/src/ast/Ast.ml +++ b/src/ast/Ast.ml @@ -29,6 +29,15 @@ and raw_expr = and expr = raw_expr Asai.Range.located +type item = + | Def of { + name : ident; + tp : expr; + tm : expr; + } + +type file = item List.t + let dump_ident fmt ({ value; _ } : ident) = Ident.pp fmt value let dump_local_name fmt ({ value; _ } : local_name) = match value with -- cgit 1.4.1