fix #8
This commit is contained in:
@@ -71,7 +71,7 @@ def compileProof (inputCtx : Parser.InputContext) (snap : Snapshot) (hasWidgets
|
|||||||
let pmctx := { env := cmdState.env, options := scope.opts, currNamespace := scope.currNamespace, openDecls := scope.openDecls }
|
let pmctx := { env := cmdState.env, options := scope.opts, currNamespace := scope.currNamespace, openDecls := scope.openDecls }
|
||||||
let (tacticStx, cmdParserState, msgLog, endOfWhitespace) :=
|
let (tacticStx, cmdParserState, msgLog, endOfWhitespace) :=
|
||||||
MyModule.parseTactic inputCtx pmctx snap.mpState snap.msgLog couldBeEndSnap
|
MyModule.parseTactic inputCtx pmctx snap.mpState snap.msgLog couldBeEndSnap
|
||||||
let cmdPos := tacticStx.getPos?.get!
|
let cmdPos := tacticStx.getPos?.getD 0
|
||||||
if Parser.isEOI tacticStx then
|
if Parser.isEOI tacticStx then
|
||||||
let endSnap : Snapshot := {
|
let endSnap : Snapshot := {
|
||||||
beginPos := cmdPos
|
beginPos := cmdPos
|
||||||
|
|||||||
Reference in New Issue
Block a user