vars can be 'compileTime'; shallow introduced weird string aliasing bug

This commit is contained in:
Araq
2012-03-11 12:01:10 +01:00
parent ec0f982ed4
commit 1d8ff40f56
2 changed files with 3 additions and 3 deletions

View File

@@ -411,9 +411,9 @@ var
proc newFileInfo(fullPath, projPath: string): TFileInfo =
result.fullPath = fullPath
shallow(result.fullPath)
#shallow(result.fullPath)
result.projPath = projPath
shallow(result.projPath)
#shallow(result.projPath)
proc fileInfoIdx*(filename: string): int32 =
var

View File

@@ -50,7 +50,7 @@ const
wImportcpp, wImportobjc, wError}
varPragmas* = {wImportc, wExportc, wVolatile, wRegister, wThreadVar, wNodecl,
wMagic, wHeader, wDeprecated, wCompilerProc, wDynLib, wExtern,
wImportcpp, wImportobjc, wError, wNoInit}
wImportcpp, wImportobjc, wError, wNoInit, wCompileTime}
constPragmas* = {wImportc, wExportc, wHeader, wDeprecated, wMagic, wNodecl,
wExtern, wImportcpp, wImportobjc, wError}
letPragmas* = varPragmas