[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] functional-or returned #f for (functional-or #f #t #f). Fixed.
From: |
David Kastrup |
Subject: |
[PATCH] functional-or returned #f for (functional-or #f #t #f). Fixed. |
Date: |
Sun, 15 Nov 2009 09:58:51 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (gnu/linux) |
---
scm/lily-library.scm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/scm/lily-library.scm b/scm/lily-library.scm
index 4a7973a..5853744 100644
--- a/scm/lily-library.scm
+++ b/scm/lily-library.scm
@@ -273,7 +273,7 @@
(define (functional-or . rest)
(if (pair? rest)
(or (car rest)
- (apply functional-and (cdr rest)))
+ (apply functional-or (cdr rest)))
#f))
(define (functional-and . rest)
--
1.6.5.1.36.g54298
--
David Kastrup
- [PATCH] functional-or returned #f for (functional-or #f #t #f). Fixed.,
David Kastrup <=