Don't remove extension of source files twice, if filenames contain dots

This commit is contained in:
Jörg Wollenschläger 2018-06-26 20:08:40 +09:00
commit 7e89f9a09a
2 changed files with 2 additions and 2 deletions

View file

@ -466,7 +466,7 @@ proc processCompile(c: PContext, n: PNode) =
else:
found = findFile(c.config, s)
if found.len == 0: found = s
let obj = toObjFile(c.config, completeCFilePath(c.config, changeFileExt(found, ""), false))
let obj = toObjFile(c.config, completeCFilePath(c.config, found, false))
docompile(c, it, found, obj)
proc processCommonLink(c: PContext, n: PNode, feature: TLinkFeature) =