mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-30 03:40:34 +02:00
Don't use the identifier 'noreturn'.
Fixes <http://bugs.gnu.org/15798>. Reported by Matt Sicker <boards@gmail.com>. * libguile/__scm.h (SCM_NORETURN): Use ((__noreturn__)) instead of ((noreturn)). * libguile/throw.h (scm_ithrow): Rename formal parameter from 'noreturn' to 'no_return'. * libguile/throw.c (scm_ithrow): Rename formal parameter from 'noreturn' to 'no_return'.
This commit is contained in:
parent
b1fe20c24c
commit
36c4044007
3 changed files with 3 additions and 3 deletions
|
@ -77,7 +77,7 @@
|
||||||
* 1) int foo (char arg) SCM_NORETURN;
|
* 1) int foo (char arg) SCM_NORETURN;
|
||||||
*/
|
*/
|
||||||
#ifdef __GNUC__
|
#ifdef __GNUC__
|
||||||
#define SCM_NORETURN __attribute__ ((noreturn))
|
#define SCM_NORETURN __attribute__ ((__noreturn__))
|
||||||
#else
|
#else
|
||||||
#define SCM_NORETURN
|
#define SCM_NORETURN
|
||||||
#endif
|
#endif
|
||||||
|
|
|
@ -436,7 +436,7 @@ scm_handle_by_throw (void *handler_data SCM_UNUSED, SCM tag, SCM args)
|
||||||
}
|
}
|
||||||
|
|
||||||
SCM
|
SCM
|
||||||
scm_ithrow (SCM key, SCM args, int noreturn SCM_UNUSED)
|
scm_ithrow (SCM key, SCM args, int no_return SCM_UNUSED)
|
||||||
{
|
{
|
||||||
return scm_throw (key, args);
|
return scm_throw (key, args);
|
||||||
}
|
}
|
||||||
|
|
|
@ -79,7 +79,7 @@ SCM_API int scm_exit_status (SCM args);
|
||||||
SCM_API SCM scm_catch_with_pre_unwind_handler (SCM tag, SCM thunk, SCM handler, SCM lazy_handler);
|
SCM_API SCM scm_catch_with_pre_unwind_handler (SCM tag, SCM thunk, SCM handler, SCM lazy_handler);
|
||||||
SCM_API SCM scm_catch (SCM tag, SCM thunk, SCM handler);
|
SCM_API SCM scm_catch (SCM tag, SCM thunk, SCM handler);
|
||||||
SCM_API SCM scm_with_throw_handler (SCM tag, SCM thunk, SCM handler);
|
SCM_API SCM scm_with_throw_handler (SCM tag, SCM thunk, SCM handler);
|
||||||
SCM_API SCM scm_ithrow (SCM key, SCM args, int noreturn);
|
SCM_API SCM scm_ithrow (SCM key, SCM args, int no_return);
|
||||||
|
|
||||||
SCM_API SCM scm_throw (SCM key, SCM args);
|
SCM_API SCM scm_throw (SCM key, SCM args);
|
||||||
SCM_INTERNAL void scm_init_throw (void);
|
SCM_INTERNAL void scm_init_throw (void);
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue