From mboxrd@z Thu Jan 1 00:00:00 1970 From: Chris Marusich Subject: Re: Using cuirass to build your own manifest. Date: Fri, 10 Mar 2017 00:55:54 -0800 Message-ID: <8760jhfr39.fsf@gmail.com> References: <87r328w58p.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha256; protocol="application/pgp-signature" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:57684) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cmGLF-0004pl-FC for guix-devel@gnu.org; Fri, 10 Mar 2017 03:56:06 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cmGLC-0002vV-9P for guix-devel@gnu.org; Fri, 10 Mar 2017 03:56:05 -0500 Received: from mail-pf0-x231.google.com ([2607:f8b0:400e:c00::231]:33683) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cmGLB-0002v0-U6 for guix-devel@gnu.org; Fri, 10 Mar 2017 03:56:02 -0500 Received: by mail-pf0-x231.google.com with SMTP id w189so39582078pfb.0 for ; Fri, 10 Mar 2017 00:56:00 -0800 (PST) In-Reply-To: <87r328w58p.fsf@gmail.com> (Mathieu Othacehe's message of "Wed, 08 Mar 2017 09:19:02 +0100") List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: Mathieu Othacehe Cc: guix-devel --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Hi Mathieu! Cool stuff! It's very interesting to see how others do things. I have a basic Scheme question about what you did, though. Mathieu Othacehe writes: > (define (drv-package store package) > (lambda () > `((#:job-name . ,(string-append > (package-name package) > "-" > (package-version package) > "-job")) > (#:derivation . ,(derivation-file-name > (parameterize ((%graft? #f)) > (package-derivation store package #:graft? #f))= ))))) It looks like drv-package is a procedure which returns a procedure. Is that correct? > (define (drv-list store arguments) > (let* ((manifest > (load* "/home/mathieu/conf/guix/manifest.scm" > (make-user-module > '((guix profiles) (gnu))))) > (packages > (map manifest-entry-item > (manifest-entries manifest)))) > (parameterize ((%graft? #f)) > (map (lambda (package) > (drv-package store package)) > (delete-duplicates! packages))))) > > > The drv-list procedure loads the file manifest.scm which content is > detailed below. The list produced by drv-list looks like : > > (((#:job-name . "acpi-1.7-job") (#:derivation > . "/gnu/store/r9s5x0ksj02hsw4n3acdxab8ggjp4z7y-acpi-1.7.drv")) ...) If drv-package is a procedure that returns a procedure, then it seems to me like the the list produced by drv-list should look like a list of procedures, but that isn't what you wrote. What am I misunderstanding? =2D-=20 Chris --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQIzBAEBCAAdFiEEy/WXVcvn5+/vGD+x3UCaFdgiRp0FAljCahoACgkQ3UCaFdgi Rp084A/+JuaJBBQk7YhbK3WPBdbb8c++gojps6KFGKGznE8NOk9d9LoNJbAmR4Ei 2xOK94SBpozBi0+DfdxWvdjDPZ/K8cnmdwWlIEDOV9qHtUWOIcZBCPXSa/8Vj5IR /9sJeKZqEcZt7bQ5Y29QurK/KXoRYB3HB3eGD6wpb7YBYbaqH9qapSD8O8+eebHa berYreomSqf8/YmkRUvxzq4tj9xMW4Fntd7dQcd01ySqff0TlIBxbhZ31IRvX+kB UI47i9L9Jiy6t89ma72ZBtP2uLAnSMYmsuntR6GeXl0FuqH0F3SRhvWB7UMwAxGJ hi/66szRT5BBjKL5lsXUgd/arjGACmy9BfS1q/xmz2bQqCxVJSD8Z5/7yhDeV3L2 m45BYnG1SQwUGYjtzV+Oa+021Tt3lsazh+l3mO7xqqI8JsbvdstbXa4PXeoppfzZ yxfiQNnXOaDoCs2YZMxHYhClvg+8V8K/JmXnysYDihNaoHVohgcJLfQjNMKYyxAA e4rwzJRp/Ak9tE26qPzxfd7GmKO6tEKd0zIO6jKotchH7m5RA+Ti9MepXLlgpb0a BoY/4N0Fq4yK9unNYjwdfagDWdEvyueOLHfsG74s/RS+GCWDJdIKuacFberpeqPv z4z136z7qasIvOXhLTFCbL43rc/apWKbliDDVE/9hmm0AFQB/sE= =I4F0 -----END PGP SIGNATURE----- --=-=-=--