LoadPackage("pkg") -> LoadPackageAndExposeGlobals("pkg",Main,all_globals=true)

Author: mohamed-barakat

Project.toml

@@ -1,7 +1,7 @@
 name = "HomalgProject"
 uuid = "50bd374c-87b5-11e9-015a-2febe71398bd"
 authors = ["Mohamed Barakat <[email protected]>"]
-version = "0.3.1"
+version = "0.3.2"
 
 [deps]
 GAP = "c863536a-3901-11e9-33e7-d5cd0df7b904"

docs/src/examples.md

@@ -10,8 +10,8 @@ The following examples tests the functionality of the software projects
 DocTestSetup = quote
     using HomalgProject
     GAP.Globals.SizeScreen( GAP.julia_to_gap( [ 4096 ] ) )
-    LoadPackageAndExposeGlobals( "GradedModules", Main, all_globals = true )
-    LoadPackageAndExposeGlobals( "GradedModulePresentationsForCAP", Main, all_globals = true )
+    LoadPackage( "GradedModules" )
+    LoadPackage( "GradedModulePresentationsForCAP" )
     GAP.Globals.HOMALG_IO.show_banners = false
     HomalgFieldOfRationalsInSingular = GAP.Globals.HomalgFieldOfRationalsInSingular
     LeftPresentation = GAP.Globals.LeftPresentation
@@ -47,7 +47,7 @@ end
 ```jldoctest
 julia> using HomalgProject
 
-julia> LoadPackageAndExposeGlobals( "GradedModules", Main, all_globals = true )
+julia> LoadPackage( "GradedModules" )
 
 julia> ℚ = HomalgFieldOfRationalsInSingular( )
 GAP: Q
@@ -264,7 +264,7 @@ currently represented by the above matrix
 ```jldoctest
 julia> using HomalgProject
 
-julia> LoadPackageAndExposeGlobals( "GradedModulePresentationsForCAP", Main, all_globals = true )
+julia> LoadPackage( "GradedModulePresentationsForCAP" )
 
 julia> ℚ = HomalgFieldOfRationalsInSingular( )
 GAP: Q

src/HomalgProject.jl

@@ -80,6 +80,12 @@ import Markdown
 Base.:*(x::GAP.GapObj,y::String) = x*GAP.julia_to_gap(y)
 Base.getindex(x::GAP.GapObj,y::String) = GAP.Globals.ELM_LIST(x,GAP.julia_to_gap(y))
 
+function LoadPackage( pkgname::String )
+    LoadPackageAndExposeGlobals( pkgname, Main, all_globals = true )
+end
+
+export LoadPackage
+
 function HomalgMatrix( M::String, m::Int64, n::Int64, R::GAP.GapObj )
     return GAP.Globals.HomalgMatrix( GAP.julia_to_gap( M ), m, n, R )
 end
@@ -95,7 +101,7 @@ function UseExternalSingular( bool::Bool )
 
     if bool == false
         ## LoadPackage( "RingsForHomalg" ) ## needed by the variable HOMALG_IO_Singular below
-        LoadPackageAndExposeGlobals( "RingsForHomalg", Main, all_globals = true )
+        LoadPackage( "RingsForHomalg" )
         ## Read( "LaunchCAS_JSingularInterpreterForHomalg.g" )
         path = GAP.julia_to_gap(joinpath(HOMALG_PROJECT_PATH,"src","LaunchCAS_JSingularInterpreterForHomalg.g"))
         GAP.Globals.Read(path)
@@ -113,10 +119,10 @@ function UseExternalSingular( bool::Bool )
     CompileGapPackage( "io", print_available = false )
 
     ## LoadPackage( "IO_ForHomalg" ) ## needed when reading LaunchCAS_IO_ForHomalg.g below
-    LoadPackageAndExposeGlobals( "IO_ForHomalg", Main, all_globals = true )
+    LoadPackage( "IO_ForHomalg" )
 
     ## LoadPackage( "RingsForHomalg" ) ## needed by the variable HOMALG_IO_Singular below
-    LoadPackageAndExposeGlobals( "RingsForHomalg", Main, all_globals = true )
+    LoadPackage( "RingsForHomalg" )
 
     ## add ~/.julia/.../Singular/deps/usr/lib/ to LD_LIBRARY_PATH and DYLD_LIBRARY_PATH
     lib = [ "LD_LIBRARY_PATH=" * lib * ":\$LD_LIBRARY_PATH", "DYLD_LIBRARY_PATH=" * lib * ":\$DYLD_LIBRARY_PATH" ]

test/runtests.jl

@@ -11,7 +11,7 @@ using Documenter
     @test RemovePackageFromHomalgProject( "HomalgProject.jl" )
     @test ! RemovePackageFromHomalgProject( "HomalgProject.jl" )
     @test UseExternalSingular( false )
-    LoadPackageAndExposeGlobals( "GradedModules", Main, all_globals = true )
+    LoadPackage( "GradedModules" )
     ℚ = HomalgFieldOfRationalsInSingular( )
     R = ℚ["x,y,z"]
     m = "[ x*y,y*z,z,0,0, x^3*z,x^2*z^2,0,x*z^2,-z^2, x^4,x^3*z,0,x^2*z,-x*z, 0,0,x*y,-y^2,x^2-1, 0,0,x^2*z,-x*y*z,y*z, 0,0,x^2*y-x^2,-x*y^2+x*y,y^2-y]";