From e3ef43b906ba210ad6c0e4fc516a64f7cb91bd2f Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Mon, 1 Mar 2010 18:48:07 +0100 Subject: [PATCH] Fix some warnings about noreturn functions that actually return (M. Kocic) --- src/c/file.d | 2 +- src/h/external.h | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/c/file.d b/src/c/file.d index a326fdf4f..5bf60278b 100755 --- a/src/c/file.d +++ b/src/c/file.d @@ -90,7 +90,7 @@ static void not_an_input_stream(cl_object fn) ecl_attr_noreturn; static void not_an_output_stream(cl_object fn) ecl_attr_noreturn; static void not_a_character_stream(cl_object s) ecl_attr_noreturn; static void not_a_binary_stream(cl_object s) ecl_attr_noreturn; -static int restartable_io_error(cl_object strm) ecl_attr_noreturn; +static int restartable_io_error(cl_object strm); static void unread_error(cl_object strm); static void unread_twice(cl_object strm); static void io_error(cl_object strm) ecl_attr_noreturn; diff --git a/src/h/external.h b/src/h/external.h index 28d0389c0..8d79a228f 100755 --- a/src/h/external.h +++ b/src/h/external.h @@ -1848,7 +1848,7 @@ extern ECL_API cl_object cl_encode_universal_time _ARGS((cl_narg narg, cl_object extern ECL_API cl_object cl_get_decoded_time(); extern ECL_API cl_object cl_ensure_directories_exist _ARGS((cl_narg narg, cl_object V1, ...)); extern ECL_API cl_object si_simple_program_error _ARGS((cl_narg narg, cl_object format, ...)) ecl_attr_noreturn; -extern ECL_API cl_object si_signal_simple_error _ARGS((cl_narg narg, cl_object condition, cl_object continuable, cl_object format, cl_object args, ...)) ecl_attr_noreturn; +extern ECL_API cl_object si_signal_simple_error _ARGS((cl_narg narg, cl_object condition, cl_object continuable, cl_object format, cl_object args, ...)); /* module.lsp */