added 'system.shallow'

This commit is contained in:
Araq 2012-02-09 20:13:36 +01:00
commit fb35b855d5
9 changed files with 85 additions and 68 deletions

View file

@ -411,7 +411,9 @@ var
proc newFileInfo(fullPath, projPath: string): TFileInfo =
result.fullPath = fullPath
shallow(result.fullPath)
result.projPath = projPath
shallow(result.projPath)
proc fileInfoIdx*(filename: string): int32 =
var
@ -420,6 +422,7 @@ proc fileInfoIdx*(filename: string): int32 =
try:
canon = canonicalizePath(filename)
shallow(canon)
except:
canon = filename
# The compiler uses "filenames" such as `command line` or `stdin`