* debug.c (scm_make_iloc): Added missing "return".

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 7660414..d87f85e 100644 (file)
--- 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 a6ae69a..052abd8 100644 (file)
--- 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