summaryrefslogtreecommitdiff
path: root/libguile/backtrace.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:25:37 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:25:37 +0000
commit3b3b36ddb7dfbd5094abee360c253c8f1216dcdd (patch)
treebe6f18ee784818de032ac23e77470b67e260ffef /libguile/backtrace.c
parentcbaee92a8b6d8abba6bd236d089a7e6c3cf471b3 (diff)
downloadguile-3b3b36ddb7dfbd5094abee360c253c8f1216dcdd.tar.gz
* *.[ch]: Whitespace changes -- added space after SCM_VALIDATE_*
macros and SCM_DEFINE macros to match GNU coding standards.
Diffstat (limited to 'libguile/backtrace.c')
-rw-r--r--libguile/backtrace.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/libguile/backtrace.c b/libguile/backtrace.c
index 7819bed31..8640b3753 100644
--- a/libguile/backtrace.c
+++ b/libguile/backtrace.c
@@ -246,7 +246,7 @@ display_error_handler (struct display_error_handler_data *data,
return SCM_UNSPECIFIED;
}
-SCM_DEFINE(scm_display_error, "display-error", 6, 0, 0,
+SCM_DEFINE (scm_display_error, "display-error", 6, 0, 0,
(SCM stack, SCM port, SCM subr, SCM message, SCM args, SCM rest),
"")
#define FUNC_NAME s_scm_display_error
@@ -283,7 +283,7 @@ static print_params_t default_print_params[] = {
static print_params_t *print_params = default_print_params;
#ifdef GUILE_DEBUG
-SCM_DEFINE(scm_set_print_params_x, "set-print-params!", 1, 0, 0,
+SCM_DEFINE (scm_set_print_params_x, "set-print-params!", 1, 0, 0,
(SCM params),
"")
#define FUNC_NAME s_scm_set_print_params_x
@@ -385,20 +385,20 @@ display_application (SCM frame,int indentation,SCM sport,SCM port,scm_print_stat
pstate);
}
-SCM_DEFINE(scm_display_application, "display-application", 1, 2, 0,
+SCM_DEFINE (scm_display_application, "display-application", 1, 2, 0,
(SCM frame, SCM port, SCM indent),
"")
#define FUNC_NAME s_scm_display_application
{
- SCM_VALIDATE_FRAME(1,frame);
+ SCM_VALIDATE_FRAME (1,frame);
if (SCM_UNBNDP (port))
port = scm_cur_outp;
else
- SCM_VALIDATE_OPOUTPORT(2,port);
+ SCM_VALIDATE_OPOUTPORT (2,port);
if (SCM_UNBNDP (indent))
indent = SCM_INUM0;
else
- SCM_VALIDATE_INUM(3,indent);
+ SCM_VALIDATE_INUM (3,indent);
if (SCM_FRAME_PROC_P (frame))
/* Display an application. */
@@ -599,7 +599,7 @@ display_backtrace_body(struct display_backtrace_args *a)
}
#undef FUNC_NAME
-SCM_DEFINE(scm_display_backtrace, "display-backtrace", 2, 2, 0,
+SCM_DEFINE (scm_display_backtrace, "display-backtrace", 2, 2, 0,
(SCM stack, SCM port, SCM first, SCM depth),
"")
#define FUNC_NAME s_scm_display_backtrace
@@ -621,7 +621,7 @@ SCM_DEFINE(scm_display_backtrace, "display-backtrace", 2, 2, 0,
SCM_VCELL (scm_has_shown_backtrace_hint_p_var, "has-shown-backtrace-hint?");
-SCM_DEFINE(scm_backtrace, "backtrace", 0, 0, 0,
+SCM_DEFINE (scm_backtrace, "backtrace", 0, 0, 0,
(),
"")
#define FUNC_NAME s_scm_backtrace