summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>2002-11-17 22:18:51 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>2002-11-17 22:18:51 +0000
commit4ba5f279f038a1616bf2fc8d6226f9d0b59dc790 (patch)
tree9c7000ac0ce6a70ba859c824ae0735124a21d65e
parent50a6300387840a2d9e6045b749efa74d369bfb27 (diff)
downloadguile-4ba5f279f038a1616bf2fc8d6226f9d0b59dc790.tar.gz
* debug.c (scm_make_iloc): Added missing "return".
-rw-r--r--libguile/ChangeLog4
-rw-r--r--libguile/debug.c6
2 files changed, 8 insertions, 2 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 7660414fa..d87f85e97 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,7 @@
+2002-11-17 Mikael Djurfeldt <mdj@linnaeus>
+
+ * debug.c (scm_make_iloc): Added missing "return".
+
2002-11-17 Marius Vollmer <mvo@zagadka.ping.de>
* strports.c (scm_eval_string_in_module): Validate second arg to
diff --git a/libguile/debug.c b/libguile/debug.c
index a6ae69aa4..052abd839 100644
--- a/libguile/debug.c
+++ b/libguile/debug.c
@@ -1,5 +1,5 @@
/* Debugging extensions for Guile
- * Copyright (C) 1995,1996,1997,1998,1999,2000,2001 Free Software Foundation
+ * Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002 Free Software Foundation
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -245,7 +245,9 @@ SCM_DEFINE (scm_make_iloc, "make-iloc", 3, 0, 0,
{
SCM_VALIDATE_INUM (1, frame);
SCM_VALIDATE_INUM (2, binding);
- SCM_MAKE_ILOC (SCM_INUM (frame), SCM_INUM (binding), !SCM_FALSEP (cdrp));
+ return SCM_MAKE_ILOC (SCM_INUM (frame),
+ SCM_INUM (binding),
+ !SCM_FALSEP (cdrp));
}
#undef FUNC_NAME