Merge branch 'master' into newparser

This commit is contained in:
Araq 2013-05-07 18:44:24 +02:00
commit 9fc98cefda
18 changed files with 196 additions and 69 deletions

View file

@ -526,13 +526,17 @@ proc SuggestWriteln*(s: string) =
else:
Writeln(stdout, s)
stdoutSocket.send(s & "\c\L")
proc SuggestQuit*() =
if not isServing: quit(0)
elif not isNil(stdoutSocket):
stdoutSocket.send("\c\L")
if not isServing:
quit(0)
elif isWorkingWithDirtyBuffer:
# No need to compile the rest if we are working with a
# throw-away buffer. Incomplete dot expressions frequently
# found in dirty buffers will result in errors few steps
# from now anyway.
raise newException(ESuggestDone, "suggest done")
# this format is understood by many text editors: it is the same that
# Borland and Freepascal use
const
@ -606,6 +610,7 @@ proc `??`* (info: TLineInfo, filename: string): bool =
result = filename in info.toFilename
var checkPoints*: seq[TLineInfo] = @[]
var optTrackPos*: TLineInfo
proc addCheckpoint*(info: TLineInfo) =
checkPoints.add(info)