--recursivePath may handle dots correctly now

This commit is contained in:
Araq
2011-01-29 14:44:53 +01:00
parent 36accda8aa
commit c9f4ad0613
2 changed files with 5 additions and 3 deletions

View File

@@ -279,8 +279,10 @@ proc addPath(path: string, info: TLineInfo) =
lists.PrependStr(options.searchPaths, path)
proc addPathRec(dir: string, info: TLineInfo) =
var pos = dir.len-1
if dir[pos] == '/': inc(pos)
for k,p in os.walkDir(dir):
if k == pcDir and '.' notin p:
if k == pcDir and p[pos] != '.':
addPathRec(p, info)
if not contains(options.searchPaths, p):
liMessage(info, hintPath, p)

View File

@@ -2,8 +2,6 @@
add --deadlock_prevention:on|off switch
- built-in serialization
- ban ``nil`` from the AST. This might also fix bugs concerning macros.
- we need a way to disable tests
- deprecate ^ and make it available as operator
- test branch coverage
@@ -68,6 +66,8 @@ Low priority
- fast assignment optimization for TPeg
- better error messages for used keywords as identifiers
- case statement branches should support constant sets
- ban ``nil`` from the AST. This might also fix bugs concerning macros.
Library
-------