Mercurial > octave

diff liboctave/cruft/misc/f77-fcn.h @ 22410:bc38c1ff6698

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix definition of F77_RETURN for gfortran * f77-fcn.h (F77_RETURN) [F77_USES_GFORTRAN_CALLING_CONVENTION]: Fix definition to match F77_RET_T == void.
author John W. Eaton <jwe@octave.org>
date Wed, 31 Aug 2016 14:37:33 -0400
parents 4caa7b28d183
children 3a2b891d0b33 e9a0469dedd9
line wrap: on
line diff
--- a/liboctave/cruft/misc/f77-fcn.h	Tue Aug 30 21:56:38 2016 -0700
+++ b/liboctave/cruft/misc/f77-fcn.h	Wed Aug 31 14:37:33 2016 -0400
@@ -282,7 +282,7 @@
 
 #define F77_RET_T void
 
-#define F77_RETURN(retval) return retval;
+#define F77_RETURN(retval) return;
 #if defined (HAVE_OCTAVE_NORETURN_ATTR)
 #  define F77_NORETURN(retval)
 #else