[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Chicken-users] obsolete code

From: Alex Shinn
Subject: Re: [Chicken-users] obsolete code
Date: Tue, 27 Sep 2011 08:23:09 +0900

On Tue, Sep 27, 2011 at 3:39 AM, Jörg F. Wittenberger
<address@hidden> wrote:
> I found theses definitions in the irregex code mirroring srfi-1
> simplified cases.
> (define (filter pred ls)
>  (let lp ((ls ls) (res '()))
>   (if (null? ls)
>       (reverse res)
>       (lp (cdr ls) (if (pred (car ls)) (cons (car ls) res) res)))))
> (define (remove pred ls)
>  (let lp ((ls ls) (res '()))
>   (if (null? ls)
>       (reverse res)
>       (lp (cdr ls) (if (pred (car ls)) res (cons (car ls) res))))))
> The irregex code itself appears not to use them anywhere.

Irregex is designed so that (load "irregex.scm") will work
in any vaguely Scheme-like system.  In the near future I
plan on switching to the R7RS module system, but in the
meantime I have no interest in breaking that simplicity.


reply via email to

[Prev in Thread] Current Thread [Next in Thread]