diff options
| author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-06-07 21:12:19 +0000 |
|---|---|---|
| committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-06-07 21:12:19 +0000 |
| commit | e81d98ec2d12d9101dc79928833b2c064d148afc (patch) | |
| tree | d5966566fc4c86bca904ea941bfc6a19cc464918 /libguile/error.h | |
| parent | 563058efbe03208cacb43f664c702e3979922cb6 (diff) | |
| download | guile-e81d98ec2d12d9101dc79928833b2c064d148afc.tar.gz | |
* Introduce SCM_UNUSED and mark unused function parameters.
* Introduce SCM_DEBUG_PAIR_ACCESSES.
* Extend the possibilities of SCM_DEBUG_CELL_ACCESSES.
Diffstat (limited to 'libguile/error.h')
| -rw-r--r-- | libguile/error.h | 17 |
1 files changed, 4 insertions, 13 deletions
diff --git a/libguile/error.h b/libguile/error.h index cfdc604a1..37b8ee342 100644 --- a/libguile/error.h +++ b/libguile/error.h @@ -1,8 +1,8 @@ /* classes: h_files */ -#ifndef ERRORH -#define ERRORH -/* Copyright (C) 1995,1996,1997,1998, 2000 Free Software Foundation, Inc. +#ifndef SCM_ERROR_H +#define SCM_ERROR_H +/* Copyright (C) 1995,1996,1997,1998,2000,2001 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -50,15 +50,6 @@ extern int scm_ints_disabled; -/* GCC can be told that a function doesn't return; this helps it do - better error checking (for uninitialized variable use, for - example), and some optimization. */ -#ifdef __GNUC__ -#define SCM_NORETURN __attribute__ ((noreturn)) -#else -#define SCM_NORETURN -#endif - extern void scm_error (SCM key, const char *subr, const char *message, SCM args, SCM rest) SCM_NORETURN; extern SCM scm_error_scm (SCM key, SCM subr, SCM message, @@ -91,7 +82,7 @@ extern SCM scm_wta (SCM arg, const char *pos, const char *s_subr); #endif /* SCM_DEBUG_DEPRECATED == 0 */ -#endif /* ERRORH */ +#endif /* SCM_ERROR_H */ /* Local Variables: |