From debbugs-submit-bounces@debbugs.gnu.org Thu Sep 03 11:03:15 2020 Received: (at submit) by debbugs.gnu.org; 3 Sep 2020 15:03:15 +0000 Received: from localhost ([127.0.0.1]:35931 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kDqlb-0001kv-4d for submit@debbugs.gnu.org; Thu, 03 Sep 2020 11:03:15 -0400 Received: from lists.gnu.org ([209.51.188.17]:57044) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kDqlV-0001kj-HQ for submit@debbugs.gnu.org; Thu, 03 Sep 2020 11:03:09 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:43340) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kDqlU-0007T2-ON for guix-patches@gnu.org; Thu, 03 Sep 2020 11:03:04 -0400 Received: from mx1.riseup.net ([198.252.153.129]:33718) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kDqlO-0004i8-3n for guix-patches@gnu.org; Thu, 03 Sep 2020 11:03:03 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bj3vg68MWzFmcJ for ; Thu, 3 Sep 2020 08:02:55 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599145375; bh=iNHMLzId0UDGpmwVfLlmPvYV6Mqo+zXxxFCFqpi3lRc=; h=From:To:Cc:Subject:Date:From; b=opz0oBp1WQeteY7hkQx9nfsuAlotBfGPkvgNLQ1VNhOFpLkWJvy1Yz1vjsVQkcSJQ 5hOJmEPBUs93N4uaIo4mk4h4s3oHVBvZMz4ee/WgnGGxjzEQgk5IwtMZU4GmP2Hgjw OTqM7msnAdr7P0GA5uR/d6M4jxBakNB4jKy0Ljz0= X-Riseup-User-ID: 855F1EE3C1637B95A3489BD94B9E2FAA849583C5616CB44083A04598E9103CCB Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bj3vg0QTczJnDK; Thu, 3 Sep 2020 08:02:54 -0700 (PDT) From: Martin Becze To: guix-patches@gnu.org Subject: [PATCH] gnu: Add loko-scheme. Date: Thu, 3 Sep 2020 10:02:43 -0500 Message-Id: <20200903150243.27796-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Received-SPF: pass client-ip=198.252.153.129; envelope-from=mjbecze@riseup.net; helo=mx1.riseup.net X-detected-operating-system: by eggs.gnu.org: First seen = 2020/09/03 11:02:56 X-ACL-Warn: Detected OS = Linux 3.11 and newer [fuzzy] X-Spam_score_int: -27 X-Spam_score: -2.8 X-Spam_bar: -- X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H3=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: -1.4 (-) X-Debbugs-Envelope-To: submit Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.4 (--) * gnu/packages/loko.scm (loko-scheme): New variable. --- gnu/local.mk | 2 + gnu/packages/loko.scm | 124 ++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 126 insertions(+) create mode 100644 gnu/packages/loko.scm diff --git a/gnu/local.mk b/gnu/local.mk index 6e47d74e0a..fef66aea19 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -36,6 +36,7 @@ # Copyright © 2020 Jan Wielkiewicz # Copyright © 2020 Brice Waegeneire # Copyright © 2020 Tanguy Le Carrour +# Copyright © 2020 Martin Becze # # This file is part of GNU Guix. # @@ -342,6 +343,7 @@ GNU_SYSTEM_MODULES = \ %D%/packages/lout.scm \ %D%/packages/logging.scm \ %D%/packages/logo.scm \ + %D%/packages/loko.scm \ %D%/packages/lolcode.scm \ %D%/packages/lsof.scm \ %D%/packages/lua.scm \ diff --git a/gnu/packages/loko.scm b/gnu/packages/loko.scm new file mode 100644 index 0000000000..4830b845c9 --- /dev/null +++ b/gnu/packages/loko.scm @@ -0,0 +1,124 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2020 Martin Becze +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu packages loko) + #:use-module (guix packages) + #:use-module (guix git-download) + #:use-module (guix build-system gnu) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (gnu packages package-management) + #:use-module (gnu packages chez)) + +(define pfds + (let ((name "pfds") + (version "0.3")) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/ijp/pfds.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "19y33wg94pf0n98dkfqd1zbw93fgky4sawxsxl6s3vyqwl0yi5vh"))))) + +(define machine-code + (let ((name "machine-code") + (version "2.1.0")) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/machine-code.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0wzj3caj2jypzyjqfkfqkvr3kkbjabsnhldv9kvnx9w9qnria5yd"))))) + +(define struct-pack + (let ((name "struct-pack") + (version "1.1.1")) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/struct-pack.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0hd72m821pahjphzyjn26i55542v8makr55xzjll2cycja4wsbc1"))))) + +(define laesare + (let ((name "laesare") + (version "1.0.0")) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/laesare.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "15q619gzw717r8r1ql23zfdaibpnp9qqs96032vdc3rj74msxc92"))))) + +(define-public loko-scheme + (package + (name "loko-scheme") + (version "0.6.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/weinholt/loko.git") + (commit (string-append "v" version)))) + (sha256 (base32 "019jlh3lywy912cfz689c9fxgf4bi5700i9k04g7sl5w5gchj36m")) + (file-name (git-file-name name version)))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f + #:strip-binaries? #f + #:make-flags + (let ((out (assoc-ref %outputs "out"))) + (list + (string-append "PREFIX=" out) + (string-append "GDB_AUTOLOAD_PATH=" out "/share/gdb/auto-load"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) + (add-before 'build 'akku-fixes + (lambda* (#:key inputs #:allow-other-keys) + (delete-file "Akku.lock") + (substitute* "Akku.manifest" + (("\\(depends.*") "(depends)")) + (invoke "akku" "install") + (symlink (assoc-ref inputs "struct-pack") "./.akku/lib/struct") + (symlink (assoc-ref inputs "laesare") "./.akku/lib/laesare") + (symlink (assoc-ref inputs "machine-code") "./.akku/lib/machine-code") + (symlink (assoc-ref inputs "pfds") "./.akku/lib/pfds") + (substitute* ".akku/env" + (("/bin/sh") (which "sh"))) + #t))))) + (native-inputs + `(("akku" ,akku) + ("chez-scheme" ,chez-scheme) + ("struct-pack" ,struct-pack) + ("laesare" ,laesare) + ("pfds" ,pfds) + ("machine-code" ,machine-code))) + (home-page "https://scheme.fail") + (synopsis "Implementation of the algorithmic language Scheme") + (description + "Loko Scheme is intended to be a platform for application and operating system +development. It is written purely in Scheme and some assembler (i.e. no C code at +the bottom). Both the R6RS and the R7RS standards are supported.") + (license license:agpl3+))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 02:43:49 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 06:43:49 +0000 Received: from localhost ([127.0.0.1]:37086 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5Rs-000565-Sr for submit@debbugs.gnu.org; Fri, 04 Sep 2020 02:43:49 -0400 Received: from eggs.gnu.org ([209.51.188.92]:45708) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5Rr-00055r-Cf for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 02:43:47 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:53798) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kE5Rl-0000Jc-V7; Fri, 04 Sep 2020 02:43:41 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=59298 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kE5Ri-0000aJ-PZ; Fri, 04 Sep 2020 02:43:41 -0400 From: Mathieu Othacehe To: Martin Becze Subject: Re: [bug#43183] [PATCH] gnu: Add loko-scheme. References: <20200903150243.27796-1-mjbecze@riseup.net> Date: Fri, 04 Sep 2020 08:43:37 +0200 In-Reply-To: <20200903150243.27796-1-mjbecze@riseup.net> (Martin Becze's message of "Thu, 3 Sep 2020 10:02:43 -0500") Message-ID: <87k0xaqbxi.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hello Martin, Thanks for this patch. > +(define pfds > + (let ((name "pfds") > + (version "0.3")) > + (origin > + (method git-fetch) There's a space/tab indentation mix here and in the other origin declarations. > + (uri (git-reference > + (url "https://github.com/ijp/pfds.git") > + (commit (string-append "v" version)))) This could be useful not only for Loko but also for other scheme implementations. Thus, it would be nice to define it as a proper package rather than a simple origin. > + (sha256 (base32 "019jlh3lywy912cfz689c9fxgf4bi5700i9k04g7sl5w5gchj36m")) This is usually wrapped to stay under the 78 columns limit. > + (file-name (git-file-name name version)))) > + (build-system gnu-build-system) > + (arguments > + `(#:tests? #f You should add a comment explaining why tests are disabled. Thanks, Mathieu From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 02:49:47 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 06:49:47 +0000 Received: from localhost ([127.0.0.1]:37094 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5Xf-0005GE-IV for submit@debbugs.gnu.org; Fri, 04 Sep 2020 02:49:47 -0400 Received: from mx1.riseup.net ([198.252.153.129]:37836) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5Xe-0005G6-EA for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 02:49:47 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4BjSw93jRkzFf0d; Thu, 3 Sep 2020 23:49:45 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599202185; bh=17j8uA5vM51mV7j9E27Go8r9+1O3eA9X0IzYAg53kG4=; h=Subject:To:Cc:References:From:Date:In-Reply-To:From; b=PswsQsdyIhU93VI+Ys2RHDRTyDWAqMvKQTH6sGbu866m3ElHvMCFzsY9yjAqSsno7 yE/svCBMz6AUiGTomx+LYRRnagGuMf4uucgL0m5Z7SJZuYE2M3fdjZXXDx6ZynM3r5 Umo7vDorVGb493xatuRnePg+2/vMGkh0Fzr/y+Gs= X-Riseup-User-ID: D1FC8F662AC29EB174D1A6EC854C4277E290F48900DA22196F40AE4AB735416C Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4BjSw822JRz8tRn; Thu, 3 Sep 2020 23:49:43 -0700 (PDT) Subject: Re: [bug#43183] [PATCH] gnu: Add loko-scheme. To: Mathieu Othacehe References: <20200903150243.27796-1-mjbecze@riseup.net> <87k0xaqbxi.fsf@gnu.org> From: Martin Becze Autocrypt: addr=mjbecze@riseup.net; keydata= mQENBE9w5AMBCADgJkbsy1TAb9x2MHupHGu+Rb7utyvsx/tdv2amgkm80PdzDWOAVJGvRX8g UQfnUUIUwXhicdd0mG5Xmf1S6YreV2qM2rYqO8rFk6cWyLK6901NpD+gXJgjKLipvjk+8370 l7yUJmoSDdNDK7kIhWOs6HYkMK5No/Bs4SbtY5PjF1tVmNbk5KzlyKUDmMclQB1gI0cmrJ2s doTuLz4IC90UZYhV9pq/MIGjlh4eY8aQR5Uj6/jXtrwneS9V3ouhB+R9uHtKqqyok5nNdPlC UvfA/bo/2er9UAmSkewLQOTKOfwj0Ei5IQ2eRLtO5LZLZi3K4m6FOB9s37gZ5K8tp/KtABEB AAG0G21hcnRpbiA8bWpiZWN6ZUByaXNldXAubmV0PokBTwQTAQIAOQIbIwYLCQgHAwIGFQgC CQoLBBYCAwECHgECF4AWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9 l0SRB/9GFqbQeOADWJe9ke5RAAvD5HVGQCPCAsp+h+krgdsaOUySVAoVjo29fRQVoqmF1KY2 iCw9WQGiiwD8aMCEH1W+o9QPxMYeWFFyhqErEsv/BQRWNbvS9xb5YUXcB9QY68WDP83v5he2 pL7DI7fWwAx6xAAw9rgEduABewULNCsTUJzd9UG6HILEY7DLl/addQjvtTaITfKPYrrLnHND fQlGtxgzsfbkxezO8gYLARQBxAWETjOYxpt8d9J36FNnQN8OcsuXjEgYWh7dsPtp+w3P8Yj9 5YrEu/9+eehSy9ath6vhRF9N+/gvmR5WAb5EB8w/hm11pjeX9tY8vK7vuTt9uQENBE9w5AMB CADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc 8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsS k0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHo YPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNs fzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAEC ACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ 4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQ Kbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+q ecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX 3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWN ZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEW OslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsE wBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2e MfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6f Znyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+ WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz 7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/ 3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jp QKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr 2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN 1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4f z2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu6 4goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1F KV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WY klm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd 9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tB E3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA 2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8Aap WeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWu ad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee 0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69Y rAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDey qz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDS vxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O 0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFF FIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx +/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67 LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9 lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32 bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/E J2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72 yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv 6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ /52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm2 9JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gck Rxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBc hIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZ JDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAA u6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAK CRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHx CsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdn MQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6T EW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3 RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MV uQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9 HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8 IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWA g4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiY uQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEB AAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9 l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneF VhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ld tZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/ gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6br lmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMB CADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc 8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsS k0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHo YPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNs fzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAEC ACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ 4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQ Kbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+q ecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX 3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWN ZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MV Message-ID: Date: Fri, 4 Sep 2020 01:49:38 -0500 MIME-Version: 1.0 In-Reply-To: <87k0xaqbxi.fsf@gnu.org> Content-Type: text/plain; charset=utf-8 Content-Language: en-US Content-Transfer-Encoding: 7bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) That is very true. But I'm not sure how to make a generic scheme package. Guile, Chez and loko all have different directories that they look for libraries in. Since Guile is the most popular wdyt about just having those as guile packages to start with? On 9/4/20 1:43 AM, Mathieu Othacehe wrote: > This could be useful not only for Loko but also for other scheme > implementations. Thus, it would be nice to define it as a proper package > rather than a simple origin. From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 03:16:29 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 07:16:29 +0000 Received: from localhost ([127.0.0.1]:37135 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5xV-0005x7-42 for submit@debbugs.gnu.org; Fri, 04 Sep 2020 03:16:29 -0400 Received: from eggs.gnu.org ([209.51.188.92]:50938) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE5xU-0005wv-Bz for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 03:16:28 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:54066) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kE5xO-0003sg-VU; Fri, 04 Sep 2020 03:16:22 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=59660 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kE5xO-0004o1-5j; Fri, 04 Sep 2020 03:16:22 -0400 From: Mathieu Othacehe To: Martin Becze Subject: Re: [bug#43183] [PATCH] gnu: Add loko-scheme. References: <20200903150243.27796-1-mjbecze@riseup.net> <87k0xaqbxi.fsf@gnu.org> Date: Fri, 04 Sep 2020 09:16:20 +0200 In-Reply-To: (Martin Becze's message of "Fri, 4 Sep 2020 01:49:38 -0500") Message-ID: <87ft7yqaez.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > That is very true. But I'm not sure how to make a generic scheme > package. Guile, Chez and loko all have different directories that they > look for libraries in. Since Guile is the most popular wdyt about just > having those as guile packages to start with? Sure, this would be a good start. Thanks, Mathieu From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 03:32:22 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 07:32:22 +0000 Received: from localhost ([127.0.0.1]:37150 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE6Cs-0006Mu-3L for submit@debbugs.gnu.org; Fri, 04 Sep 2020 03:32:22 -0400 Received: from sender4-of-o51.zoho.com ([136.143.188.51]:21125) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kE6Cq-0006Mn-JL for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 03:32:21 -0400 ARC-Seal: i=1; a=rsa-sha256; t=1599204732; cv=none; d=zohomail.com; s=zohoarc; b=IUBdmYaIWcOorE4uDLd2UZ0eH3sSZicVGWhOpU4Dfa5+RDHU53QmPOnjZe675WylSu7pyZ8XJh6OorRtJc3OZcfgzH3PEAAcOfNjNcP9l1e/EW+mrtsObYwyK9VTF6qbWxgJZx/7rMKW+V0MXKo3LlFh92TZ5B/bg4AmlZ10D9c= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zohomail.com; s=zohoarc; t=1599204732; h=Content-Type:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To; bh=Zqiuk5LfS5HO+svBFF8hw2+Ngpvz7T3L1KIqH+Fu15E=; b=LEvUAHN0jugw3Fh3XF8zijMnEl60z9DEIjv+Fmeft8NbDEwu/ilYktLsnXSW7Hi6sYjNutB7UR9DutfDQCwJQdyaFLSGWuGEscvCZh8BTe19dztxfbZvl3IcQ/QnaFjMTBSQ3OuCJAsA6zK79gdSDbcO+/CmEQ5savXLI1RiSWg= ARC-Authentication-Results: i=1; mx.zohomail.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1599204732; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type; bh=Zqiuk5LfS5HO+svBFF8hw2+Ngpvz7T3L1KIqH+Fu15E=; b=CRU/6qkEli5xYR2TUFxrnPa8vVHlmz4MPQ5ouKRNUXLLoytdIaaGH6a0lMVL3nlo 7O3foQ3IcG94vNkokI4BJbsw72vjdBIz+r1IhLSyICK21oY+bbdUKn0eqEPs7oNuA/0 K2Pb0qd3AsJwdJATtG5usovPzROvPFGWoO0NJ+e4= Received: from localhost (p54ad4e44.dip0.t-ipconnect.de [84.173.78.68]) by mx.zohomail.com with SMTPS id 1599204728292315.3863907060843; Fri, 4 Sep 2020 00:32:08 -0700 (PDT) References: <20200903150243.27796-1-mjbecze@riseup.net> <87k0xaqbxi.fsf@gnu.org> <87ft7yqaez.fsf@gnu.org> User-agent: mu4e 1.4.13; emacs 27.1 From: Ricardo Wurmus To: Mathieu Othacehe Subject: Re: [bug#43183] [PATCH] gnu: Add loko-scheme. In-reply-to: <87ft7yqaez.fsf@gnu.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Fri, 04 Sep 2020 09:33:17 +0200 Message-ID: <87imcuf136.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain X-ZohoMailClient: External X-Spam-Score: -0.0 (/) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org, Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) Mathieu Othacehe writes: >> That is very true. But I'm not sure how to make a generic scheme >> package. Guile, Chez and loko all have different directories that they >> look for libraries in. Since Guile is the most popular wdyt about just >> having those as guile packages to start with? > > Sure, this would be a good start. We already have a guile-pfds package in (gnu packages guile-xyz). -- Ricardo From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:44 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:44 +0000 Received: from localhost ([127.0.0.1]:40713 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHI-0006Gv-0W for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:44 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50872) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHE-0006GQ-5R for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:43 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1b2G7hzFgYs for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:39 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251139; bh=0KThQZtUZrPQwniwNuaN9jRwJ52yEKF0S7oQBz1cj5U=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=Mm1Qanxvll2C8msbOsC8aLMEwRFKTUrO5rc0fwOfxl/yNMS/gsw2iG+PqFnlsxLc+ Pn34UyR+jtNNStOCZH7mQR6xWbG4ocexoh5Z4vZvihSKu6aMSM90lSoColZdXTUu4Y Hu8zvXIrzK9fEAtsQLOqJfShWwV73PN+EkVN0HkM= X-Riseup-User-ID: 27D17AC0C8AD5EE1234A2F2CFCBDC44F54786FC7609AEF659A408E021B83E0DE Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1Z33ShzJn6Z; Fri, 4 Sep 2020 13:25:38 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 0/5] gnu: Add loko-scheme. Date: Fri, 4 Sep 2020 15:25:12 -0500 Message-Id: <20200904202517.6131-1-mjbecze@riseup.net> In-Reply-To: <20200903150243.27796-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) Hi, This packages loko-scheme and the scheme libraries need to build it. Martin Becze (5): gnu: Add loko-scheme. gnu: guile-pfds: When using Guile 3, compile as a r6rs library. gnu: Add guile-struct-pack. gnu: Add guile-machine-code. gnu: Add guile-laesare. gnu/local.mk | 2 + gnu/packages/guile-xyz.scm | 161 ++++++++++++++++++++++++++++++++++--- gnu/packages/loko.scm | 84 +++++++++++++++++++ 3 files changed, 235 insertions(+), 12 deletions(-) create mode 100644 gnu/packages/loko.scm -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:51 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:51 +0000 Received: from localhost ([127.0.0.1]:40716 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHI-0006Gy-7N for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:51 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50886) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHE-0006GS-PQ for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:43 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1c2bz8zFgh2 for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:40 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251140; bh=RebFFgrhhR28x7m9kO8Pbth53WvBcXORUhnLpX4Sa/k=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=baIPd8H0V3BDNRxYMc/NVoI0TKF4k1JdIpXEOSW3YyFuK16YE2lM7MYyzT1UCma7s f/5TSrgJ+xj/YvzV7/g5qf4NyG4gGrU3/ZlvJ/C9v5xKr3N2PXbRnp9aNI7fYM4qSN vyawePkeIgbOz+UELgi7mKux5+fbfQzSeQBRjWFA= X-Riseup-User-ID: BB1FF348FB7F743C2F7E3456B45ECFF52867C30E0927DB1F09C3980F54A88C6F Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1b3xG0zJn6Z; Fri, 4 Sep 2020 13:25:39 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 1/5] gnu: Add loko-scheme. Date: Fri, 4 Sep 2020 15:25:13 -0500 Message-Id: <20200904202517.6131-2-mjbecze@riseup.net> In-Reply-To: <20200904202517.6131-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) * gnu/packages/loko.scm (loko-scheme): New variable. --- gnu/local.mk | 2 ++ gnu/packages/loko.scm | 84 +++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 86 insertions(+) create mode 100644 gnu/packages/loko.scm diff --git a/gnu/local.mk b/gnu/local.mk index d2753f52ae..96a849b7a4 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -36,6 +36,7 @@ # Copyright © 2020 Jan Wielkiewicz # Copyright © 2020 Brice Waegeneire # Copyright © 2020 Tanguy Le Carrour +# Copyright © 2020 Martin Becze # # This file is part of GNU Guix. # @@ -342,6 +343,7 @@ GNU_SYSTEM_MODULES = \ %D%/packages/lout.scm \ %D%/packages/logging.scm \ %D%/packages/logo.scm \ + %D%/packages/loko.scm \ %D%/packages/lolcode.scm \ %D%/packages/lsof.scm \ %D%/packages/lua.scm \ diff --git a/gnu/packages/loko.scm b/gnu/packages/loko.scm new file mode 100644 index 0000000000..ad4396afc4 --- /dev/null +++ b/gnu/packages/loko.scm @@ -0,0 +1,84 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2020 Martin Becze +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu packages loko) + #:use-module (guix packages) + #:use-module (guix git-download) + #:use-module (guix build-system gnu) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (gnu packages package-management) + #:use-module (gnu packages guile) + #:use-module (gnu packages guile-xyz) + #:use-module (gnu packages chez)) + +(define-public loko-scheme + (package + (name "loko-scheme") + (version "0.6.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/weinholt/loko.git") + (commit (string-append "v" version)))) + (sha256 + (base32 "019jlh3lywy912cfz689c9fxgf4bi5700i9k04g7sl5w5gchj36m")) + (file-name (git-file-name name version)))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f ; r7rs tests are still failing as of 0.6.0. + #:strip-binaries? #f + #:make-flags + (let ((out (assoc-ref %outputs "out"))) + (list + (string-append "PREFIX=" out) + (string-append "GDB_AUTOLOAD_PATH=" out "/share/gdb/auto-load"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) + (add-before 'build 'akku-fixes + (lambda* (#:key inputs #:allow-other-keys) + (delete-file "Akku.lock") + (substitute* "Akku.manifest" + (("\\(depends.*") "(depends)")) + (invoke "akku" "install") + (let ((dest "./.akku/lib/") + (source "/share/guile/site/3.0/")) + (for-each + (lambda (name) + ;; Symlink the scheme libraries so that Akku can find them + (symlink (string-append (assoc-ref inputs name) source name) + (string-append dest name))) + '("struct", "laesare", "pfds", "machine-code"))) + (substitute* ".akku/env" + (("/bin/sh") (which "sh"))) + #t))))) + (native-inputs + `(("akku" ,akku) + ("chez-scheme" ,chez-scheme) + ("struct" ,guile-struct-pack) + ("laesare" ,guile-laesare) + ("pfds" ,guile-pfds) + ("machine-code" ,guile-machine-code))) + (home-page "https://scheme.fail") + (synopsis "Implementation of the algorithmic language Scheme") + (description + "Loko Scheme is intended to be a platform for application and operating +system development. It is written purely in Scheme and some assembler (i.e. no +C code at the bottom). Both the R6RS and the R7RS standards are supported.") + (license license:agpl3+))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:51 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:51 +0000 Received: from localhost ([127.0.0.1]:40719 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHP-0006HN-A1 for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:51 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50894) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHF-0006GU-Sz for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:43 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1d3X3HzFmNs for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:41 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251141; bh=z7261htkwWHBcO6v85eGkiE6121TWM6ywkZZc09yiLg=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=Vq8gi2BC+BEID8/qks/A1QVjiXYcLbvftj3eRt4Es5kVEoOGxgJw2d10O1lX5sFu7 lLV3xagHnEHesoX4cYSTpKzUg5EO7+/FrqTIlV4oyUdWWAUI3OuaG47diOOe0/oz12 v1y1ZuYpYjbK0TA+p7MEu+jLhiYmjR1g5qYuYAz8= X-Riseup-User-ID: D1094585AC45F6739A1F6960B629409555C96B7DEE0F1104CFF413EEF5436E0C Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1c4VMtzJn6Z; Fri, 4 Sep 2020 13:25:40 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 2/5] gnu: guile-pfds: When using Guile 3, compile as a r6rs library. Date: Fri, 4 Sep 2020 15:25:14 -0500 Message-Id: <20200904202517.6131-3-mjbecze@riseup.net> In-Reply-To: <20200904202517.6131-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) This allow the package to be resused by r6rs compliant scheme implementations that expect *.sls files. * gnu/packages/guile-xyz.scm (guile2.2-pfds): Rename *.sls files to *.scm since Guile 2 does not support the sls extension. (guile-pfds): Removed the renaming of files to *.sls to *.scm. --- gnu/packages/guile-xyz.scm | 26 ++++++++++++++------------ 1 file changed, 14 insertions(+), 12 deletions(-) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index fa6855f43d..308ce0ad59 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -798,6 +798,7 @@ using Guile's foreign function interface.") (build-system guile-build-system) (arguments '(#:source-directory "src" + #:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") #:phases (modify-phases %standard-phases (add-after 'unpack 'move-files-around (lambda _ @@ -806,8 +807,7 @@ using Guile's foreign function interface.") (mkdir-p "src/pfds") (for-each (lambda (file) (rename-file file - (string-append "src/pfds/" - file))) + (string-append "src/pfds/" file))) '("bbtrees.sls" "deques" "deques.sls" @@ -821,15 +821,6 @@ using Guile's foreign function interface.") "queues.sls" "sequences.sls" "sets.sls")) - - ;; In Guile <= 2.2.4, there's no way to tell 'guild - ;; compile' to accept the ".sls" extension. So... - (for-each (lambda (file) - (rename-file file - (string-append - (string-drop-right file 4) - ".scm"))) - (find-files "." "\\.sls$")) #t))))) (native-inputs `(("guile" ,guile-3.0))) @@ -862,7 +853,18 @@ Vicare Scheme and IronScheme. Right now it contains: (substitute-keyword-arguments (package-arguments guile-pfds) ((#:phases phases) `(modify-phases ,phases - (delete 'work-around-guile-bug))))))) + (delete 'work-around-guile-bug) + (add-after 'move-files-around 'sls->scm + (lambda _ + ;; In Guile <= 2.2.4, there's no way to tell 'guild + ;; compile' to accept the ".sls" extension. So... + (for-each (lambda (file) + (rename-file file + (string-append + (string-drop-right file 4) + ".scm"))) + (find-files "." "\\.sls$")) + #t)))))))) (define-public guile3.0-pfds (deprecated-package "guile3.0-pfds" guile-pfds)) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:52 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:52 +0000 Received: from localhost ([127.0.0.1]:40721 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHP-0006HU-Od for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:52 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50902) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHG-0006GW-UM for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:43 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1f3rt9zFmPL for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:42 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251142; bh=stfBPStFt0w37bGFEis1QKmbWt4yHFi/2RfdvstEvkk=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=EH6Q6LJ5GK3LODn7azdbg47HCd3vhIs1yP87hNXWzVMnU+0QyFJvKe+H8yiezfbfe f3KJo+fYOQzDSgJih9RpD9fdSUBuDkpVYNgpS7RNLArK9vnoZDfglDwlOaYVNdFuCH zpixlis0z1hUAif9hKkB+YZ8eL1dgmrAoJ/kYUzY= X-Riseup-User-ID: 9083588B77505C67C190E2E71A256EDE303DB6BF5A80B15D06C908199CE7281A Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1d56ZczJn6Z; Fri, 4 Sep 2020 13:25:41 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 3/5] gnu: Add guile-struct-pack. Date: Fri, 4 Sep 2020 15:25:15 -0500 Message-Id: <20200904202517.6131-4-mjbecze@riseup.net> In-Reply-To: <20200904202517.6131-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-struct-pack): New variable. --- gnu/packages/guile-xyz.scm | 43 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 308ce0ad59..a2df03760d 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3846,3 +3846,46 @@ between data, in a way that is very similar to WikiData or RDF for instance. An object can have relations (in the form of an IRI) that relates it to one or more objects or strings, represented by a Json object or an IRI.") (license license:gpl3+))) + +(define-public guile-struct-pack + (package + (name "guile-struct-pack") + (version "1.1.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/struct-pack.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0hd72m821pahjphzyjn26i55542v8makr55xzjll2cycja4wsbc1")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a struct/ directory to reflect the + ;; module hierarchy. + (define (mv dst) + (define (target file) + (string-append dst "/" file)) + (define files (cddr (scandir "."))) + (mkdir dst) + (for-each (lambda (file) + (rename-file file (target file))) + files)) + (mv "struct") + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (home-page "https://gitlab.com/mjbecze/guile-srfi-89") + (synopsis "R6RS library for working with packed byte structures") + (description + "This is an R6RS library for working with packed byte structures. It is +similar to struct in Python or pack and unpack in Perl.") + (license license:expat))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:52 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:52 +0000 Received: from localhost ([127.0.0.1]:40723 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHQ-0006Hc-5h for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:52 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50908) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHH-0006Gu-Vq for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:44 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1g46x0zFgYs for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:43 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251143; bh=7vKM4+b7HdwJpwzhLQzDBHf/TGJZ5LfMWn2QH/MUuLo=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=iHYuAyQiMcasC8vYkMhdIQX1hVnM49Ay9tOlEB13+pKFudApwIEdP/aP1EhzsSCjR Qnp1lpBTPw6rGoJktnbiFyxF9ShTGqlYB+2wqtRBM2YYUR3sUZrQgga9UNLoBnRGM8 qCNtAGuvqSsdKXrzTkA9XNF31iUO48fJ82V9v4Kg= X-Riseup-User-ID: DFF43BDC9F0A6DFC603E7E32F6C3C2C76AE54FEC1C92E3651EF5668503C96FA0 Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1f5gTZzJn6Z; Fri, 4 Sep 2020 13:25:42 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 4/5] gnu: Add guile-machine-code. Date: Fri, 4 Sep 2020 15:25:16 -0500 Message-Id: <20200904202517.6131-5-mjbecze@riseup.net> In-Reply-To: <20200904202517.6131-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-machine-code): New variable. --- gnu/packages/guile-xyz.scm | 49 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 49 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index a2df03760d..a699377ff8 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3889,3 +3889,52 @@ more objects or strings, represented by a Json object or an IRI.") "This is an R6RS library for working with packed byte structures. It is similar to struct in Python or pack and unpack in Perl.") (license license:expat))) + +(define-public guile-machine-code + (package + (name "guile-machine-code") + (version "2.1.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/machine-code.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0wzj3caj2jypzyjqfkfqkvr3kkbjabsnhldv9kvnx9w9qnria5yd")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a machine-code directory to reflect + ;; the module hierarchy. + (define (mv dst) + (define (target file) + (string-append dst "/" file)) + (define files (cddr (scandir "."))) + (mkdir dst) + (for-each (lambda (file) + (rename-file file (target file))) + files)) + (mv "machine-code") + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (propagated-inputs + `(("guile-struct-pack" ,guile-struct-pack))) + (home-page "https://github.com/weinholt/machine-code") + (synopsis "Tools that relate to machine code and object formats") + (description + "This project is about the development of tools that relate to machine +code and object formats; for all architectures. Here you'll find libraries for +working with binary code: assembly, disassembly, instruction tables, object +formats and related areas.") + (license license:expat))) + + -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 04 16:25:52 2020 Received: (at 43183) by debbugs.gnu.org; 4 Sep 2020 20:25:52 +0000 Received: from localhost ([127.0.0.1]:40725 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHQ-0006Hj-FL for submit@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:52 -0400 Received: from mx1.riseup.net ([198.252.153.129]:50916) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEIHJ-0006HA-2H for 43183@debbugs.gnu.org; Fri, 04 Sep 2020 16:25:45 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bjq1h4mkKzFgYs for <43183@debbugs.gnu.org>; Fri, 4 Sep 2020 13:25:44 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599251144; bh=M7TNyG9tu3ICs84RVqF/dCsu02p6zpvFYjMU7GjiItM=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=LbBsCdsEFa7k8ZO0u00xOf5DLAgVnA0V/h4YGmblZWDohTAPT0vd7yRx0EYzPYc6m UOraSdxn1a5e6Z9hPeId2hNFnzEyIFayQa8msKdaBfTtve+U9QOZVF8EaR0a3GA5f6 UDKbxO8JjY0r3CmFca6LSLxyA3RzqFwr03dN6S5M= X-Riseup-User-ID: 02AC602C5256ECEDDAA16A1A866F94C52E7F75F58649FD43581F9A9B95C2C781 Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bjq1g6CSTzJn6Z; Fri, 4 Sep 2020 13:25:43 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v2 5/5] gnu: Add guile-laesare. Date: Fri, 4 Sep 2020 15:25:17 -0500 Message-Id: <20200904202517.6131-6-mjbecze@riseup.net> In-Reply-To: <20200904202517.6131-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-laesare): New variable. --- gnu/packages/guile-xyz.scm | 45 +++++++++++++++++++++++++++++++++++++- 1 file changed, 44 insertions(+), 1 deletion(-) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index a699377ff8..ed4b445701 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3937,4 +3937,47 @@ working with binary code: assembly, disassembly, instruction tables, object formats and related areas.") (license license:expat))) - +(define-public guile-laesare + (package + (name "guile-laesare") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/laesare.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "15q619gzw717r8r1ql23zfdaibpnp9qqs96032vdc3rj74msxc92")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a laesare directory to reflect + ;; the module hierarchy. + (define (mv dst) + (define (target file) + (string-append dst "/" file)) + (define files (cddr (scandir "."))) + (mkdir dst) + (for-each (lambda (file) + (rename-file file (target file))) + files)) + (mv "laesare") + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (home-page "https://github.com/weinholt/laesare") + (synopsis "R6RS Scheme library that provides a reader") + (description + "This is an R6RS Scheme library that provides a reader with some extra +features not found in the standard read procedure such as a compatible mode +with support for other RnRS standards and a tolerant mode that continues on +errors.") + (license license:expat))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Mon Sep 07 02:30:38 2020 Received: (at 43183) by debbugs.gnu.org; 7 Sep 2020 06:30:38 +0000 Received: from localhost ([127.0.0.1]:47675 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFAfm-0001mU-DJ for submit@debbugs.gnu.org; Mon, 07 Sep 2020 02:30:38 -0400 Received: from eggs.gnu.org ([209.51.188.92]:58026) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFAfk-0001mG-TU for 43183@debbugs.gnu.org; Mon, 07 Sep 2020 02:30:37 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:36225) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kFAfe-0003c2-JC; Mon, 07 Sep 2020 02:30:31 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=49144 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kFAfS-0006xd-Dk; Mon, 07 Sep 2020 02:30:24 -0400 From: Mathieu Othacehe To: Martin Becze Subject: Re: [bug#43183] [PATCH v2 3/5] gnu: Add guile-struct-pack. References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> <20200904202517.6131-4-mjbecze@riseup.net> Date: Mon, 07 Sep 2020 08:30:16 +0200 In-Reply-To: <20200904202517.6131-4-mjbecze@riseup.net> (Martin Becze's message of "Fri, 4 Sep 2020 15:25:15 -0500") Message-ID: <87zh62m747.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hey Martin, Thanks for the v2! > + (define (mv dst) I'm not sure it's useful to define a procedure here, as it will only be called once. > + (define (target file) > + (string-append dst "/" file)) > + (define files (cddr (scandir "."))) We try to avoid car, cdr & friends. You can use: --8<---------------cut here---------------start------------->8--- (scandir dir (negate (cut member <> '("." "..")))) --8<---------------cut here---------------end--------------->8--- instead. > + (description > + "This is an R6RS library for working with packed byte structures. It is > +similar to struct in Python or pack and unpack in Perl.") > + (license license:expat))) Make sure to use the correct indentation, using Emacs or indent-code.el script. Also, the order of the patchset is not correct. The patch adding "loko-scheme" should be the last one, as it depends on the other ones, and won't build without them. Could you send an updated version :) ? Thanks, Mathieu From debbugs-submit-bounces@debbugs.gnu.org Mon Sep 07 02:31:06 2020 Received: (at 43183) by debbugs.gnu.org; 7 Sep 2020 06:31:07 +0000 Received: from localhost ([127.0.0.1]:47679 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFAgE-0001nW-LR for submit@debbugs.gnu.org; Mon, 07 Sep 2020 02:31:06 -0400 Received: from eggs.gnu.org ([209.51.188.92]:58058) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFAgD-0001mw-6C for 43183@debbugs.gnu.org; Mon, 07 Sep 2020 02:31:05 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:36232) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kFAg7-0003kS-Sv; Mon, 07 Sep 2020 02:30:59 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=49152 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kFAg5-0000hH-It; Mon, 07 Sep 2020 02:30:59 -0400 From: Mathieu Othacehe To: Martin Becze Subject: Re: [bug#43183] [PATCH v2 2/5] gnu: guile-pfds: When using Guile 3, compile as a r6rs library. References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> <20200904202517.6131-3-mjbecze@riseup.net> Date: Mon, 07 Sep 2020 08:30:56 +0200 In-Reply-To: <20200904202517.6131-3-mjbecze@riseup.net> (Martin Becze's message of "Fri, 4 Sep 2020 15:25:14 -0500") Message-ID: <87v9gqm733.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > * gnu/packages/guile-xyz.scm (guile2.2-pfds): Rename *.sls files to *.scm > since Guile 2 does not support the sls extension. > (guile-pfds): Removed the renaming of files to *.sls to *.scm. I applied this one that looks fine. Thanks, Mathieu From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:00:14 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:14 +0000 Received: from localhost ([127.0.0.1]:56129 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2U-0004Yo-8v for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:14 -0400 Received: from mx1.riseup.net ([198.252.153.129]:42748) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2O-0004RS-3G for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:08 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xH1wh9zFdxc for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:03 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580803; bh=YoPg4JxDkYh0ycDAHY2VQCTNSwImJzxYL7cly1lrYxg=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=BP3CcrrVqFEjpxlozY4Xt1x4rg9Z/lQM5Mqfhz/lVnEEiqp1tdI6t3dhezDlpAL3I Zs8EhYt0h8tPQqty/b8wMYxqhfxJhp3Xxd3ey1r90/JRfayyo057+qee9rzWa1R2y8 28pULOGv61g9tNIfOgzrOrl+8PZI0gos8KkM6Ecg= X-Riseup-User-ID: 83582668E8F0A5EABB2B62CAE1FF0491D15E9BFCD7B01A91C765040B5CD17C4D Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xG3QS2z8t2w; Tue, 8 Sep 2020 09:00:02 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v3 0/4] Add loko-scheme. Date: Tue, 8 Sep 2020 10:59:42 -0500 Message-Id: <20200908155946.2322-1-mjbecze@riseup.net> In-Reply-To: <20200903150243.27796-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) This add loko-scheme. Martin Becze (4): gnu: Add guile-struct-pack. gnu: Add guile-machine-code. gnu: Add guile-laesare. gnu: Add loko-scheme. gnu/local.mk | 2 + gnu/packages/guile-xyz.scm | 138 +++++++++++++++++++++++++++++++++++++ gnu/packages/loko.scm | 85 +++++++++++++++++++++++ 3 files changed, 225 insertions(+) create mode 100644 gnu/packages/loko.scm -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:00:29 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:29 +0000 Received: from localhost ([127.0.0.1]:56134 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2m-0004sr-Sp for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:29 -0400 Received: from mx1.riseup.net ([198.252.153.129]:43396) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2l-0004r3-E5 for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:27 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xK73xhzFdqm for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:05 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580826; bh=xEiqTTenAgzo7/DY0tLpdILR0TiHVx3vGpDh7vs0d30=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=WJZ7JvmaMv7JRP8SQ66kbm7HFWFOPPE+DvT588HEZEcD9y/HxQFC4v/8E5VW0YccU ZnDoZwg98+seTdJ3vvVqxOoeLlbn6EQ5aPkrP3I2F+F24U/5s8wwOOYa3/MZxb8d/C QYnghUw9nMu/Brtgb4flZxTJ2G/b02ev8PKB+uXY= X-Riseup-User-ID: 5D03C2AE5E3089CF6DBB21E34473CE189C0C73FA05F0046AA15AE645DB8F07BB Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xK2RqCz8t2w; Tue, 8 Sep 2020 09:00:05 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v3 1/4] gnu: Add guile-struct-pack. Date: Tue, 8 Sep 2020 10:59:43 -0500 Message-Id: <20200908155946.2322-2-mjbecze@riseup.net> In-Reply-To: <20200908155946.2322-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200908155946.2322-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-struct-pack): New variable. --- gnu/packages/guile-xyz.scm | 44 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 80f792672c..e1c763faef 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3867,3 +3867,47 @@ between data, in a way that is very similar to WikiData or RDF for instance. An object can have relations (in the form of an IRI) that relates it to one or more objects or strings, represented by a Json object or an IRI.") (license license:gpl3+))) + +(define-public guile-struct-pack + (package + (name "guile-struct-pack") + (version "1.1.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/struct-pack.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0hd72m821pahjphzyjn26i55542v8makr55xzjll2cycja4wsbc1")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (srfi srfi-26) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a struct/ directory to reflect the + ;; module hierarchy. + (define dst-folder "struct") + (define (target file) + (string-append dst-folder "/" file)) + (define files + (scandir "." (negate (cut member <> '("." ".."))))) + (mkdir dst-folder) + (for-each (lambda (file) + (rename-file file (target file))) + files) + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (home-page "https://github.com/weinholt/struct-pack") + (synopsis "R6RS library for working with packed byte structures") + (description + "This is an R6RS library for working with packed byte structures. It is +similar to struct in Python or pack and unpack in Perl.") + (license license:expat))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:00:29 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:29 +0000 Received: from localhost ([127.0.0.1]:56136 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2n-0004tB-7B for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:29 -0400 Received: from mx1.riseup.net ([198.252.153.129]:43400) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2l-0004rM-NC for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:28 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xM6WZZzFpB3 for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:07 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580827; bh=hotGRYs7et2A45rlqAT0Q1N9Z1/CGPwd2WumFota7eI=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=GWTuaVxA4Tz3YIPPENGfEcSG1Usk2bQChM4cbZF5pGzNjTO6YapLfiyiii9MWEB1S Xj60eTyzung+9Wx1yeuZU5XRviRMeKIxvEZAQSgXTBIQpidSTtUpIuzLFo5gr7FgQS 3ibvVWF1QtBbyNxErX2i0+2HdPsra7Q+hbe59Nzo= X-Riseup-User-ID: 550BCFA1599FE79BD98523A78425EDD0E8159B799D0204B44E48E4AC46DCFFA0 Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xM1qvdz8trb; Tue, 8 Sep 2020 09:00:07 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v3 2/4] gnu: Add guile-machine-code. Date: Tue, 8 Sep 2020 10:59:44 -0500 Message-Id: <20200908155946.2322-3-mjbecze@riseup.net> In-Reply-To: <20200908155946.2322-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200908155946.2322-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-machine-code): New variable. --- gnu/packages/guile-xyz.scm | 48 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 48 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index e1c763faef..7c8a417a14 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3911,3 +3911,51 @@ more objects or strings, represented by a Json object or an IRI.") "This is an R6RS library for working with packed byte structures. It is similar to struct in Python or pack and unpack in Perl.") (license license:expat))) + +(define-public guile-machine-code + (package + (name "guile-machine-code") + (version "2.1.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/machine-code.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0wzj3caj2jypzyjqfkfqkvr3kkbjabsnhldv9kvnx9w9qnria5yd")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (srfi srfi-26) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a struct/ directory to reflect the + ;; module hierarchy. + (define dst-folder "machine-code") + (define (target file) + (string-append dst-folder "/" file)) + (define files + (scandir "." (negate (cut member <> '("." ".."))))) + (mkdir dst-folder) + (for-each (lambda (file) + (rename-file file (target file))) + files) + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (propagated-inputs + `(("guile-struct-pack" ,guile-struct-pack))) + (home-page "https://github.com/weinholt/machine-code") + (synopsis "Tools that relate to machine code and object formats") + (description + "This project is about the development of tools that relate to machine +code and object formats; for all architectures. Here you'll find libraries for +working with binary code: assembly, disassembly, instruction tables, object +formats and related areas.") + (license license:expat))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:00:38 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:38 +0000 Received: from localhost ([127.0.0.1]:56139 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2s-0004za-NT for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:38 -0400 Received: from mx1.riseup.net ([198.252.153.129]:43450) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2m-0004sL-JT for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:28 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xP4srkzFpT6 for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:09 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580828; bh=YerIjUHiFK+YtGYPa/8ttZrYf6mmvsgZZCJyOdj8ik0=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=im1F5daNOG1onaVXEZUE63MVyJCiRaNrNAPZWjP98Ibv52Mxj9UWTrxcjfe3Wjkqz /ckFTuo6YR1M+7075CO6Q3LTy3wg2oKO9m2VEozOcRXg/Hfx1J4xQxm6ro7+sv0nx8 wcmKOjSBaQQ8VHMFrd4sNOqRCD9f0OailYDZN7yM= X-Riseup-User-ID: 112FE1B8DB7C6EAB80CEAECE4C124A10890D8DBE3EC39D0024D545F1EF92CAFC Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xP0FYgz8ty4; Tue, 8 Sep 2020 09:00:08 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v3 3/4] gnu: Add guile-laesare. Date: Tue, 8 Sep 2020 10:59:45 -0500 Message-Id: <20200908155946.2322-4-mjbecze@riseup.net> In-Reply-To: <20200908155946.2322-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200908155946.2322-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) * gnu/packages/guile-xyz.scm (guile-laesare): New variable. --- gnu/packages/guile-xyz.scm | 46 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 7c8a417a14..bba60361d0 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3959,3 +3959,49 @@ code and object formats; for all architectures. Here you'll find libraries for working with binary code: assembly, disassembly, instruction tables, object formats and related areas.") (license license:expat))) + +(define-public guile-laesare + (package + (name "guile-laesare") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/laesare.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "15q619gzw717r8r1ql23zfdaibpnp9qqs96032vdc3rj74msxc92")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (srfi srfi-26) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a laesare directory to reflect + ;; the module hierarchy. + (define dst-folder "laesare") + (define (target file) + (string-append dst-folder "/" file)) + (define files + (scandir "." (negate (cut member <> '("." ".."))))) + (mkdir dst-folder) + (for-each (lambda (file) + (rename-file file (target file))) + files) + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (home-page "https://github.com/weinholt/laesare") + (synopsis "R6RS Scheme library that provides a reader") + (description + "This is an R6RS Scheme library that provides a reader with some extra +features not found in the standard read procedure such as a compatible mode +with support for other RnRS standards and a tolerant mode that continues on +errors.") + (license license:expat))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:00:42 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:42 +0000 Received: from localhost ([127.0.0.1]:56141 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2w-000544-GG for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:42 -0400 Received: from mx1.riseup.net ([198.252.153.129]:43480) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2n-0004t3-89 for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:32 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xl1bMKzFrcB for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:27 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580828; bh=Hmr0bisgfKd+uBUyc8G9xt1G43Lk5uVlJd9Nkm8TySc=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=CjdarNH3i1bfrlIkBDuxOIw666saTZuh3IgsQJVpoohW6RGaFPwu4TEZg2FJPguox eVJ7GF2YsBRZPfZyUhv52P83tpkIElWWevpbN59DZsEy3WF2eyQSvi7m/p8ngXEAi9 QuNhmVTgqlpdG4Ft0ghhcSjFT4BV7xnOH/53F8KM= X-Riseup-User-ID: 57FA972296985513C45FBA857BF3126E337A6B54E56D7D6265C58BE13102ACC4 Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xQ5DzHz8vXL; Tue, 8 Sep 2020 09:00:10 -0700 (PDT) From: Martin Becze To: 43183@debbugs.gnu.org Subject: [PATCH v3 4/4] gnu: Add loko-scheme. Date: Tue, 8 Sep 2020 10:59:46 -0500 Message-Id: <20200908155946.2322-5-mjbecze@riseup.net> In-Reply-To: <20200908155946.2322-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200908155946.2322-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: Martin Becze X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) * gnu/packages/loko.scm (loko-scheme): New variable. --- gnu/local.mk | 2 + gnu/packages/loko.scm | 85 +++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 87 insertions(+) create mode 100644 gnu/packages/loko.scm diff --git a/gnu/local.mk b/gnu/local.mk index dd15126b26..10f8ee5b9a 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -36,6 +36,7 @@ # Copyright © 2020 Jan Wielkiewicz # Copyright © 2020 Brice Waegeneire # Copyright © 2020 Tanguy Le Carrour +# Copyright © 2020 Martin Becze # # This file is part of GNU Guix. # @@ -342,6 +343,7 @@ GNU_SYSTEM_MODULES = \ %D%/packages/lout.scm \ %D%/packages/logging.scm \ %D%/packages/logo.scm \ + %D%/packages/loko.scm \ %D%/packages/lolcode.scm \ %D%/packages/lsof.scm \ %D%/packages/lua.scm \ diff --git a/gnu/packages/loko.scm b/gnu/packages/loko.scm new file mode 100644 index 0000000000..1f216d27f9 --- /dev/null +++ b/gnu/packages/loko.scm @@ -0,0 +1,85 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2020 Martin Becze +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu packages loko) + #:use-module (guix packages) + #:use-module (guix git-download) + #:use-module (guix build-system gnu) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (gnu packages package-management) + #:use-module (gnu packages guile) + #:use-module (gnu packages guile-xyz) + #:use-module (gnu packages chez)) + +(define-public loko-scheme + (package + (name "loko-scheme") + (version "0.6.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/weinholt/loko.git") + (commit (string-append "v" version)))) + (sha256 + (base32 "019jlh3lywy912cfz689c9fxgf4bi5700i9k04g7sl5w5gchj36m")) + (file-name (git-file-name name version)))) + (build-system gnu-build-system) + (arguments + `(;; r7rs tests are still failing as of 0.6.0. + #:tests? #f + #:strip-binaries? #f + #:make-flags + (let ((out (assoc-ref %outputs "out"))) + (list + (string-append "PREFIX=" out) + (string-append "GDB_AUTOLOAD_PATH=" out "/share/gdb/auto-load"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) + (add-before 'build 'akku-fixes + (lambda* (#:key inputs #:allow-other-keys) + (delete-file "Akku.lock") + (substitute* "Akku.manifest" + (("\\(depends.*") "(depends)")) + (invoke "akku" "install") + (let ((dest "./.akku/lib/") + (source "/share/guile/site/3.0/")) + (for-each + (lambda (name) + ;; Symlink the scheme libraries so that Akku can find them + (symlink (string-append (assoc-ref inputs name) source name) + (string-append dest name))) + '("struct" ,"laesare" ,"pfds" ,"machine-code"))) + (substitute* ".akku/env" + (("/bin/sh") (which "sh"))) + #t))))) + (native-inputs + `(("akku" ,akku) + ("chez-scheme" ,chez-scheme) + ("struct" ,guile-struct-pack) + ("laesare" ,guile-laesare) + ("pfds" ,guile-pfds) + ("machine-code" ,guile-machine-code))) + (home-page "https://scheme.fail") + (synopsis "Implementation of the algorithmic language Scheme") + (description + "Loko Scheme is intended to be a platform for application and operating +system development. It is written purely in Scheme and some assembler (i.e. no +C code at the bottom). Both the R6RS and the R7RS standards are supported.") + (license license:agpl3+))) -- 2.28.0 From debbugs-submit-bounces@debbugs.gnu.org Tue Sep 08 12:04:44 2020 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:04:45 +0000 Received: from localhost ([127.0.0.1]:56173 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg6u-0006kg-Mx for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:04:44 -0400 Received: from mx1.riseup.net ([198.252.153.129]:47074) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg6t-0006kZ-TB for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:04:44 -0400 Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm92g27SCzFdPL; Tue, 8 Sep 2020 09:04:43 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599581083; bh=A8ArXD7w+XIVpMrL46EgyDcdS8WebDKrlnJapZA6Yiw=; h=Subject:To:Cc:References:From:Date:In-Reply-To:From; b=V9CjRc/5k0mULy+mNWiSj5Dkcce/tDcDk7AMnJSoOkcA+Gh9YdNUK0JuLuuRZ1kDs NYh51Dgc9Sap+U8Pd1CXUHk2/VjC/1btr7KZ7BxFFu5g7/Z34qrfvEPElesbXIkHpl iIrFk0OmFkc7eolEfbYs5u4uGe/OePTq3T3qhpFg= X-Riseup-User-ID: 6D2B5934CD727FC1518FFF203CFA7C8A7022CCCF5C8FA72322FB4FB8DE18A2AA Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4Bm92d2VRVzJs5K; Tue, 8 Sep 2020 09:04:40 -0700 (PDT) Subject: Re: [bug#43183] [PATCH v2 3/5] gnu: Add guile-struct-pack. To: Mathieu Othacehe References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> <20200904202517.6131-4-mjbecze@riseup.net> <87zh62m747.fsf@gnu.org> From: Martin Becze Autocrypt: addr=mjbecze@riseup.net; keydata= mQENBE9w5AMBCADgJkbsy1TAb9x2MHupHGu+Rb7utyvsx/tdv2amgkm80PdzDWOAVJGvRX8g UQfnUUIUwXhicdd0mG5Xmf1S6YreV2qM2rYqO8rFk6cWyLK6901NpD+gXJgjKLipvjk+8370 l7yUJmoSDdNDK7kIhWOs6HYkMK5No/Bs4SbtY5PjF1tVmNbk5KzlyKUDmMclQB1gI0cmrJ2s doTuLz4IC90UZYhV9pq/MIGjlh4eY8aQR5Uj6/jXtrwneS9V3ouhB+R9uHtKqqyok5nNdPlC UvfA/bo/2er9UAmSkewLQOTKOfwj0Ei5IQ2eRLtO5LZLZi3K4m6FOB9s37gZ5K8tp/KtABEB AAG0G21hcnRpbiA8bWpiZWN6ZUByaXNldXAubmV0PokBTwQTAQIAOQIbIwYLCQgHAwIGFQgC CQoLBBYCAwECHgECF4AWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9 l0SRB/9GFqbQeOADWJe9ke5RAAvD5HVGQCPCAsp+h+krgdsaOUySVAoVjo29fRQVoqmF1KY2 iCw9WQGiiwD8aMCEH1W+o9QPxMYeWFFyhqErEsv/BQRWNbvS9xb5YUXcB9QY68WDP83v5he2 pL7DI7fWwAx6xAAw9rgEduABewULNCsTUJzd9UG6HILEY7DLl/addQjvtTaITfKPYrrLnHND fQlGtxgzsfbkxezO8gYLARQBxAWETjOYxpt8d9J36FNnQN8OcsuXjEgYWh7dsPtp+w3P8Yj9 5YrEu/9+eehSy9ath6vhRF9N+/gvmR5WAb5EB8w/hm11pjeX9tY8vK7vuTt9uQENBE9w5AMB CADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc 8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsS k0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHo YPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNs fzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAEC ACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ 4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQ Kbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+q ecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX 3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWN ZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEW OslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsE wBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2e MfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6f Znyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+ WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz 7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/ 3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jp QKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr 2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN 1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4f z2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu6 4goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1F KV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WY klm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd 9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tB E3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA 2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8Aap WeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWu ad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee 0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69Y rAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDey qz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDS vxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O 0sP0pbX43gckRxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFF FIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx +/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67 LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9 lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32 bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/E J2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72 yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv 6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ /52H6c/CR7MVuQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm2 9JKWJ7GiAEr9HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gck Rxli01HouyL8IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBc hIuLk9IixsWAg4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZ JDQLIv7YdDiYuQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAA u6ebzwyvABEBAAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAK CRAyGpsLNjs9l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHx CsoqCMz+eneFVhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdn MQp6RWnin4ldtZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6T EW1qXs0cjMd/gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3 RFYqdxghW6brlmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MV uQENBE9w5AMBCADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9 HOtHXDGJFbTc8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8 IbZouYAlyDsSk0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWA g4o5gWUQaoHoYPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiY uQWq9jQwuQNsfzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEB AAGJATYEGAECACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9 l6SuCAC1mgXQ4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneF VhzTLzdsmIjQKbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ld tZoD1gHrvi+qecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/ gKu6IUk6fFmX3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6br lmhRv28muUWNZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MVuQENBE9w5AMB CADE6N30hVEWOslgeMRX6Nu64goqIl0bWtDSvxs2jutimNm29JKWJ7GiAEr9HOtHXDGJFbTc 8OHhz1YoINsEwBoD1czOp+1FKV8i6HCL73+O0sP0pbX43gckRxli01HouyL8IbZouYAlyDsS k0o/VTPi1P2eMfNSXG77I8WYklm46hzv7KFFFIzHWF2bfLBchIuLk9IixsWAg4o5gWUQaoHo YPOzXv1m6h6fZnyy6gIs57Dd9Cwakxv7mZLx+/Yf9hnYAYRZJDQLIv7YdDiYuQWq9jQwuQNs fzYMI6NKgQC+WwOjCbksq9tBE3G4hldltS67LogTtLN6kMAAu6ebzwyvABEBAAGJATYEGAEC ACACGwwWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9l6SuCAC1mgXQ 4+WvOGIhgeE/3QxuafVj8AapWeN54Lp5On32bkphwAVBFSHxCsoqCMz+eneFVhzTLzdsmIjQ Kbd1U2BZf5jpQKKC+WsNxfWuad2Q500bYO/EJ2kkgKoW8sdnMQp6RWnin4ldtZoD1gHrvi+q ecnLqVSt3zJr2CmI+eBzSDee0KJxXYx2ga72yrrH9UhYE+6TEW1qXs0cjMd/gKu6IUk6fFmX 3mzizUG6k4lN1WefLgRkS69YrAiRTtrpUvMv6BEeLBDlBzi3RFYqdxghW6brlmhRv28muUWN ZjlEbsKmDE4fz2JVN64/wDeyqz/XREkWNYtJ/52H6c/CR7MV Message-ID: <7583c236-9d0b-bb2c-51d7-0215c0bf57b9@riseup.net> Date: Tue, 8 Sep 2020 11:04:27 -0500 MIME-Version: 1.0 In-Reply-To: <87zh62m747.fsf@gnu.org> Content-Type: multipart/signed; micalg=pgp-sha256; protocol="application/pgp-signature"; boundary="iEOOkd5PYRYHDHdHO3rUeulAPmfavMH9N" X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 43183 Cc: 43183@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.7 (-) This is an OpenPGP/MIME signed message (RFC 4880 and 3156) --iEOOkd5PYRYHDHdHO3rUeulAPmfavMH9N Content-Type: multipart/mixed; boundary="huP5wisrDqvGQM62dfxLJiiMFBsU4VMWW"; protected-headers="v1" From: Martin Becze To: Mathieu Othacehe Cc: 43183@debbugs.gnu.org Message-ID: <7583c236-9d0b-bb2c-51d7-0215c0bf57b9@riseup.net> Subject: Re: [bug#43183] [PATCH v2 3/5] gnu: Add guile-struct-pack. References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> <20200904202517.6131-4-mjbecze@riseup.net> <87zh62m747.fsf@gnu.org> In-Reply-To: <87zh62m747.fsf@gnu.org> --huP5wisrDqvGQM62dfxLJiiMFBsU4VMWW Content-Type: text/plain; charset=utf-8 Content-Language: en-US Content-Transfer-Encoding: quoted-printable Thanks for the feedback Mathieu! On 9/7/20 1:30 AM, Mathieu Othacehe wrote: > Make sure to use the correct indentation, using Emacs or indent-code.el= > script. I apologize, I'm having a bit of difficultly with Emacs atm. > Could you send an updated version :) ? I just sent V3, hopefull with all the feedback correctly integrated. --huP5wisrDqvGQM62dfxLJiiMFBsU4VMWW-- --iEOOkd5PYRYHDHdHO3rUeulAPmfavMH9N Content-Type: application/pgp-signature; name="signature.asc" Content-Description: OpenPGP digital signature Content-Disposition: attachment; filename="signature.asc" -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEE8+//NTq9LY27wNqxMhqbCzY7PZcFAl9Xq4sACgkQMhqbCzY7 PZcqvAf/SB+R8SaANwAB4eYw0bxPELW9/ZRWeWfIPzZt7DNSp2ZSWT3Zl2skVSxr Mkro/oqPUxV7WE/QxQDJLFNMOS5iTi8KecW45MZhTpjZcN0q14uacHLQmLaohZxr JABqaDtX2hmsVsdf2tV7nDHfk8+Vg1gbJSIHvp4IFDIPD7wzTsKXV/V88bSvbaRH l07Mx/0AI0NKSFtkmNKpJsOakbIMz4jo6lFlQwt7V8jUwHo9XLgWTZTb/y1AjyAW w0BaUfzyWXMnOgDX7gwYCqVe8u64WaY6yujCA/6oRlth++us2o8fBfuRSnIR4xBL 8R/1km4sGf/CT6taeuqJlYhu0fZjLg== =kOv+ -----END PGP SIGNATURE----- --iEOOkd5PYRYHDHdHO3rUeulAPmfavMH9N-- From debbugs-submit-bounces@debbugs.gnu.org Thu Sep 10 03:37:36 2020 Received: (at 43183-done) by debbugs.gnu.org; 10 Sep 2020 07:37:36 +0000 Received: from localhost ([127.0.0.1]:35853 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kGH9E-0003S3-Fe for submit@debbugs.gnu.org; Thu, 10 Sep 2020 03:37:36 -0400 Received: from eggs.gnu.org ([209.51.188.92]:57418) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kGH99-0003Rn-TM for 43183-done@debbugs.gnu.org; Thu, 10 Sep 2020 03:37:35 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:52288) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kGH94-0006FD-8N; Thu, 10 Sep 2020 03:37:26 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=51538 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kGH93-0006KI-RD; Thu, 10 Sep 2020 03:37:26 -0400 From: Mathieu Othacehe To: Martin Becze Subject: Re: [bug#43183] [PATCH v2 3/5] gnu: Add guile-struct-pack. References: <20200903150243.27796-1-mjbecze@riseup.net> <20200904202517.6131-1-mjbecze@riseup.net> <20200904202517.6131-4-mjbecze@riseup.net> <87zh62m747.fsf@gnu.org> <7583c236-9d0b-bb2c-51d7-0215c0bf57b9@riseup.net> Date: Thu, 10 Sep 2020 09:37:24 +0200 In-Reply-To: <7583c236-9d0b-bb2c-51d7-0215c0bf57b9@riseup.net> (Martin Becze's message of "Tue, 8 Sep 2020 11:04:27 -0500") Message-ID: <87blie5bgr.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 43183-done Cc: 43183-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hello Martin, > I apologize, I'm having a bit of difficultly with Emacs atm. No worries! I fixed minor details and pushed. Thanks, -- Mathieu https://othacehe.org From unknown Fri Jun 20 07:24:18 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Thu, 08 Oct 2020 11:24:10 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator