Change noreturn to NORETURN.

The noreturn macro is respelled to harmonize with the
upper-case INLINE and NOINLINE.

* lib.h (noreturn): Rename to NORETURN.

* arith.c (not_number, not_integer, invalid_ops, invalid_op):
Declaration updated.

* arith.c (do_mp_error): Likewise.

* eval.c (eval_error, no_bindable_error, dotted_form_error):
Likewise.

* eval.h (eval_error): Likewise.

* lib.c (unsup_obj, callerror, wrongargs): Likewise.

* match.c (sem_error): Likewise.

* stream.c (unimpl, unimpl_put_string, unimpl_put_char,
unimpl_put_byte, unimpl_get_line, unimpl_get_char,
unimpl_get_byte, unimpl_unget_char, unimpl_unget_byte,
unimpl_put_buf, unimpl_fill_buf, unimpl_seek, unimpl_truncate,
unimpl_get_sock_family, unimpl_get_sock_type,
unimpl_get_sock_peer, unimpl_set_sock_peer): Likewise.

* struct.c (no_such_struct, no_such_slot,
no_such_static_slot): Likewise.

* unwind.h (jmp_restore, uw_throw, uw_throwf, uw_errorf,
uw_errorfv, type_mismatch): Likewise.

1 files changed, 17 insertions, 17 deletions

diff --git a/stream.c b/stream.c
index bd22a5e5..659052bf 100644
--- a/stream.c
+++ b/stream.c
@@ -137,59 +137,59 @@ void stream_mark_op(val stream)
   strm_base_mark(s);
 }
 
-static noreturn void unimpl(val stream, val op)
+static NORETURN void unimpl(val stream, val op)
 {
   uw_throwf(file_error_s, lit("~a: not supported by stream ~s"),
             op, stream, nao);
   abort();
 }
 
-static noreturn val unimpl_put_string(val stream, val str)
+static NORETURN val unimpl_put_string(val stream, val str)
 {
   (void) str;
   unimpl(stream, lit("put-string"));
 }
 
-static noreturn val unimpl_put_char(val stream, val ch)
+static NORETURN val unimpl_put_char(val stream, val ch)
 {
   (void) ch;
   unimpl(stream, lit("put-char"));
 }
 
-static noreturn val unimpl_put_byte(val stream, int byte)
+static NORETURN val unimpl_put_byte(val stream, int byte)
 {
   (void) byte;
   unimpl(stream, lit("put-byte"));
 }
 
-static noreturn val unimpl_get_line(val stream)
+static NORETURN val unimpl_get_line(val stream)
 {
   unimpl(stream, lit("get-line"));
 }
 
-static noreturn val unimpl_get_char(val stream)
+static NORETURN val unimpl_get_char(val stream)
 {
   unimpl(stream, lit("get-char"));
 }
 
-static noreturn val unimpl_get_byte(val stream)
+static NORETURN val unimpl_get_byte(val stream)
 {
   unimpl(stream, lit("get-byte"));
 }
 
-static noreturn val unimpl_unget_char(val stream, val ch)
+static NORETURN val unimpl_unget_char(val stream, val ch)
 {
   (void) ch;
   unimpl(stream, lit("unget-char"));
 }
 
-static noreturn val unimpl_unget_byte(val stream, int byte)
+static NORETURN val unimpl_unget_byte(val stream, int byte)
 {
   (void) byte;
   unimpl(stream, lit("unget-byte"));
 }
 
-static noreturn ucnum unimpl_put_buf(val stream, mem_t *ptr, ucnum len, ucnum pos)
+static NORETURN ucnum unimpl_put_buf(val stream, mem_t *ptr, ucnum len, ucnum pos)
 {
   (void) ptr;
   (void) len;
@@ -197,7 +197,7 @@ static noreturn ucnum unimpl_put_buf(val stream, mem_t *ptr, ucnum len, ucnum po
   unimpl(stream, lit("put-buf"));
 }
 
-static noreturn ucnum unimpl_fill_buf(val stream, mem_t *ptr, ucnum len, ucnum pos)
+static NORETURN ucnum unimpl_fill_buf(val stream, mem_t *ptr, ucnum len, ucnum pos)
 {
   (void) ptr;
   (void) len;
@@ -205,35 +205,35 @@ static noreturn ucnum unimpl_fill_buf(val stream, mem_t *ptr, ucnum len, ucnum p
   unimpl(stream, lit("fill-buf"));
 }
 
-static noreturn val unimpl_seek(val stream, val off, enum strm_whence whence)
+static NORETURN val unimpl_seek(val stream, val off, enum strm_whence whence)
 {
   (void) off;
   (void) whence;
   unimpl(stream, lit("seek-stream"));
 }
 
-static noreturn val unimpl_truncate(val stream, val len)
+static NORETURN val unimpl_truncate(val stream, val len)
 {
   (void) len;
   unimpl(stream, lit("truncate-stream"));
 }
 
-static noreturn val unimpl_get_sock_family(val stream)
+static NORETURN val unimpl_get_sock_family(val stream)
 {
   unimpl(stream, lit("sock-family"));
 }
 
-static noreturn val unimpl_get_sock_type(val stream)
+static NORETURN val unimpl_get_sock_type(val stream)
 {
   unimpl(stream, lit("sock-type"));
 }
 
-static noreturn val unimpl_get_sock_peer(val stream)
+static NORETURN val unimpl_get_sock_peer(val stream)
 {
   unimpl(stream, lit("sock-peer"));
 }
 
-static noreturn val unimpl_set_sock_peer(val stream, val peer)
+static NORETURN val unimpl_set_sock_peer(val stream, val peer)
 {
   (void) peer;
   unimpl(stream, lit("sock-set-peer"));