Add command line option --bare

Allowing to start GAP without any packages
gap-system · Oct 29, 2018 · f1de3c2 · f1de3c2
1 parent ccbda3c
commit f1de3c2
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/lib/system.g b/lib/system.g
@@ -116,6 +116,8 @@ BIND_GLOBAL( "GAPInfo", rec(
            help := [ "Disable the GAP read-evaluate-print loop (REPL)" ] ),
       rec( long := "nointeract", default := false,
            help := [ "Start GAP in non-interactive mode (disable read-evaluate-print loop (REPL) and break loop)" ] ),
+      rec( long := "bare", default := false,
+           help := [ "Start GAP without loading any packages" ] ),
       ,
       rec( short:= "c", default := "", arg := "<expr>", help := [ "execute the given expression"] ),
     ],
@@ -393,6 +395,11 @@ CallAndInstallPostRestore( function()
       CommandLineOptions.norepl := true;
     fi;
 
+    if CommandLineOptions.bare then
+      CommandLineOptions.A := true;
+      GAPInfo.Dependencies := MakeImmutable(rec( NeededOtherPackages := [] ));
+    fi;
+
     MakeImmutable( CommandLineOptions );
     MakeImmutable( InitFiles );