Changeset 19815 in project


Ignore:
Timestamp:
08/27/10 18:30:53 (10 years ago)
Author:
Kon Lovett
Message:

Misspelled dep.

Location:
release/4/mailbox
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • release/4/mailbox/tags/2.1.2/mailbox.meta

    r19810 r19815  
    77 (license "BSD")
    88 (doc-from-wiki)
    9  (needs setup-helper check-errors conditiona-utils)
     9 (needs setup-helper check-errors condition-utils)
    1010 (files
    1111  "chicken-primitive-object-inlines.scm"
  • release/4/mailbox/trunk/chicken-primitive-object-inlines.scm

    r17435 r19815  
    719719
    720720(define-inline (%list-every/1 pred? ls)
    721   (let loop ((ls ls))
    722     (or (%null? ls)
    723         (and (pred? (%car ls))
    724              (loop (%cdr ls))) ) ) )
     721  (let loop ((ls ls) (last #t))
     722    (if (%null? ls) last
     723        (let ((this (pred? (%car ls))))
     724          (and this
     725               (loop (%cdr ls) this)) ) ) ) )
    725726
    726727(define-inline (%list-length ls0)
  • release/4/mailbox/trunk/mailbox.meta

    r19810 r19815  
    77 (license "BSD")
    88 (doc-from-wiki)
    9  (needs setup-helper check-errors conditiona-utils)
     9 (needs setup-helper check-errors condition-utils)
    1010 (files
    1111  "chicken-primitive-object-inlines.scm"
Note: See TracChangeset for help on using the changeset viewer.