pure-lang-svn

[pure-lang-svn] SF.net SVN: pure-lang: [219] pure/trunk/pure.cc

[<ag...@us...>]

Revision: 219
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=219&view=rev
Author:   agraef
Date:     2008-06-14 00:30:09 -0700 (Sat, 14 Jun 2008)

Log Message:
-----------
Fix up help message.

Modified Paths:
--------------
    pure/trunk/pure.cc

Modified: pure/trunk/pure.cc
===================================================================
--- pure/trunk/pure.cc	2008-06-14 07:29:03 UTC (rev 218)
+++ pure/trunk/pure.cc	2008-06-14 07:30:09 UTC (rev 219)
@@ -30,7 +30,7 @@
 
 #define COPYRIGHT "Copyright (c) 2008 by Albert Graef"
 #define USAGE \
-"Usage: pure [-h] [-i] [-n] [-v[level]] [script ...] [-- args ...]\n\
+"Usage: pure [-h] [-i] [-n] [-q] [-v[level]] [script ...] [-- args ...]\n\
 -h: Print this message and exit.\n\
 -i: Force interactive mode (read commands from stdin).\n\
 -n: Suppress automatic inclusion of the prelude.\n\


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

[pure-lang-svn] SF.net SVN: pure-lang: [223] pure/trunk/pure.cc

[<ag...@us...>]

Revision: 223
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=223&view=rev
Author:   agraef
Date:     2008-06-14 01:30:10 -0700 (Sat, 14 Jun 2008)

Log Message:
-----------
Check that a script is specified with -x.

Modified Paths:
--------------
    pure/trunk/pure.cc

Modified: pure/trunk/pure.cc
===================================================================
--- pure/trunk/pure.cc	2008-06-14 08:24:02 UTC (rev 222)
+++ pure/trunk/pure.cc	2008-06-14 08:30:10 UTC (rev 223)
@@ -253,6 +253,9 @@
       if (*++argv) {
 	if (count++ == 0) interp.modname = *argv;
 	interp.run(*argv);
+      } else {
+	interp.error(prog + ": missing script name");
+	return 1;
       }
       break;
     } else if (*argv == string("--"))


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

[pure-lang-svn] SF.net SVN: pure-lang: [224] pure/trunk/pure.cc

[<ag...@us...>]

Revision: 224
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=224&view=rev
Author:   agraef
Date:     2008-06-14 01:52:48 -0700 (Sat, 14 Jun 2008)

Log Message:
-----------
-x script becomes main script of the application, even if other scripts are specified on the command line.

Modified Paths:
--------------
    pure/trunk/pure.cc

Modified: pure/trunk/pure.cc
===================================================================
--- pure/trunk/pure.cc	2008-06-14 08:30:10 UTC (rev 223)
+++ pure/trunk/pure.cc	2008-06-14 08:52:48 UTC (rev 224)
@@ -251,7 +251,7 @@
       interp.verbose = level;
     } else if (*argv == string("-x")) {
       if (*++argv) {
-	if (count++ == 0) interp.modname = *argv;
+	count++; interp.modname = *argv;
 	interp.run(*argv);
       } else {
 	interp.error(prog + ": missing script name");


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

[pure-lang-svn] SF.net SVN: pure-lang: [231] pure/trunk/pure.cc

[<ag...@us...>]

Revision: 231
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=231&view=rev
Author:   agraef
Date:     2008-06-14 12:37:36 -0700 (Sat, 14 Jun 2008)

Log Message:
-----------
Add missing static qualifier.

Modified Paths:
--------------
    pure/trunk/pure.cc

Modified: pure/trunk/pure.cc
===================================================================
--- pure/trunk/pure.cc	2008-06-14 11:43:06 UTC (rev 230)
+++ pure/trunk/pure.cc	2008-06-14 19:37:36 UTC (rev 231)
@@ -46,7 +46,7 @@
 PURE_STACK: Maximum stack size in kilobytes (default: 0 = unlimited).\n"
 #define LICENSE "This program is free software distributed under the GNU Public License\n(GPL V3 or later). Please see the COPYING file for details.\n"
 
-const char *commands[] = {
+static const char *commands[] = {
   "cd", "clear", "extern", "help", "infix", "infixl", "infixr", "let", "list",
   "ls", "nullary", "override", "postfix", "prefix", "pwd", "quit", "run",
   "save", "stats", "underride", "using", 0


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.