[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Potential copyright problem in EIEIO improvement
From: |
Richard Stallman |
Subject: |
Re: Potential copyright problem in EIEIO improvement |
Date: |
Wed, 30 Dec 2009 20:45:24 -0500 |
> (defun eieio-c3-candidate (class remaining-inputs)
> "Returns CLASS if it can go in the result now, otherwise nil"
> ;; Ensure CLASS is not in any position but the first in any of the
> ;; element lists of REMAINING-INPUTS.
> (and (not (some (lambda (l) (member class (rest l)))
> remaining-inputs))
> class))
>
> and later:
>
> (let ((next (some (lambda (c) (eieio-c3-candidate c remaining-inputs))
> (mapcar #'first
> (remove-if #'null remaining-inputs)))))
If that's the whole extent of the code in question,
about 7 lines, I don't think there's an issue to be concerned about.