diff options
author | Dave Love <d.love@dl.ac.uk> | 1998-02-17 23:52:39 +0000 |
---|---|---|
committer | Jeff Law <law@gcc.gnu.org> | 1998-02-17 16:52:39 -0700 |
commit | 9992b2e1f147eb69395877527b78dfb4520fa8ca (patch) | |
tree | 7f8b912d34a5d35b03e3fb600f671e053e4f895c | |
parent | 2fde567ecee0858733c5cd0d28fceefb1906e9d3 (diff) | |
download | gcc-9992b2e1f147eb69395877527b78dfb4520fa8ca.zip gcc-9992b2e1f147eb69395877527b78dfb4520fa8ca.tar.gz gcc-9992b2e1f147eb69395877527b78dfb4520fa8ca.tar.bz2 |
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
-rw-r--r-- | libf2c/ChangeLog.egcs | 9 | ||||
-rw-r--r-- | libf2c/Makefile.in | 9 | ||||
-rw-r--r-- | libf2c/libU77/Makefile.in | 2 | ||||
-rw-r--r-- | libf2c/libU77/u77-test.f | 4 |
4 files changed, 20 insertions, 4 deletions
diff --git a/libf2c/ChangeLog.egcs b/libf2c/ChangeLog.egcs index a92c00b..3c0bcb1 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 2a5ecb9..aee6638 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 bb10171..12d175a 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 11c5eca..fd82dad 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) |