From unknown Fri Aug 15 16:21:19 2025 X-Loop: help-debbugs@gnu.org Subject: bug#24286: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each raises an exception Resent-From: David Pirotte Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Mon, 22 Aug 2016 01:05:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 24286 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: 24286@debbugs.gnu.org X-Debbugs-Original-To: Received: via spool by submit@debbugs.gnu.org id=B.147182786623883 (code B ref -1); Mon, 22 Aug 2016 01:05:02 +0000 Received: (at submit) by debbugs.gnu.org; 22 Aug 2016 01:04:26 +0000 Received: from localhost ([127.0.0.1]:36309 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bbdf7-0006D9-QO for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:26 -0400 Received: from eggs.gnu.org ([208.118.235.92]:49036) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bbdf6-0006Cx-7b for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:25 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bbdf0-0003VI-2J for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:19 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50 autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:35133) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdez-0003VE-VQ for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:17 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:40004) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdex-0005du-N3 for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:16 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bbdes-0003Up-Mr for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:15 -0400 Received: from maximusconfessor.all2all.org ([79.99.200.102]:46340) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdes-0003Oc-Dr for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:10 -0400 Received: from localhost (unknown [192.168.0.2]) by maximusconfessor.all2all.org (Postfix) with ESMTP id 801D4A04C207 for ; Mon, 22 Aug 2016 03:03:46 +0200 (CEST) Received: from maximusconfessor.all2all.org ([192.168.0.1]) by localhost (maximusconfessor.all2all.org [192.168.0.2]) (amavisd-new, port 10024) with ESMTP id 7Bx0-PYiWEW8 for ; Mon, 22 Aug 2016 03:03:42 +0200 (CEST) Received: from capac (unknown [177.17.25.43]) by maximusconfessor.all2all.org (Postfix) with ESMTPSA id C259EA04C200 for ; Mon, 22 Aug 2016 03:03:41 +0200 (CEST) Date: Sun, 21 Aug 2016 22:03:33 -0300 From: David Pirotte Message-ID: <20160821220333.24968f49@capac> X-Mailer: Claws Mail 3.14.0 (GTK+ 2.24.30; x86_64-pc-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/XD/t1nKtfg7jJ3_3mCdxf1s"; protocol="application/pgp-signature" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -5.0 (-----) 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: -5.0 (-----) --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Hello Guilers, Hi Andy, Here below a mini module [1], which raises an exception [2] using 2.1.3.104= -8f2f8 (it compiles fine using 2.0.12). It looks a bit of a 'silly' module but the re= al one here do need this combination, I just minimized it for tracking purposes... For info, if I either comment the use of srfi-1, or merge-generics, _or_ th= e for-each expression, it compiles fine. I also tried foo to just do a (filter-map str= ing? words) and no for-each, to circumvent the problem as far as I could, and it compiles fie as well: it appears there is a side effect of the for-each ver= sion from srfi-1 over the core version, when using goops and declaring #:duplicates (merge-generics ...). Cheers, David [1] (define-module (foo) #:use-module (srfi srfi-1) #:use-module (oop goops) =20 #:duplicates (merge-generics replace warn-override-core warn last) =20 #:export (foo)) (define (foo words) (for-each (lambda (word) (display (string-append word " "))) words) (newline)) [2] guild --version guild (GNU Guile) 2.1.3.104-8f2f8 guild compile foo.scm Backtrace: In system/base/compile.scm: 43:4 19 (call-once _) In ice-9/boot-9.scm: 829:4 18 (with-throw-handler _ _ _) In system/base/compile.scm: 59:11 17 (_) 155:11 16 (_ #) 235:18 15 (read-and-compile # #:from _ #:to _ # =E2= =80=A6) 183:32 14 (compile-fold (#) =E2=80= =A6) In ice-9/boot-9.scm: 2325:4 13 (save-module-excursion #) In language/scheme/compile-tree-il.scm: 31:15 12 (_) In ice-9/psyntax.scm: 1208:22 11 (expand-top-sequence ((define (foo words) (# (=E2=80=A6) #) #)= ) =E2=80=A6) In ice-9/boot-9.scm: 224:17 10 (map1 (#)) In ice-9/psyntax.scm: 1383:12 9 (_) 1763:11 8 (lp (#(syntax-object (for-each (lambda (#) #) #) # =E2=80=A6) = =E2=80=A6) =E2=80=A6) 1586:33 7 (parse (((("placeholder" placeholder) (# . #) =E2=80=A6) . #) = =E2=80=A6) =E2=80=A6) 1307:27 6 (syntax-type (for-each (lambda (word) (display #)) #) # =E2=80= =A6) 1291:39 5 (syntax-type for-each (("placeholder" placeholder) # #) =E2=80= =A6) 302:24 4 (resolve-identifier _ _ (("placeholder" placeholder) =E2=80=A6= ) =E2=80=A6) In unknown file: 3 (module-variable # for-each) In oop/goops.scm: 1437:4 2 (cache-miss # for-each # =E2=80=A6) In unknown file: 1 (scm-error goops-error #f "No applicable method for ~S=E2=80= =A6" =E2=80=A6) In ice-9/boot-9.scm: 753:26 0 (dispatch-exception _ _ _) ice-9/boot-9.scm:753:26: In procedure dispatch-exception: ice-9/boot-9.scm:753:26: No applicable method for #< merge-generic= s (3)> in call (merge-generics # for-each # # # srfi-1) 1e4ca20> # #f 1e02ea0> #f) --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 iQEcBAEBCAAGBQJXuk9mAAoJEPN0/ZOjBXrXGtoIAJtocghWHFNW7WPgWUDJawJD BTRD99+F/YQaD5zpk8vB2MOkcuoo8e9Z8WP8DFBRh4gz02mRszC07aeo9g459l3k om3aiEWe3iOAzNLME0g72RZegmO/35mOgK6iYi4HGmSSgn8M9pSxMHWTkxr2xS3B mniikuQde+lCamAQkF3HhR+iuH0EGMuQJE2aH07HZG87bDkrhQVweemq09PkWATs Ktci5tk74MWsMcKh/Gz8Pz1hpUwNV9mpNL4hzjNk2GndZJi3fL6Ge8qyJzYU2rW4 7TdIrm/yA5C7GkiZPkBdvHmKpxcqtr02TchH5Uj+39MebZxDllDBtpkdQjNdSWg= =tiB7 -----END PGP SIGNATURE----- --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s-- From unknown Fri Aug 15 16:21:19 2025 X-Loop: help-debbugs@gnu.org Subject: bug#24286: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each raises an exception Resent-From: Andy Wingo Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Fri, 02 Sep 2016 07:31:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 24286 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: David Pirotte Cc: 24286@debbugs.gnu.org Received: via spool by 24286-submit@debbugs.gnu.org id=B24286.147280142223022 (code B ref 24286); Fri, 02 Sep 2016 07:31:02 +0000 Received: (at 24286) by debbugs.gnu.org; 2 Sep 2016 07:30:22 +0000 Received: from localhost ([127.0.0.1]:46913 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfive-0005zG-0X for submit@debbugs.gnu.org; Fri, 02 Sep 2016 03:30:22 -0400 Received: from pb-sasl1.pobox.com ([64.147.108.66]:65032 helo=sasl.smtp.pobox.com) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfivb-0005z7-Fk for 24286@debbugs.gnu.org; Fri, 02 Sep 2016 03:30:20 -0400 Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id ED96337ADA; Fri, 2 Sep 2016 03:30:18 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; s=sasl; bh=53ckNWqZzeA98htpm5qm7RrFJLc=; b=i63N6x NW5Z59wPORg4bFkGtzzOx9TNQTrxF0fQ12gt8h4ee2KxxXIqUH0soynnB76bNDS0 t0xVrccNSb2TNIQAJTwX7ISgW6PqFoXZKJrtVcObW+n+fUoTrZUtEmpI5XggKqY8 U3VymzHeSSn2+2c02NEQG72tj88Wo2UK1SCag= DomainKey-Signature: a=rsa-sha1; c=nofws; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; q=dns; s=sasl; b=gZ7TFD6KlsyAfkaWoXiquanZrbN9BByL CK8H1PyZIl6JKzpf0QdXn/34oLiYH4qXIcRPdYDkS60twNiC1SZX2r44x9MWs4Fg MHBydxyXMG5fdIQIsjUxzj/i15rG2KmCPH7A8jeqOuXxYQyfqUSvygTjevi2GSBJ v2QU+CVf6IU= Received: from pb-sasl1.nyi.icgroup.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id CBD1B37AD8; Fri, 2 Sep 2016 03:30:18 -0400 (EDT) Received: from clucks (unknown [88.160.190.192]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by pb-sasl1.pobox.com (Postfix) with ESMTPSA id C5FE837AD7; Fri, 2 Sep 2016 03:30:17 -0400 (EDT) From: Andy Wingo References: <20160821220333.24968f49@capac> Date: Fri, 02 Sep 2016 09:30:10 +0200 In-Reply-To: <20160821220333.24968f49@capac> (David Pirotte's message of "Sun, 21 Aug 2016 22:03:33 -0300") Message-ID: <8760qekbct.fsf@pobox.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Pobox-Relay-ID: 19028572-70DF-11E6-A705-CE686462E9F6-02397024!pb-sasl1.pobox.com X-Spam-Score: -1.5 (-) 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.5 (-) On Mon 22 Aug 2016 03:03, David Pirotte writes: > Hello Guilers, > Hi Andy, > > Here below a mini module [1], which raises an exception [2] using 2.1.3.104-8f2f8 (it > compiles fine using 2.0.12). It looks a bit of a 'silly' module but the real one > here do need this combination, I just minimized it for tracking purposes... > > For info, if I either comment the use of srfi-1, or merge-generics, _or_ the for-each > expression, it compiles fine. I also tried foo to just do a (filter-map string? > words) and no for-each, to circumvent the problem as far as I could, and it > compiles fie as well: it appears there is a side effect of the for-each version from > srfi-1 over the core version, when using goops and declaring #:duplicates > (merge-generics ...). > > Cheers, > David > > [1] > > (define-module (foo) > #:use-module (srfi srfi-1) > #:use-module (oop goops) > > #:duplicates (merge-generics > replace > warn-override-core > warn > last) So here you are importing two definitions of for-each: one from (guile) and one from (srfi srfi-1). They are both normal procedures. What should happen? I guess merge-generics should fail to do anything. I suppose that is the intention of this method in (oop goops): (define-method (merge-generics (module ) (name ) (int1 ) (val1 ) (int2 ) (val2 ) (var ) (val )) #f) And yet you get: ERROR: No applicable method for #< merge-generics (3)> in call (merge-generics # for-each # # # # #f #f) This sounds like a bug to me, surely the method should match. On the other hand this looks bogus to me: scheme@(foo)> (class-of (resolve-interface '(guile))) $4 = #< 244bbd0> scheme@(foo)> (class-of (resolve-interface '(guile))) $5 = #< 244b900> Why are we getting two distinct values for the class? Further investigation necessary. Andy From unknown Fri Aug 15 16:21:19 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: David Pirotte Subject: bug#24286: closed (Re: bug#24286: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each raises an exception) Message-ID: References: <871t12kaor.fsf@pobox.com> <20160821220333.24968f49@capac> X-Gnu-PR-Message: they-closed 24286 X-Gnu-PR-Package: guile Reply-To: 24286@debbugs.gnu.org Date: Fri, 02 Sep 2016 07:45:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1472802302-24407-1" This is a multi-part message in MIME format... ------------=_1472802302-24407-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #24286: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each rai= ses an exception which was filed against the guile package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 24286@debbugs.gnu.org. --=20 24286: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D24286 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1472802302-24407-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 24286-done) by debbugs.gnu.org; 2 Sep 2016 07:44:47 +0000 Received: from localhost ([127.0.0.1]:46924 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfj9a-0006Ky-Mv for submit@debbugs.gnu.org; Fri, 02 Sep 2016 03:44:47 -0400 Received: from pb-sasl1.pobox.com ([64.147.108.66]:54922 helo=sasl.smtp.pobox.com) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfj9Y-0006Kr-Ur for 24286-done@debbugs.gnu.org; Fri, 02 Sep 2016 03:44:45 -0400 Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id 890B537BBA; Fri, 2 Sep 2016 03:44:44 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; s=sasl; bh=r6PqBi+vRaYcQe/cvt9WuHrP9hc=; b=A0qvbk GmqVT7OFpW8ARefyjNXurVjsbw+lhkHKWmj86m4xYbpDwU6iUvIA17mftYEd7qY+ zB2qAsjDdMYy7YRUmDnSi+UC+QkM9KeIF4Fuwf81iZ1h3hssaDPD3uqocezCN42z wx/OQLGiHcT648/t2QFLMzSfLlPRyxm7UYm38= DomainKey-Signature: a=rsa-sha1; c=nofws; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; q=dns; s=sasl; b=FNmpgYpNRX4xIZTz4WkB+4ghXzByyWmw QH+V0Kq7C2dCxvoojdw13WBtmkvD6mhclOLswdfs45CS+LCb4B9vhYssbKLugm3l 39YfxtWX5wgUKZjNe3dWGS0LWiam/ZGh4MmrpPARyHDKGlGKm5veAA5MAJFPDNkE adFr/HdOec0= Received: from pb-sasl1.nyi.icgroup.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id 6D52A37BB9; Fri, 2 Sep 2016 03:44:44 -0400 (EDT) Received: from clucks (unknown [88.160.190.192]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by pb-sasl1.pobox.com (Postfix) with ESMTPSA id C32DC37BB8; Fri, 2 Sep 2016 03:44:43 -0400 (EDT) From: Andy Wingo To: David Pirotte Subject: Re: bug#24286: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each raises an exception References: <20160821220333.24968f49@capac> Date: Fri, 02 Sep 2016 09:44:36 +0200 In-Reply-To: <20160821220333.24968f49@capac> (David Pirotte's message of "Sun, 21 Aug 2016 22:03:33 -0300") Message-ID: <871t12kaor.fsf@pobox.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Pobox-Relay-ID: 1D151C90-70E1-11E6-9741-CE686462E9F6-02397024!pb-sasl1.pobox.com X-Spam-Score: -1.5 (-) X-Debbugs-Envelope-To: 24286-done Cc: 24286-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: -1.5 (-) On Mon 22 Aug 2016 03:03, David Pirotte writes: > Here below a mini module [1], which raises an exception [2] using 2.1.3.104-8f2f8 (it > compiles fine using 2.0.12). It looks a bit of a 'silly' module but the real one > here do need this combination, I just minimized it for tracking purposes... Thanks for the report, it was a nice bug. Fixed in master. Cheers, Andy ------------=_1472802302-24407-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 22 Aug 2016 01:04:26 +0000 Received: from localhost ([127.0.0.1]:36309 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bbdf7-0006D9-QO for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:26 -0400 Received: from eggs.gnu.org ([208.118.235.92]:49036) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bbdf6-0006Cx-7b for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:25 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bbdf0-0003VI-2J for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:19 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50 autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:35133) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdez-0003VE-VQ for submit@debbugs.gnu.org; Sun, 21 Aug 2016 21:04:17 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:40004) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdex-0005du-N3 for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:16 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bbdes-0003Up-Mr for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:15 -0400 Received: from maximusconfessor.all2all.org ([79.99.200.102]:46340) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bbdes-0003Oc-Dr for bug-guile@gnu.org; Sun, 21 Aug 2016 21:04:10 -0400 Received: from localhost (unknown [192.168.0.2]) by maximusconfessor.all2all.org (Postfix) with ESMTP id 801D4A04C207 for ; Mon, 22 Aug 2016 03:03:46 +0200 (CEST) Received: from maximusconfessor.all2all.org ([192.168.0.1]) by localhost (maximusconfessor.all2all.org [192.168.0.2]) (amavisd-new, port 10024) with ESMTP id 7Bx0-PYiWEW8 for ; Mon, 22 Aug 2016 03:03:42 +0200 (CEST) Received: from capac (unknown [177.17.25.43]) by maximusconfessor.all2all.org (Postfix) with ESMTPSA id C259EA04C200 for ; Mon, 22 Aug 2016 03:03:41 +0200 (CEST) Date: Sun, 21 Aug 2016 22:03:33 -0300 From: David Pirotte To: Subject: Guile-2.2: srfi-1 + #:duplicates (merge-generics...) + for-each raises an exception Message-ID: <20160821220333.24968f49@capac> X-Mailer: Claws Mail 3.14.0 (GTK+ 2.24.30; x86_64-pc-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/XD/t1nKtfg7jJ3_3mCdxf1s"; protocol="application/pgp-signature" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -5.0 (-----) X-Debbugs-Envelope-To: submit 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: -5.0 (-----) --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Hello Guilers, Hi Andy, Here below a mini module [1], which raises an exception [2] using 2.1.3.104= -8f2f8 (it compiles fine using 2.0.12). It looks a bit of a 'silly' module but the re= al one here do need this combination, I just minimized it for tracking purposes... For info, if I either comment the use of srfi-1, or merge-generics, _or_ th= e for-each expression, it compiles fine. I also tried foo to just do a (filter-map str= ing? words) and no for-each, to circumvent the problem as far as I could, and it compiles fie as well: it appears there is a side effect of the for-each ver= sion from srfi-1 over the core version, when using goops and declaring #:duplicates (merge-generics ...). Cheers, David [1] (define-module (foo) #:use-module (srfi srfi-1) #:use-module (oop goops) =20 #:duplicates (merge-generics replace warn-override-core warn last) =20 #:export (foo)) (define (foo words) (for-each (lambda (word) (display (string-append word " "))) words) (newline)) [2] guild --version guild (GNU Guile) 2.1.3.104-8f2f8 guild compile foo.scm Backtrace: In system/base/compile.scm: 43:4 19 (call-once _) In ice-9/boot-9.scm: 829:4 18 (with-throw-handler _ _ _) In system/base/compile.scm: 59:11 17 (_) 155:11 16 (_ #) 235:18 15 (read-and-compile # #:from _ #:to _ # =E2= =80=A6) 183:32 14 (compile-fold (#) =E2=80= =A6) In ice-9/boot-9.scm: 2325:4 13 (save-module-excursion #) In language/scheme/compile-tree-il.scm: 31:15 12 (_) In ice-9/psyntax.scm: 1208:22 11 (expand-top-sequence ((define (foo words) (# (=E2=80=A6) #) #)= ) =E2=80=A6) In ice-9/boot-9.scm: 224:17 10 (map1 (#)) In ice-9/psyntax.scm: 1383:12 9 (_) 1763:11 8 (lp (#(syntax-object (for-each (lambda (#) #) #) # =E2=80=A6) = =E2=80=A6) =E2=80=A6) 1586:33 7 (parse (((("placeholder" placeholder) (# . #) =E2=80=A6) . #) = =E2=80=A6) =E2=80=A6) 1307:27 6 (syntax-type (for-each (lambda (word) (display #)) #) # =E2=80= =A6) 1291:39 5 (syntax-type for-each (("placeholder" placeholder) # #) =E2=80= =A6) 302:24 4 (resolve-identifier _ _ (("placeholder" placeholder) =E2=80=A6= ) =E2=80=A6) In unknown file: 3 (module-variable # for-each) In oop/goops.scm: 1437:4 2 (cache-miss # for-each # =E2=80=A6) In unknown file: 1 (scm-error goops-error #f "No applicable method for ~S=E2=80= =A6" =E2=80=A6) In ice-9/boot-9.scm: 753:26 0 (dispatch-exception _ _ _) ice-9/boot-9.scm:753:26: In procedure dispatch-exception: ice-9/boot-9.scm:753:26: No applicable method for #< merge-generic= s (3)> in call (merge-generics # for-each # # # srfi-1) 1e4ca20> # #f 1e02ea0> #f) --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 iQEcBAEBCAAGBQJXuk9mAAoJEPN0/ZOjBXrXGtoIAJtocghWHFNW7WPgWUDJawJD BTRD99+F/YQaD5zpk8vB2MOkcuoo8e9Z8WP8DFBRh4gz02mRszC07aeo9g459l3k om3aiEWe3iOAzNLME0g72RZegmO/35mOgK6iYi4HGmSSgn8M9pSxMHWTkxr2xS3B mniikuQde+lCamAQkF3HhR+iuH0EGMuQJE2aH07HZG87bDkrhQVweemq09PkWATs Ktci5tk74MWsMcKh/Gz8Pz1hpUwNV9mpNL4hzjNk2GndZJi3fL6Ge8qyJzYU2rW4 7TdIrm/yA5C7GkiZPkBdvHmKpxcqtr02TchH5Uj+39MebZxDllDBtpkdQjNdSWg= =tiB7 -----END PGP SIGNATURE----- --Sig_/XD/t1nKtfg7jJ3_3mCdxf1s-- ------------=_1472802302-24407-1--