This commit is contained in:
2024-09-29 07:17:55 -07:00
parent beb7b1a623
commit 9087ee6490
27 changed files with 87 additions and 73 deletions

18
newt/Foo.newt Normal file
View File

@@ -0,0 +1,18 @@
-- foo
module Foo
id : (a : U) -> a -> a
id = \ a => \ x => x
-- if I put foo here, it fails with 'extra toks' at "module"
-- errors aren't cutting to the top
-- I think we need the errors to be fatal if anything is consumed (since the nearest alt)
List : U -> U
List = \ A => (L : U) -> L -> (A -> L -> L) -> L
nil : (A : U) -> List A
nil = \ A L n f => n
Bool : U