Mercurial > hg > octave-nkf

diff liboctave/erfc.c @ 1243:668dc3c012b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-04-11 00:30:31 by jwe]
author jwe
date Tue, 11 Apr 1995 00:37:34 +0000
parents 5972ef4972cc
children fa24599e3d2c
line wrap: on
line diff
--- a/liboctave/erfc.c
+++ b/liboctave/erfc.c
@@ -21,19 +21,19 @@
 */
 
 #ifdef HAVE_CONFIG_H
-#include "config.h"
+#include <config.h>
 #endif
 
 #ifndef HAVE_ERFC
 
 #include "f77-uscore.h"
 
-extern double F77_FCN (derfc) (double*);
+extern double F77_FCN (derfc) (const double&);
 
 double
 erfc (double x)
 {
-  return F77_FCN (derfc) (&x);
+  return F77_FCN (derfc) (x);
 }
 
 #endif