version 0.7.2

This commit is contained in:
Andreas Rumpf 2008-12-12 14:02:27 +01:00
commit ddaedab835
158 changed files with 34811 additions and 10001 deletions

View file

@ -1062,14 +1062,14 @@ proc cmpPaths(pathA, pathB: string): int =
result = cmpIgnoreCase(pathA, pathB)
proc extractDir(path: string): string =
if path[path.len-1] in {dirSep, altSep}:
if path.len == 0 or path[path.len-1] in {dirSep, altSep}:
result = path
else:
var tail: string
splitPath(path, result, tail)
proc extractFilename(path: string): string =
if path[path.len-1] in {dirSep, altSep}:
if path.len == 0 or path[path.len-1] in {dirSep, altSep}:
result = ""
else:
var head: string