summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/pairs.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/pairs.c b/libguile/pairs.c
index e137feaba..b595bdf47 100644
--- a/libguile/pairs.c
+++ b/libguile/pairs.c
@@ -101,7 +101,7 @@ scm_set_car_x (pair, value)
SCM_ASSERT (SCM_NIMP (pair) && SCM_CONSP (pair),
pair, SCM_ARG1, s_set_car_x);
SCM_SETCAR (pair, value);
- return value;
+ return SCM_UNSPECIFIED;
}
SCM_PROC (s_set_cdr_x, "set-cdr!", 2, 0, 0, scm_set_cdr_x);
@@ -113,7 +113,7 @@ scm_set_cdr_x (pair, value)
{
SCM_ASSERT (SCM_NIMP(pair) && SCM_CONSP (pair), pair, SCM_ARG1, s_set_cdr_x);
SCM_SETCDR (pair, value);
- return value;
+ return SCM_UNSPECIFIED;
}