diff options
| author | dos-reis <gdr@axiomatics.org> | 2012-10-11 01:15:49 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2012-10-11 01:15:49 +0000 |
| commit | c3a353c9dfe6cd2f30f3bf52caa4a7fc0f86cc74 (patch) | |
| tree | 629774b5de0e0cde1162a21e585aad4eb68d3a39 /src | |
| parent | 5c915a0a3337a1ef5b2902fc8e66d45f18899eed (diff) | |
| download | open-axiom-c3a353c9dfe6cd2f30f3bf52caa4a7fc0f86cc74.tar.gz | |
2012-10-10 Igor Pashev <pashev.igor@gmail.com>
Andrey G, Grozin <A.G.Grozin@inp.nsk.su>
Gabriel Dos Reis <gdr@cs.tamu.edu>
* config/open-axiom.m4 (OPENAXIOM_LISP_FLAGS): Inhibit system-wide
or user-supplied initialization files.
src/ChangeLog
2012-10-10 Igor Pashev <pashev.igor@gmail.com>
Andrey G, Grozin <A.G.Grozin@inp.nsk.su>
Gabriel Dos Reis <gdr@cs.tamu.edu>
* utils/command.cc (build_rts_options) [sbcl_runtime]: Inhibit
system-wide and user-supplied initialization files.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/utils/command.cc | 6 |
2 files changed, 11 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index a8720025..8f0f6282 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,10 @@ +2012-10-10 Igor Pashev <pashev.igor@gmail.com> + Andrey G, Grozin <A.G.Grozin@inp.nsk.su> + Gabriel Dos Reis <gdr@cs.tamu.edu> + + * utils/command.cc (build_rts_options) [sbcl_runtime]: Inhibit + system-wide and user-supplied initialization files. + 2012-08-26 Gabriel Dos Reis <gdr@cs.tamu.edu> * hyper/hthits.c (splitpage): Revert unintended change from last diff --git a/src/utils/command.cc b/src/utils/command.cc index 6821a3e0..58218c70 100644 --- a/src/utils/command.cc +++ b/src/utils/command.cc @@ -214,11 +214,13 @@ build_rts_options(Command* command, Driver driver) break; case sbcl_runtime: - command->rt_args.allocate(4); + command->rt_args.allocate(6); command->rt_args[0] = (char*) "--noinform"; command->rt_args[1] = (char*) "--end-runtime-options"; command->rt_args[2] = (char*) "--noprint"; - command->rt_args[3] = (char*) "--end-toplevel-options"; + command->rt_args[3] = (char*) "--no-sysinit"; + command->rt_args[4] = (char*) "--no-userinit"; + command->rt_args[5] = (char*) "--end-toplevel-options"; break; case clozure_runtime: |