[docs] docs - kwalsh modified 2 files
docs at icdevgroup.org
docs at icdevgroup.org
Fri Dec 19 00:44:08 EST 2003
User: kwalsh
Date: 2003-12-19 05:44:08 GMT
Modified: sdf/perllib/sdf table.pl
Modified: sdf/t/general/checked formats.out
Log:
* Fix to prevent the "make test" from chewing its way through 2GB
of memory and failing to compile anything on a Solaris 9 box.
* Changed one of the test comparison files to allow one of the
tests to pass. It's not fair if the control answer's wrong.
Revision Changes Path
1.2 +3 -3 docs/sdf/perllib/sdf/table.pl
rev 1.2, prev_rev 1.1
Index: table.pl
===================================================================
RCS file: /var/cvs/docs/sdf/perllib/sdf/table.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- table.pl 29 Mar 2001 20:31:46 -0000 1.1
+++ table.pl 19 Dec 2003 05:44:08 -0000 1.2
@@ -1,5 +1,5 @@
-# $Id: table.pl,v 1.1 2001/03/29 20:31:46 jon Exp $
-$VERSION{''.__FILE__} = '$Revision: 1.1 $';
+# $Id: table.pl,v 1.2 2003/12/19 05:44:08 kwalsh Exp $
+$VERSION{''.__FILE__} = '$Revision: 1.2 $';
#
# >>Title:: Table Processing Library
#
@@ -915,7 +915,7 @@
local($packfmt);
$packfmt = '';
- while ($format =~ s/\w+\s+//e) {
+ while ($format =~ s/\w+\s+//) {
$packfmt .= 'A' . length($&);
}
$packfmt .= 'A*';
1.2 +1 -1 docs/sdf/t/general/checked/formats.out
rev 1.2, prev_rev 1.1
Index: formats.out
===================================================================
RCS file: /var/cvs/docs/sdf/t/general/checked/formats.out,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- formats.out 29 Mar 2001 20:33:07 -0000 1.1
+++ formats.out 19 Dec 2003 05:44:08 -0000 1.2
@@ -2,4 +2,4 @@
__endtuning[]
N[orig_style='N']Hello World in uppercase is HELLO WORLD.
N[orig_style='N']Hello World in lowercase is hello world.
-N[orig_style='N']This file was last modified in 1999.
+N[orig_style='N']This file was last modified in 2001.
More information about the docs
mailing list