changeset 12196:0564f4a755a0

fix declaration of ETIME in arpack/util/second.f
author John W. Eaton <jwe@octave.org>
date Fri, 28 Jan 2011 14:05:30 -0500
parents d25dfa9ed18b
children 9ed4018d538c
files libcruft/ChangeLog libcruft/arpack/util/second.f
diffstat 2 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/libcruft/ChangeLog
+++ b/libcruft/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-28  John W. Eaton  <jwe@octave.org>
+
+	* arpack/util/second.f (ARSCND): Declare ETIME INTRINSIC, not EXTERNAL.
+
 2011-01-28  John W. Eaton  <jwe@octave.org>
 
 	* arpack: New directory.
--- a/libcruft/arpack/util/second.f
+++ b/libcruft/arpack/util/second.f
@@ -21,7 +21,7 @@
 *     ..
 *     .. External Functions ..
       REAL               ETIME
-      EXTERNAL           ETIME
+      INTRINSIC          ETIME
 *     ..
 *     .. Executable Statements ..
 *