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`

View file

@ -15,7 +15,7 @@ const
defaultAsmMarkerSymbol* = '!'
VersionMajor* = 0
VersionMinor* = 8
VersionPatch* = 14
VersionPatch* = 15
VersionAsString* = $VersionMajor & "." & $VersionMinor & "." & $VersionPatch
RodFileVersion* = "1209" # modify this if the rod-format changes!