changeset 3950:9be12c29c7d5

[project @ 2002-05-23 03:00:00 by jwe]
author jwe
date Thu, 23 May 2002 03:00:00 +0000
parents 294f13627ee8
children e6f67a1ed814
files libcruft/ChangeLog libcruft/misc/f77-fcn.c libcruft/misc/f77-fcn.h
diffstat 3 files changed, 10 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/libcruft/ChangeLog
+++ b/libcruft/ChangeLog
@@ -1,3 +1,9 @@
+2002-05-22  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* misc/f77-fcn.c (xstopx): Return type is void, not volatile void.
+	* misc/f77-fcn.h (xstopx): Provide decl.  Add special gcc noreturn
+	attribute here.
+
 2002-05-16  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* misc/f77-fcn.h: Define F77_FCN for backward compatibility.
--- a/libcruft/misc/f77-fcn.c
+++ b/libcruft/misc/f77-fcn.c
@@ -43,7 +43,7 @@
    called us.  Then the calling function should do whatever cleanup
    is necessary.  */
 
-volatile void
+void
 F77_FUNC (xstopx, XSTOPX) (const char *s, long int slen)
 {
   /* Skip printing message if it is just a single blank character.  */
--- a/libcruft/misc/f77-fcn.h
+++ b/libcruft/misc/f77-fcn.h
@@ -75,6 +75,9 @@
 
 extern void copy_f77_context (void *, void *, unsigned int);
 
+extern void
+F77_FUNC (xstopx, XSTOPX) (const char *s, long int slen) GCC_ATTR_NORETURN;
+
 #if !defined (F77_FCN)
 #define F77_FCN(f, F) F77_FUNC (f, F)
 #endif