aniva/Pantograph
aniva
/
Pantograph
1
1
Fork 0
Code Issues 10 Pull Requests 1 Packages Projects Releases 1 Wiki Activity

feat: Capture environment in drafting #113

Merged
aniva merged 3 commits from frontend/environment into dev 2024-10-12 16:59:41 -07:00
Conversation 1 Commits 3 Files Changed 2 +2 -2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 5a2ae880f4 - Show all commits

4
Repl.lean
View File

@ -233,9 +233,9 @@ def execute (command: Protocol.Command): MainM Lean.Json := do
else else
[] []
let messages ← step.messageStrings let messages ← step.messageStrings
return (boundary, invocations?, sorrys, messages) return (step.before, boundary, invocations?, sorrys, messages)
let li ← frontendM.run context |>.run' state let li ← frontendM.run context |>.run' state
let units ← li.mapM λ (boundary, invocations?, sorrys, messages) => do let units ← li.mapM λ (env, boundary, invocations?, sorrys, messages) => Lean.withEnv env do
let (goalStateId?, goals) ← if sorrys.isEmpty then do let (goalStateId?, goals) ← if sorrys.isEmpty then do
pure (.none, #[]) pure (.none, #[])
else do else do