[Openmcl-cvs-notifications] r14729 - /trunk/source/lisp-kernel/pmcl-kernel.c
gb at clozure.com
gb at clozure.com
Mon Apr 25 03:26:42 CDT 2011
Author: gb
Date: Mon Apr 25 03:26:40 2011
New Revision: 14729
Log:
Mention the "--" convention in the help message.
Modified:
trunk/source/lisp-kernel/pmcl-kernel.c
Modified: trunk/source/lisp-kernel/pmcl-kernel.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/pmcl-kernel.c (original)
+++ trunk/source/lisp-kernel/pmcl-kernel.c Mon Apr 25 03:26:40 2011
@@ -1103,6 +1103,10 @@
fprintf(dbgout, "\t and <image-name> defaults to %s\n", =
default_image_name(program_name));
#endif
+ fprintf(dbgout, "\n\tAny arguments following the pseudoargument \"--\" a=
re\n");
+ fprintf(dbgout, "\tnot processed and are available to the application as=
\n");
+ fprintf(dbgout, "\tthe value of CCL:*UNPROCESSED-COMMAND-LINE-ARGUMENTS*=
.\n");
+
fprintf(dbgout, "\n");
_exit(exit_status);
}
More information about the Openmcl-cvs-notifications
mailing list