Extract compiler into its own repo

This commit is contained in:
2023-01-01 14:53:18 -08:00
parent 7951fcc494
commit 1961e545c0
365 changed files with 7 additions and 23440 deletions

View File

@@ -1,19 +0,0 @@
data List a = { Nil, Cons a (List a) }
defn sum l = {
case l of {
Nil -> { 0 }
Cons x xs -> { x + sum xs}
}
}
defn map f l = {
case l of {
Nil -> { Nil }
Cons x xs -> { Cons (f x) (map f xs) }
}
}
defn main = {
sum (map \x -> { x * x } (map (\x -> { x + x }) (Cons 1 (Cons 2 (Cons 3 Nil)))))
}