docgen understands and ignores *when false*

This commit is contained in:
Araq 2010-11-18 22:26:20 +01:00
commit adf13aaea3
18 changed files with 1194 additions and 79 deletions

View file

@ -84,6 +84,7 @@ proc initConfigData(c: var TConfigData) =
c.vars = newStringTable(modeStyleInsensitive)
proc skipRoot(f: string): string =
# "abc/def/xyz" --> "def/xyz"
var i = 0
result = ""
for component in split(f, {dirsep, altsep}):

View file

@ -39,7 +39,7 @@ proc destroy(widget: PWidget, data: pgpointer){.cdecl.} =
proc FileOpenClicked(menuitem: PMenuItem, userdata: pgpointer) {.cdecl.} =
var path = ChooseFileToOpen(w)
if path != "":
var file: string = readFile(path)
var file = readFile(path)
if file != nil:
set_text(InputTextBuffer, file, len(file))
else: