Merge pull request #218 from JuliaLang/sd-include

make include well behaved

Author: SimonDanisch

src/incremental.jl

@@ -2,28 +2,27 @@
 Init basic C libraries
 """
 function InitBase()
-  """
-  Base.__init__()
-  Sys.__init__() #fix https://github.com/JuliaLang/julia/issues/30479
-  """
+    """
+    Base.__init__()
+    Sys.__init__() #fix https://github.com/JuliaLang/julia/issues/30479
+    """
 end
 
 """
 # Initialize REPL module for Docs
 """
 function InitREPL()
-  """
-  using REPL
-  Base.REPL_MODULE_REF[] = REPL
-  """
+    """
+    using REPL
+    Base.REPL_MODULE_REF[] = REPL
+    """
 end
-
 function Include(path)
-  """
-  M = Module()
-  # Include into anonymous module to not polute namespace
-  @eval(M, (Base.include(\$M, $(repr(path)))))
-  """
+    """
+    Mod = @eval module \$(gensym("anon_module")) end
+    # Include into anonymous module to not polute namespace
+    Mod.include($(repr(path)))
+    """
 end
 
 """
@@ -155,22 +154,22 @@ end
 
     Incrementally compile `package` into the current system image.
     `force = true` will replace the old system image with the new one.
-    This process requires a script that julia will run in order to determine 
-    which functions to compile. A package may define a script called `snoopfile.jl` 
+    This process requires a script that julia will run in order to determine
+    which functions to compile. A package may define a script called `snoopfile.jl`
     for this purpose. If this file cannot be found the package's test script
-    `Package/test/runtests.jl` will be used. `compile_incremental` will search 
+    `Package/test/runtests.jl` will be used. `compile_incremental` will search
     for `snoopfile.jl` in the package's root directory and in the folders
-    `Package/src` and `Package/snoop`. For a more explicit version of compile_incremental, 
+    `Package/src` and `Package/snoop`. For a more explicit version of compile_incremental,
     see: `compile_incremental(toml_path::String, snoopfile::String)`
 
     Not all packages can currently be compiled into the system image. By default,
     `compile_incremental(:Package) will also compile all of Package's dependencies.
     It can still be desirable to compile packages with dependencies that cannot be
     compiled. For this reason `compile_incremental` offers
     the ability for the user to pass a list of blacklisted packages
-    that will be ignored during the compilation process. These are passed as a 
+    that will be ignored during the compilation process. These are passed as a
     vector of package names (defined as either strings or symbols) using the
-    `blacklist keyword argument`    
+    `blacklist keyword argument`
 """
 function compile_incremental(pkg::Symbol, packages::Symbol...;
                              blacklist::Vector=[], kw...)