[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [PATCH] functional-or returned #f for (functional-or #f #t #f). Fixe
|
From: |
Patrick McCarty |
|
Subject: |
Re: [PATCH] functional-or returned #f for (functional-or #f #t #f). Fixed. |
|
Date: |
Sun, 15 Nov 2009 12:56:28 -0800 |
|
User-agent: |
Mutt/1.5.20 (2009-06-14) |
On 2009-11-15, David Kastrup wrote:
>
> ---
> 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)
Thanks, pushed.
-Patrick