[asdf-devel] maybe-add-tree.patch

[Faré]

Thanks a lot! Applied as 2.018.4.

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org




2011/11/3 Сергей Катревич <linkfly1 at newmail.ru>:
> Hi lispers!
>
> I am wrote micro patch for maybe-add-tree function. He to add :test #'equal in (find c (cdr it)) form.
>
> Finded small bug:
>
> (maybe-add-tree
>     '((LOAD-OP (PREPARE-PREVALENCE-OP :WEBLOCKS-PREVALENCE))
>       (COMPILE-OP (COMPILE-OP "file1")
>        (PREPARE-PREVALENCE-OP :WEBLOCKS-PREVALENCE)))
>     'COMPILE-OP
>     'COMPILE-OP
>     "file1")
>
> =>
>    ((LOAD-OP (PREPARE-PREVALENCE-OP :WEBLOCKS-PREVALENCE))
>     (COMPILE-OP (COMPILE-OP "file1" "file1")
>                 (PREPARE-PREVALENCE-OP :WEBLOCKS-PREVALENCE)))
>
> As you can see file1 duplicated. My patch fixed it.
>
>
> _______________________________________________
> asdf-devel mailing list
> asdf-devel at common-lisp.net
> http://lists.common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel
>
>