diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 20:35:02 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 20:35:02 +0000 |
commit | 6e8d25a6954b00e1ff40976d95c8289cfa9fcca4 (patch) | |
tree | 524a6cdf3bb04e0ed9cb97b5d66777972e336c07 /libguile/debug.c | |
parent | 1006486ec27336ea25ece6e5d97a2dbefbfe79e3 (diff) | |
download | guile-6e8d25a6954b00e1ff40976d95c8289cfa9fcca4.tar.gz |
* *.c: Finish replacing K&R style prototypes with ANSI C
prototypes.
* eval.c: Make scm_m_mody's 3rd argument be a const char *, not a
char *. ANSI prototypes caught this.
* strorder.c: Use GUILE_PROC1 for the couple SCM_PROC1 expansions
that I missed.
* scm_validate.h: Use SCM_BOOLP for validating bools. Do not
expand macros if SCM_DOCSTRING_SNARF.
Diffstat (limited to 'libguile/debug.c')
-rw-r--r-- | libguile/debug.c | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/libguile/debug.c b/libguile/debug.c index 5259b4cec..c8da85171 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -522,10 +522,7 @@ scm_reverse_lookup (SCM env, SCM data) } SCM -scm_start_stack (id, exp, env) - SCM id; - SCM exp; - SCM env; +scm_start_stack (SCM id, SCM exp, SCM env) { SCM answer; scm_debug_frame vframe; @@ -543,9 +540,7 @@ scm_start_stack (id, exp, env) SCM_SYNTAX(s_start_stack, "start-stack", scm_makacro, scm_m_start_stack); static SCM -scm_m_start_stack (exp, env) - SCM exp; - SCM env; +scm_m_start_stack (SCM exp, SCM env) { exp = SCM_CDR (exp); SCM_ASSERT (SCM_NIMP (exp) |