1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-15 23:50:44 +00:00
freebsd-ports/math/lapack/files/patch-ao
1999-10-13 23:06:53 +00:00

20 lines
694 B
Plaintext

--- TIMING/LIN/ctimaa.f.orig Tue Jun 22 13:55:56 1999
+++ TIMING/LIN/ctimaa.f Wed Oct 6 11:04:27 1999
@@ -168,7 +168,7 @@
$ CTIMHE, CTIMHP, CTIMHR, CTIMLQ, CTIMLS, CTIMMM,
$ CTIMMV, CTIMPB, CTIMPO, CTIMPP, CTIMPT, CTIMQ3,
$ CTIMQL, CTIMQP, CTIMQR, CTIMRQ, CTIMSP, CTIMSY,
- $ CTIMTB, CTIMTD, CTIMTP, CTIMTR
+ $ CTIMTB, CTIMTD, CTIMTP, CTIMTR, FPMCLR
* ..
* .. Intrinsic Functions ..
INTRINSIC MAX
@@ -181,6 +181,7 @@
* ..
* .. Executable Statements ..
*
+ CALL FPMCLR( )
S1 = SECOND( )
LDR1 = MAXVAL
LDR2 = MAXVAL