[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