include now accepts collective arguments
This commit is contained in:
parent
7a66616d74
commit
9aa783624d
1 changed files with 23 additions and 7 deletions
|
|
@ -1836,17 +1836,33 @@ proc semMacroDef(c: PContext, n: PNode): PNode =
|
||||||
if n.sons[bodyPos].kind == nkEmpty:
|
if n.sons[bodyPos].kind == nkEmpty:
|
||||||
localError(c.config, n.info, errImplOfXexpected % s.name.s)
|
localError(c.config, n.info, errImplOfXexpected % s.name.s)
|
||||||
|
|
||||||
|
proc incMod(c: PContext, n: PNode, it: PNode, includeStmtResult: PNode) =
|
||||||
|
var f = checkModuleName(c.config, it)
|
||||||
|
if f != InvalidFileIDX:
|
||||||
|
if containsOrIncl(c.includedFiles, f.int):
|
||||||
|
localError(c.config, n.info, errRecursiveDependencyX % toFilename(c.config, f))
|
||||||
|
else:
|
||||||
|
addSon(includeStmtResult, semStmt(c, c.graph.includeFileCallback(c.graph, c.module, f), {}))
|
||||||
|
excl(c.includedFiles, f.int)
|
||||||
|
|
||||||
proc evalInclude(c: PContext, n: PNode): PNode =
|
proc evalInclude(c: PContext, n: PNode): PNode =
|
||||||
result = newNodeI(nkStmtList, n.info)
|
result = newNodeI(nkStmtList, n.info)
|
||||||
addSon(result, n)
|
addSon(result, n)
|
||||||
for i in countup(0, sonsLen(n) - 1):
|
for i in countup(0, sonsLen(n) - 1):
|
||||||
var f = checkModuleName(c.config, n.sons[i])
|
var imp: PNode
|
||||||
if f != InvalidFileIDX:
|
let it = n.sons[i]
|
||||||
if containsOrIncl(c.includedFiles, f.int):
|
if it.kind == nkInfix and it.len == 3 and it[2].kind == nkBracket:
|
||||||
localError(c.config, n.info, errRecursiveDependencyX % toFilename(c.config, f))
|
let sep = it[0]
|
||||||
else:
|
let dir = it[1]
|
||||||
addSon(result, semStmt(c, c.graph.includeFileCallback(c.graph, c.module, f), {}))
|
imp = newNodeI(nkInfix, it.info)
|
||||||
excl(c.includedFiles, f.int)
|
imp.add sep
|
||||||
|
imp.add dir
|
||||||
|
imp.add sep # dummy entry, replaced in the loop
|
||||||
|
for x in it[2]:
|
||||||
|
imp.sons[2] = x
|
||||||
|
incMod(c, n, imp, result)
|
||||||
|
else:
|
||||||
|
incMod(c, n, it, result)
|
||||||
|
|
||||||
proc setLine(n: PNode, info: TLineInfo) =
|
proc setLine(n: PNode, info: TLineInfo) =
|
||||||
for i in 0 ..< safeLen(n): setLine(n.sons[i], info)
|
for i in 0 ..< safeLen(n): setLine(n.sons[i], info)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue