diff --git a/libguile/ChangeLog b/libguile/ChangeLog index 278f26b90..f9cfd9b97 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,5 +1,6 @@ 2002-07-10 Gary Houston + * eq.c: include * dynl.c: docstring editing. 2002-07-09 Gary Houston diff --git a/libguile/eq.c b/libguile/eq.c index 5dc73b6ed..bac72d051 100644 --- a/libguile/eq.c +++ b/libguile/eq.c @@ -39,8 +39,8 @@ * whether to permit this exception to apply to your modifications. * If you do not wish that, delete this exception notice. */ - + #include "libguile/_scm.h" #include "libguile/ramap.h" #include "libguile/stackchk.h" @@ -54,6 +54,12 @@ #include "libguile/validate.h" #include "libguile/eq.h" + +#ifdef HAVE_STRING_H +#include +#endif + + SCM_DEFINE1 (scm_eq_p, "eq?", scm_tc7_rpsubr, (SCM x, SCM y), "Return @code{#t} iff @var{x} references the same object as @var{y}.\n"