Mercurial > octave

changeset 25364:bbc47fb89973 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
use size_t for f77 char arg length params with GCC 8 (bug #53872) * f77-fcn.h (F77_CHAR_ARG_LEN_TYPE): Define to size_t if using GCC 8 or later.
author John W. Eaton <jwe@octave.org>
date Thu, 10 May 2018 16:16:25 -0400
parents 3d5f953e2ef6
children e875f4719718 0548e32e6b27
files liboctave/util/f77-fcn.h
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/util/f77-fcn.h	Fri May 04 13:08:39 2018 -0700
+++ b/liboctave/util/f77-fcn.h	Thu May 10 16:16:25 2018 -0400
@@ -235,7 +235,11 @@
 #define F77_CONST_CHAR_ARG2(x, l) F77_CHAR_ARG2 (x, l)
 #define F77_CXX_STRING_ARG(x) F77_CONST_CHAR_ARG2 (x.c_str (), x.length ())
 #define F77_CHAR_ARG_LEN(l) , l
-#define F77_CHAR_ARG_LEN_TYPE int
+#if defined (__GNUC__) && __GNUC__ >= 8
+#  define F77_CHAR_ARG_LEN_TYPE size_t
+#else
+#  define F77_CHAR_ARG_LEN_TYPE int
+#endif
 #define F77_CHAR_ARG_LEN_DECL , F77_CHAR_ARG_LEN_TYPE
 #define F77_CHAR_ARG_DECL char *
 #define F77_CONST_CHAR_ARG_DECL const char *