compilation cache: slurped files are a dependency too

compiler/rodwrite.nim

@@ -578,9 +578,9 @@ proc myOpen(module: PSym, filename: string): PPassContext =
   result = w
 
 proc myClose(c: PPassContext, n: PNode): PNode = 
+  result = process(c, n)
   var w = PRodWriter(c)
   writeRod(w)
-  result = n
   idgen.saveMaxIds(options.projectPath / options.projectName)
 
 proc rodwritePass(): TPass = 

compiler/sem.nim

@@ -205,6 +205,12 @@ proc myClose(context: PPassContext, n: PNode): PNode =
   else:
     InternalError(n.info, "n is not nil") #result := n;
   addCodeForGenerics(c, result)
+  # we produce a fake include statement for every slurped filename, so that
+  # the module dependencies are accurate:
+  var ics = newNode(nkIncludeStmt)
+  for s in items(c.slurpedFiles): ics.add(newStrNode(nkStrLit, s))
+  result.add(ics)
+  
   checkThreads(c)
   popOwner()
   popProcCon(c)

compiler/semdata.nim

@@ -70,6 +70,7 @@ type
     filename*: string         # the module's filename
     userPragmas*: TStrTable
     evalContext*: PEvalContext
+    slurpedFiles*: seq[string]
   
 var
   gGenericsCache: PGenericsCache # save for modularity
@@ -150,6 +151,7 @@ proc newContext(module: PSym, nimfile: string): PContext =
   result.filename = nimfile
   result.includedFiles = initIntSet()
   initStrTable(result.userPragmas)
+  result.slurpedFiles = @[]
   if optSymbolFiles notin gGlobalOptions:
     # re-usage of generic instantiations across module boundaries is
     # very nice for code size:

compiler/semexprs.nim

@@ -947,10 +947,12 @@ proc semSlurp(c: PContext, n: PNode, flags: TExprFlags): PNode =
   if sonsLen(n) == 2:
     var a = expectStringArg(c, n, 0)
     try:
-      var content = readFile(a.strVal.FindFile)
+      var filename = a.strVal.FindFile
+      var content = readFile(filename)
       result = newStrNode(nkStrLit, content)
       result.typ = getSysType(tyString)
       result.info = n.info
+      c.slurpedFiles.add(filename)
     except EIO:
       GlobalError(a.info, errCannotOpenFile, a.strVal)
   else: