[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