diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2002-11-17 22:18:51 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2002-11-17 22:18:51 +0000 |
commit | 4ba5f279f038a1616bf2fc8d6226f9d0b59dc790 (patch) | |
tree | 9c7000ac0ce6a70ba859c824ae0735124a21d65e /libguile/debug.c | |
parent | 50a6300387840a2d9e6045b749efa74d369bfb27 (diff) | |
download | guile-4ba5f279f038a1616bf2fc8d6226f9d0b59dc790.tar.gz |
* debug.c (scm_make_iloc): Added missing "return".
Diffstat (limited to 'libguile/debug.c')
-rw-r--r-- | libguile/debug.c | 6 |
1 files changed, 4 insertions, 2 deletions
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 |