fixes a regression involving the .compile and .link pragmas

This commit is contained in:
Andreas Rumpf
2016-08-05 15:14:08 +02:00
parent baeec11808
commit 9f0899da12

View File

@@ -401,7 +401,9 @@ proc relativeFile(c: PContext; n: PNode; ext=""): string =
result = parentDir(n.info.toFullPath) / s
if not fileExists(result):
if isAbsolute(s): result = s
else: result = findFile(s)
else:
result = findFile(s)
if result.len == 0: result = s
proc processCompile(c: PContext, n: PNode) =
let found = relativeFile(c, n)