--- api/alsa/src/Clib/bglalsa.h.orig	2020-05-12 00:35:36.000000000 -0600
+++ api/alsa/src/Clib/bglalsa.h	2020-10-19 13:45:47.282624580 -0600
@@ -13,7 +13,7 @@
 
 #include <bigloo.h>
 
-extern int bgl_alsa_error( char *, char *, obj_t );
+extern int bgl_alsa_error( char *, char *, obj_t ) __attribute__((noreturn));
 
 extern int bgl_snd_pcm_close( obj_t );
 extern int bgl_snd_pcm_open( obj_t, char *, snd_pcm_stream_t, int );
--- runtime/Clib/capply.c.orig	2020-05-12 00:35:36.000000000 -0600
+++ runtime/Clib/capply.c	2020-10-19 13:45:09.670642185 -0600
@@ -13,7 +13,7 @@
 /*---------------------------------------------------------------------*/
 /*    Les recuperations externes                                       */
 /*---------------------------------------------------------------------*/
-extern void c_error();
+extern void c_error( char *, char *, int ) __attribute__((noreturn));
 extern long bgl_list_length( obj_t );
 
 /*---------------------------------------------------------------------*/
--- runtime/Clib/cmain.c.orig	2020-05-12 00:35:36.000000000 -0600
+++ runtime/Clib/cmain.c	2020-10-19 13:45:09.670642185 -0600
@@ -40,7 +40,7 @@ extern void cref();
 extern void memshow();
 extern void bgl_init_eval_cnst();
 extern obj_t c_constant_string_to_string( char * );
-extern void c_error( char *, char *, int );
+extern void c_error( char *, char *, int ) __attribute__((noreturn));
 extern void bgl_init_objects();
 extern obj_t bigloo_exit_apply( obj_t );
 extern void *bgl_callcc_get_top_of_stack( void * );
--- runtime/Clib/csocket.c.orig	2020-05-12 00:35:36.000000000 -0600
+++ runtime/Clib/csocket.c	2020-10-19 13:45:09.672642184 -0600
@@ -254,7 +254,7 @@ bgl_init_socket() {
 /*    static void                                                      */
 /*    socket_error ...                                                 */
 /*---------------------------------------------------------------------*/
-static void
+static void __attribute__((noreturn))
 socket_error( const char *who, const char *message, obj_t object ) {
    C_SYSTEM_FAILURE( BGL_IO_ERROR, (char *)who, (char *)message, object );
 }
@@ -263,7 +263,7 @@ socket_error( const char *who, const cha
 /*    static void                                                      */
 /*    socket_timeout_error ...                                         */
 /*---------------------------------------------------------------------*/
-static void
+static void __attribute__((noreturn))
 socket_timeout_error( obj_t hostname, int port ) {
    char buffer[ 512 ];
    
--- runtime/Include/bigloo.h.orig	2020-05-12 00:35:36.000000000 -0600
+++ runtime/Include/bigloo.h	2020-10-19 13:45:09.673642183 -0600
@@ -2307,7 +2307,7 @@ BGL_RUNTIME_DECL obj_t (*bgl_multithread
 /*---------------------------------------------------------------------*/
 /*    The external declarations                                        */
 /*---------------------------------------------------------------------*/
-BGL_RUNTIME_DECL obj_t bigloo_exit( obj_t );
+BGL_RUNTIME_DECL obj_t bigloo_exit( obj_t ) __attribute__((noreturn));
 
 BGL_RUNTIME_DECL obj_t va_generic_entry( obj_t, ... );
 BGL_RUNTIME_DECL obj_t opt_generic_entry( obj_t, ... );