cvsuser 03/03/11 14:12:09
Modified: . ChangeLog Configure.pl
Log:
2003-03-11 22:06 chip
* Configure.pl: print help on non-option command line args
Revision Changes Path
1.5 +6 -2 parrot/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /cvs/public/parrot/ChangeLog,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -w -r1.4 -r1.5
--- ChangeLog 19 Dec 2002 07:39:43 -0000 1.4
+++ ChangeLog 11 Mar 2003 22:12:09 -0000 1.5
@@ -1,3 +1,7 @@
+2003-03-11 22:06 chip
+
+ * Configure.pl: print help on non-option command line args
+
2002-12-18 20:38 sfink: changes since 0.0.8
- Allow suppression of cgoto core to save memory during compile
@@ -3339,9 +3343,9 @@
2002-01-04 16:09 dan
* classes/: genclass.pl, perlarray.pmc, perlint.pmc, perlnum.pmc,
- perlstring.pmc, perlundef.pmc: - genclass.pl attempts to put $Id: ChangeLog,v
1.4 2002/12/19 07:39:43 sfink Exp $
+ perlstring.pmc, perlundef.pmc: - genclass.pl attempts to put $Id: ChangeLog,v
1.5 2003/03/11 22:12:09 chip Exp $
into generated files
- but the $Id: ChangeLog,v 1.4 2002/12/19 07:39:43 sfink Exp $ string gets
mangled when it's committed.
+ but the $Id: ChangeLog,v 1.5 2003/03/11 22:12:09 chip Exp $ string gets
mangled when it's committed.
This patch fixes the existing .pmc files and fixes genclass.pl.
- Makes capitalization in .pmc header match actual filenames
1.122 +4 -3 parrot/Configure.pl
Index: Configure.pl
===================================================================
RCS file: /cvs/public/parrot/Configure.pl,v
retrieving revision 1.121
retrieving revision 1.122
diff -u -w -r1.121 -r1.122
--- Configure.pl 4 Jan 2003 17:54:20 -0000 1.121
+++ Configure.pl 11 Mar 2003 22:12:09 -0000 1.122
@@ -2,7 +2,7 @@
#
# Configure.pl 2.0
#
-# $Id: Configure.pl,v 1.121 2003/01/04 17:54:20 leo Exp $
+# $Id: Configure.pl,v 1.122 2003/03/11 22:12:09 chip Exp $
#
# Author: Brent Dax
#
@@ -25,11 +25,12 @@
for(@ARGV) {
my($key, $value)=/--(\w+)(?:=(.*))?/;
+ $key = 'help' unless defined $key;
$value = 1 unless defined $value;
for($key) {
/version/ && do {
- my $cvsid='$Id: Configure.pl,v 1.121 2003/01/04 17:54:20 leo Exp $';
+ my $cvsid='$Id: Configure.pl,v 1.122 2003/03/11 22:12:09 chip Exp $';
print <<"END";
Parrot Version $parrot_version Configure 2.0
$cvsid
