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/gh_init.c | |
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/gh_init.c')
-rw-r--r-- | libguile/gh_init.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/gh_init.c b/libguile/gh_init.c index 5dbc7daad..62b684d29 100644 --- a/libguile/gh_init.c +++ b/libguile/gh_init.c @@ -1,5 +1,5 @@ -/* Copyright (C) 1995,1996,1997, 2000 Free Software Foundation, Inc. - +/* Copyright (C) 1995,1996,1997,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 * the Free Software Foundation; either version 2, or (at your option) @@ -94,7 +94,7 @@ gh_catch (SCM tag, scm_catch_body_t body, void *body_data, } SCM -gh_standard_handler (void *data, SCM tag, SCM throw_args) +gh_standard_handler (void *data SCM_UNUSED, SCM tag, SCM throw_args SCM_UNUSED) { fprintf (stderr, "\nJust got an error; tag is\n "); scm_display (tag, scm_current_output_port ()); |