letrec + typechecking core

2024-02-08 18:40:46 -07:00
parent a2b4bd2afc
commit 17058d3f8c
6 changed files with 47 additions and 24 deletions
--- a/src/Rlp/Lex.x
+++ b/src/Rlp/Lex.x
@@ -85,6 +85,7 @@ $white_no_nl+       ;
 <0>
 {
    "let"               { constToken TokenLet `thenBeginPush` layout_let }
+    "letrec"            { constToken TokenLet `thenBeginPush` layout_let }
    "of"                { constToken TokenOf `thenBeginPush` layout_of }
 }

@@ -155,6 +156,7 @@ lexReservedName = \case
    "case"      -> TokenCase
    "of"        -> TokenOf
    "let"       -> TokenLet
+    "letrec"    -> TokenLetrec
    "in"        -> TokenIn
    "infix"     -> TokenInfix
    "infixl"    -> TokenInfixL