From 604d4dd95c55db5ff174189cc356708b3e3d9d21 Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Thu, 10 Jul 1997 05:26:17 +0000 Subject: [PATCH] * read.c (recsexpr): Give this a dummy definition if DEBUG_EXTENSIONS isn't #defined. --- libguile/read.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/libguile/read.c b/libguile/read.c index db5742f71..c45c91388 100644 --- a/libguile/read.c +++ b/libguile/read.c @@ -184,7 +184,9 @@ scm_casei_streq (s1, s2) /* recsexpr is used when recording expressions * constructed by read:sharp. */ - +#ifndef DEBUG_EXTENSIONS +#define recsexpr(obj, line, column, filename) (obj) +#else static SCM recsexpr SCM_P ((SCM obj, int line, int column, SCM filename)); static SCM @@ -236,7 +238,7 @@ recsexpr (obj, line, column, filename) return obj; } } - +#endif /* Consume an SCSH-style block comment. Assume that we've already read the initial `#!', and eat characters until we get a