X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fruntime.c;h=039dac65f1aca777022b74a42a3f2cd57748a562;hb=dc5e3163fe667e2629c7769aa8cf2e501eeeefa6;hp=cfc7cd1dabd63d4e5a1bc2262ee00b187c1e3cf8;hpb=ad1aa2961d81ed8db9dac59068c6861199c29a3a;p=sbcl.git

diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c
index cfc7cd1..039dac6 100644
--- a/src/runtime/runtime.c
+++ b/src/runtime/runtime.c
@@ -220,7 +220,7 @@ main(int argc, char *argv[], char *envp[])
 
     if (!noinform) {
 	printf(
-"This is SBCL " SBCL_VERSION_STRING ", an implementation of ANSI Common Lisp.\n\
+"This is SBCL %s, an implementation of ANSI Common Lisp.\n\
 \n\
 SBCL is derived from the CMU CL system created at Carnegie Mellon University.\n\
 Besides software and documentation originally created at Carnegie Mellon\n\
@@ -238,7 +238,7 @@ used under BSD-style licenses allowing copying only under certain conditions.\n\
 See the COPYING file in the distribution for more information.\n\
 \n\
 More information about SBCL is available at <http://sbcl.sourceforge.net/>.\n\
-");
+", SBCL_VERSION_STRING);
 	fflush(stdout);
     }
 
@@ -254,11 +254,6 @@ More information about SBCL is available at <http://sbcl.sourceforge.net/>.\n\
 
     set_lossage_handler(monitor_or_something);
 
-#if 0
-    os_init();
-    gc_init();
-    validate();
-#endif
     globals_init();
 
     initial_function = load_core_file(core);
@@ -276,9 +271,6 @@ More information about SBCL is available at <http://sbcl.sourceforge.net/>.\n\
 #ifdef BINDING_STACK_POINTER
     SetSymbolValue(BINDING_STACK_POINTER, BINDING_STACK_START);
 #endif
-#if defined INTERNAL_GC_TRIGGER && !defined __i386__
-    SetSymbolValue(INTERNAL_GC_TRIGGER, make_fixnum(-1));
-#endif
 
     interrupt_init();