u77-test.f (wd): Allow for longer working directory pathnames.

* gcc/testsuite/g77.f-torture/execute/u77-test.f (wd): Allow for longer
working directory pathnames.
* libf2c/libU77/u77-test.f (wd): Allow for longer working directory
pathnames.

From-SVN: r30551

gcc/testsuite/ChangeLog

+1999-11-16  Geoffrey Keating  <geoffk@cygnus.com>
+
+	* g77.f-torture/execute/u77-test.f (wd): Allow for longer
+	working directory pathnames.
+
 1999-11-08  Nick Clifton  <nickc@cygnus.com>
 
 	* lib/gcc-dg.exp: Include target-supports.exp

gcc/testsuite/g77.f-torture/execute/u77-test.f

@@ -55,8 +55,8 @@
       integer lenstr
       logical l
       character gerr*80, c*1
-      character ctim*25, line*80, lognam*20, wd*100, line2*80, ddate*8,
-     +     ttime*10, zone*5, ctim2*25
+      character ctim*25, line*80, lognam*20, wd*1000, line2*80, 
+     +     ddate*8, ttime*10, zone*5, ctim2*25
       integer fstatb (13), statb (13)
       integer *2 i2zero
       integer values(8)

libf2c/ChangeLog

+Tue Nov 16 20:39:42 1999  Geoffrey Keating  <geoffk@cygnus.com>
+
+	* libU77/u77-test.f (wd): Allow for longer working directory
+ 	pathnames.
+
 1999-10-14 Theo Papadopoulo  <Theodore.Papadopoulo@sophia.inria.fr>
 
 	* libU77/acconfig.h: Define GETTIMEOFDAY_ONE_ARGUMENT and

libf2c/libU77/u77-test.f

@@ -58,8 +58,8 @@
       integer lenstr
       logical l
       character gerr*80, c*1
-      character ctim*25, line*80, lognam*20, wd*100, line2*80, ddate*8,
-     +     ttime*10, zone*5, ctim2*25
+      character ctim*25, line*80, lognam*20, wd*1000, line2*80,
+     +     ddate*8, ttime*10, zone*5, ctim2*25
       integer fstatb (13), statb (13)
       integer *2 i2zero
       integer values(8)