Zhu Zihao <all_but_last@163.com> skribis:

> +             (use-modules (ice-9 ftw))
> +             (let* ((lib (string-append (assoc-ref outputs "out") "/lib"))
> +                    (dir (car (scandir lib (lambda (x)
> +                                             (string-prefix? "ecl-" x))))))
> +               (delete-file (string-append lib "/" dir "/build-stamp")))

Wouldn't something like the following suffice?

--8<---------------cut here---------------start------------->8---
(delete-file (string-append (assoc-ref outputs "out")
                            "/lib/ecl-" ,version "/build-stamp"))
--8<---------------cut here---------------end--------------->8---