Checkpoint some stuff so I can rollback the rest.

This commit is contained in:
2023-09-30 06:40:54 -07:00
parent 1f2afb279e
commit 349115d055
4 changed files with 83 additions and 8 deletions

View File

@@ -252,3 +252,17 @@ parseMod = do
decls <- startBlock $ someSame $ parseDecl
pure $ MkModule name [] decls
public export
data ReplCmd =
Def Decl
| Norm Raw -- or just name?
| Check Raw
-- Eventually I'd like immediate actions in the file, like lean, but I
-- also want to REPL to work and we can do that first.
export parseRepl : Parser ReplCmd
parseRepl = Def <$> parseDecl <|> Norm <$ keyword "#nf" <*> typeExpr
<|> Check <$ keyword "#check" <*> typeExpr