fixes #5, also cleaned up extccomp a bit.

This commit is contained in:
dom96 2011-01-06 20:51:01 +00:00
commit df86dc5874
2 changed files with 40 additions and 55 deletions

View file

@ -305,7 +305,7 @@ proc processCompile(c: PContext, n: PNode) =
proc processCommonLink(c: PContext, n: PNode, feature: TLinkFeature) =
var f = expectStrLit(c, n)
if splitFile(f).ext == "": f = toObjFile(f)
if splitFile(f).ext == "": f = addFileExt(f, cc[ccompiler].objExt)
var found = findFile(f)
if found == "": found = f # use the default
case feature