From 9992b2e1f147eb69395877527b78dfb4520fa8ca Mon Sep 17 00:00:00 2001
From: Dave Love <d.love@dl.ac.uk>
Date: Tue, 17 Feb 1998 23:52:39 +0000
Subject: [PATCH] u77-test.f: Tweak some o/p.

        * libU77/u77-test.f: Tweak some o/p.
        * libU77/Makefile.in (check): Use -L for new directory structure.
        * Makefile.in (check): Run the u77 check.
        (config.status, Makefile): New targets.

From-SVN: r18059
---
 libf2c/ChangeLog.egcs     | 9 +++++++++
 libf2c/Makefile.in        | 9 ++++++++-
 libf2c/libU77/Makefile.in | 2 +-
 libf2c/libU77/u77-test.f  | 4 ++--
 4 files changed, 20 insertions(+), 4 deletions(-)

diff --git a/libf2c/ChangeLog.egcs b/libf2c/ChangeLog.egcs
index a92c00b9cd1..3c0bcb1342d 100644
--- a/libf2c/ChangeLog.egcs
+++ b/libf2c/ChangeLog.egcs
@@ -1,3 +1,12 @@
+1998-02-17  Dave Love  <d.love@dl.ac.uk>
+
+	* libU77/u77-test.f: Tweak some o/p.
+
+	* libU77/Makefile.in (check): Use -L for new directory structure.
+
+	* Makefile.in (check): Run the u77 check.
+	(config.status,	Makefile): New targets.
+
 Wed Feb 11 01:46:20 1998  Manfred Hollstein <manfred@s-direktnet.de>
 
 	* Makefile.in ($(lib)): Call $(AR) repeatedly to avoid overflowing
diff --git a/libf2c/Makefile.in b/libf2c/Makefile.in
index 2a5ecb960cb..aee66384761 100644
--- a/libf2c/Makefile.in
+++ b/libf2c/Makefile.in
@@ -192,10 +192,17 @@ ${srcdir}/configure: ${srcdir}/configure.in
 	rm -f config.cache && cd ${srcdir} && autoconf && rm -f config.cache
 ${srcdir}/libU77/configure: ${srcdir}/libU77/configure.in
 	rm -f libU77/config.cache && cd ${srcdir}/libU77 && autoconf && rm -f config.cache
+f2c.h Makefile: $(srcdir)/Makefile.in config.status
+	$(SHELL) config.status
+config.status: $(srcdir)/configure
+	$(SHELL) config.status --recheck
 
 f2c.h: $(srcdir)/f2c.h.in
 
-info install-info clean-info check dvi:
+info install-info clean-info dvi:
+
+check:
+	cd libU77; $(MAKE) G77DIR=../../../gcc/ check
 
 install:
 	$(INSTALL_DATA) $(lib) $(libdir)/$(lib).n
diff --git a/libf2c/libU77/Makefile.in b/libf2c/libU77/Makefile.in
index bb101710d0c..12d175ac681 100644
--- a/libf2c/libU77/Makefile.in
+++ b/libf2c/libU77/Makefile.in
@@ -82,7 +82,7 @@ distclean realclean maintainer-clean: clean
 $(OBJS): $(F2C_H) config.h
 
 check:
-	-$(G77DIR)g77 -B$(G77DIR) -g $(srcdir)/u77-test.f $(lib) && ./a.out
+	-$(G77DIR)g77 -B$(G77DIR) -L.. -g $(srcdir)/u77-test.f $(lib) && ./a.out
 	rm -f a.out
 
 access_.o: access_.c
diff --git a/libf2c/libU77/u77-test.f b/libf2c/libU77/u77-test.f
index 11c5ecae449..fd82dad97cb 100644
--- a/libf2c/libU77/u77-test.f
+++ b/libf2c/libU77/u77-test.f
@@ -66,7 +66,7 @@
       r1= etime (tarray1)
       if (r1.ne.tarray1(1)+tarray1(2))
      +     write (6,*) '*** ETIME didn''t return sum of the array: ',
-     +     r1, ' /= ', tarray1
+     +     r1, ' /= ', tarray1(1), '+', tarray1(2)
       r2= dtime (tarray2)
       if (abs (r1-r2).gt.1.0) write (6,*)
      +     'Results of ETIME and DTIME differ by more than a second:',
@@ -79,7 +79,7 @@
       write (6,*) 'IDATE d,m,y: ',idat
       print *,  '... and the VXT version: ', i,j,k
       call time(line(:8))
-      print *, line(:8)
+      print *, 'TIME: ', line(:8)
       write (6,*) 'SECNDS(0.0) returns: ',secnds(0.0)
       write (6,*) 'SECOND returns: ', second()
       call dumdum(r1)