Mercurial > hg > octave-lyh

diff liboctave/CmplxQR.cc @ 3887:7da18459c08b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-04-04 00:44:21 by jwe]
author jwe
date Thu, 04 Apr 2002 00:46:37 +0000
parents 69b6bd271277
children 6e86256e9c54
line wrap: on
line diff
--- a/liboctave/CmplxQR.cc
+++ b/liboctave/CmplxQR.cc
@@ -34,11 +34,11 @@
 
 extern "C"
 {
-  int F77_FCN (zgeqrf, ZGEQRF) (const int&, const int&, Complex*,
+  int F77_FUNC (zgeqrf, ZGEQRF) (const int&, const int&, Complex*,
 				const int&, Complex*, Complex*,
 				const int&, int&); 
 
-  int F77_FCN (zungqr, ZUNGQR) (const int&, const int&, const int&,
+  int F77_FUNC (zungqr, ZUNGQR) (const int&, const int&, const int&,
 				Complex*, const int&, Complex*,
 				Complex*, const int&, int&);
 }