* libU77/u77-test.f: Don't bother declaring etime. Use `implicit none' and declare mask and lenstr. Do ETIME/DTIME consistency check before loop, then use loop to verify that dtime "ticks" at some point. Check ETIME array-sum using single-precision add, to avoid spurious complaint on systems (like x86) that use more precision for intermediate results. Fix `Results of ETIME and DTIME...' message to print pertinent values (r1 and r2 instead of i and j). Change loop from 10M to 1K repeated up to 1000 times or until dtime "ticks". Print the number of 1K loops needed to see this tick. Answer a commented question. Split up a long line of output and do other prettying. Preset lognam in case GETLOG fails to overwrite it. Patch from Craig. From-SVN: r18861
Name |
Last commit
|
Last update |
---|---|---|
.. | ||
COPYING.LIB | Loading commit data... | |
Makefile.in | Loading commit data... | |
PROJECTS | Loading commit data... | |
README | Loading commit data... | |
Version.c | Loading commit data... | |
access_.c | Loading commit data... | |
acconfig.h | Loading commit data... | |
alarm_.c | Loading commit data... | |
bes.c | Loading commit data... | |
chdir_.c | Loading commit data... | |
chmod_.c | Loading commit data... | |
config.h.in | Loading commit data... | |
configure | Loading commit data... | |
configure.in | Loading commit data... | |
ctime_.c | Loading commit data... | |
date_.c | Loading commit data... | |
dbes.c | Loading commit data... | |
dtime_.c | Loading commit data... | |
etime_.c | Loading commit data... | |
fdate_.c | Loading commit data... | |
fgetc_.c | Loading commit data... | |
flush1_.c | Loading commit data... | |
fnum_.c | Loading commit data... | |
fputc_.c | Loading commit data... | |
fstat_.c | Loading commit data... | |
gerror_.c | Loading commit data... | |
getcwd_.c | Loading commit data... | |
getgid_.c | Loading commit data... | |
getlog_.c | Loading commit data... | |
getpid_.c | Loading commit data... | |
getuid_.c | Loading commit data... | |
gmtime_.c | Loading commit data... | |
hostnm_.c | Loading commit data... | |
idate_.c | Loading commit data... | |
ierrno_.c | Loading commit data... | |
irand_.c | Loading commit data... | |
isatty_.c | Loading commit data... | |
itime_.c | Loading commit data... | |
kill_.c | Loading commit data... | |
link_.c | Loading commit data... | |
lnblnk_.c | Loading commit data... | |
lstat_.c | Loading commit data... | |
ltime_.c | Loading commit data... | |
mclock_.c | Loading commit data... | |
perror_.c | Loading commit data... | |
rand_.c | Loading commit data... | |
rename_.c | Loading commit data... | |
secnds_.c | Loading commit data... | |
second_.c | Loading commit data... | |
sleep_.c | Loading commit data... | |
srand_.c | Loading commit data... | |
stat_.c | Loading commit data... | |
symlnk_.c | Loading commit data... | |
sys_clock_.c | Loading commit data... | |
system_clock_.c | Loading commit data... | |
time_.c | Loading commit data... | |
ttynam_.c | Loading commit data... | |
u77-test.f | Loading commit data... | |
umask_.c | Loading commit data... | |
unlink_.c | Loading commit data... | |
vxtidate_.c | Loading commit data... | |
vxttime_.c | Loading commit data... |