File tree Expand file tree Collapse file tree 1 file changed +11
-9
lines changed Expand file tree Collapse file tree 1 file changed +11
-9
lines changed Original file line number Diff line number Diff line change @@ -122,15 +122,17 @@ def sorries (trees : List InfoTree) (env? : Option Environment) (rootGoals? : Op
122
122
pure ("\n " .intercalate <| (← s.ppGoals).map fun s => s! "{ s} " , some s)
123
123
| .term _ none => unreachable!
124
124
let proofStateId ← proofState.mapM recordProofSnapshot
125
- let goalInfo : Option GoalInfo ← match proofState with
126
- | some proofState => do
127
- match proofState.tacticState.goals[0 ]? with
128
- | some goalId => do
129
- -- TODO: this does not work when it's just `sorry` instead of `by sorry` - allow printGoalInfo to return none
130
- let info ← printGoalInfo ctx goalId
131
- pure (some info)
132
- | none => pure none
133
- | none => pure none
125
+ -- let goalInfo : Option GoalInfo ← match proofState with
126
+ -- | some proofState => do
127
+ -- match proofState.tacticState.goals[ 0 ] ? with
128
+ -- | some goalId => do
129
+ -- -- TODO: this does not work when it's just `sorry` instead of `by sorry` - allow printGoalInfo to return none
130
+ -- let info ← printGoalInfo ctx goalId
131
+ -- pure (some info)
132
+ -- | none => pure none
133
+ -- | none => pure none
134
+ -- TODO
135
+ let goalInfo : Option GoalInfo := none
134
136
return Sorry.of goal goalInfo pos endPos proofStateId
135
137
136
138
def ppTactic (ctx : ContextInfo) (stx : Syntax) : IO Format :=
You can’t perform that action at this time.
0 commit comments