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, 7 insertions, 7 deletions

diff --git a/arith.c b/arith.c
index 1e212f43..e5d5216c 100644
--- a/arith.c
+++ b/arith.c
@@ -124,23 +124,23 @@ val num_from_buffer(mem_t *buf, int bytes)
   return normalize(n);
 }
 
-static noreturn void not_number(val self, val obj)
+static NORETURN void not_number(val self, val obj)
 {
   uw_throwf(type_error_s, lit("~a: ~s is not a number"), self, obj, nao);
 }
 
-static noreturn void not_integer(val self, val obj)
+static NORETURN void not_integer(val self, val obj)
 {
   uw_throwf(type_error_s, lit("~a: ~s is not an integer"), self, obj, nao);
 }
 
-static noreturn void invalid_ops(val self, val obj1, val obj2)
+static NORETURN void invalid_ops(val self, val obj1, val obj2)
 {
   uw_throwf(type_error_s, lit("~a: invalid operands ~s ~s"), self,
             obj1, obj2, nao);
 }
 
-static noreturn void invalid_op(val self, val obj)
+static NORETURN void invalid_op(val self, val obj)
 {
   uw_throwf(type_error_s, lit("~a: invalid operand ~s"), self, obj, nao);
 }
@@ -478,13 +478,13 @@ void do_mp_error(val self, mp_err code)
   uw_throwf(numeric_error_s, lit("~a: ~a"), self, errstr, nao);
 }
 
-static noreturn void not_struct_error(val self, val obj)
+static NORETURN void not_struct_error(val self, val obj)
 {
   uw_throwf(error_s, lit("~a: ~s isn't a structure"),
             self, obj, nao);
 }
 
-static noreturn void method_error(val self, val obj, val fun)
+static NORETURN void method_error(val self, val obj, val fun)
 {
   uw_throwf(error_s, lit("~a: object ~s lacks ~a method"),
             self, obj, fun, nao);
@@ -1108,7 +1108,7 @@ static val trunc1(val self, val num)
   invalid_op(self, num);
 }
 
-static noreturn void divzero(val self)
+static NORETURN void divzero(val self)
 {
   uw_throwf(numeric_error_s, lit("~a: division by zero"), self, nao);
 }