suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Revert "Make noreturn attribute valid only for GNUC implementations"

Browse Source 
This reverts commit d033dd1ed2.
This commit is contained in:
Matthew Flatt 2019-02-17 07:09:48 -07:00
parent 0124210b0b
commit 6117d8aff4
3 changed files with 2 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
racket/src/racket/include/scheme.h
View File

@ -252,15 +252,6 @@ extern "C"
{
#endif
/* The reason we need two preprocessor variables is that, in gcc/clang the
function attribute comes after the function declaration. However,
in MSVC the function attribute comes before the function declaration. */
#ifdef __GNUC__
#define NORETURN __attribute__((__noreturn__))
#else
#define NORETURN
#endif
/* Allowed by all configurations, currently: */
#define MZ_CAN_ACCESS_THREAD_LOCAL_DIRECTLY

2
racket/src/racket/src/schemef.h
View File

@ -198,7 +198,7 @@ MZ_EXTERN Scheme_On_Atomic_Timeout_Proc scheme_set_on_atomic_timeout(Scheme_On_A
/*========================================================================*/
MZ_EXTERN void scheme_signal_error(const char *msg, ...);
MZ_EXTERN void scheme_raise_exn(int exnid, ...) NORETURN;
MZ_EXTERN void scheme_raise_exn(int exnid, ...) __attribute__ ((noreturn));
MZ_EXTERN void scheme_warning(char *msg, ...);
MZ_EXTERN void scheme_raise(Scheme_Object *exn);

2
racket/src/racket/src/schemex.h
View File

@ -139,7 +139,7 @@ Scheme_On_Atomic_Timeout_Proc (*scheme_set_on_atomic_timeout)(Scheme_On_Atomic_T
/* error handling */
/*========================================================================*/
void (*scheme_signal_error)(const char *msg, ...);
void (*scheme_raise_exn)(int exnid, ...) NORETURN;
void (*scheme_raise_exn)(int exnid, ...) __attribute__ ((noreturn));
void (*scheme_warning)(char *msg, ...);
void (*scheme_raise)(Scheme_Object *exn);
int (*scheme_log_level_p)(Scheme_Logger *logger, int level);