From unknown Fri Jun 20 07:25:08 2025 X-Loop: help-debbugs@gnu.org Subject: bug#10992: error signaled for syntax expression Resent-From: Stefan Israelsson Tampe Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-guile@gnu.org Resent-Date: Sun, 11 Mar 2012 13:55:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 10992 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: 10992@debbugs.gnu.org X-Debbugs-Original-To: bug-guile@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.133147406521929 (code B ref -1); Sun, 11 Mar 2012 13:55:02 +0000 Received: (at submit) by debbugs.gnu.org; 11 Mar 2012 13:54:25 +0000 Received: from localhost ([127.0.0.1]:44738 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6jE8-0005he-LB for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:54:25 -0400 Received: from eggs.gnu.org ([208.118.235.92]:54815) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6jDw-0005hC-A3 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:54:23 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1S6il7-0003CG-S3 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:24:27 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-6.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM, HTML_MESSAGE,RCVD_IN_DNSWL_HI,T_DKIM_INVALID autolearn=unavailable version=3.3.2 Received: from lists.gnu.org ([208.118.235.17]:33639) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6il7-0003CC-M2 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:24:25 -0400 Received: from eggs.gnu.org ([208.118.235.92]:35331) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6il2-0001ja-GE for bug-guile@gnu.org; Sun, 11 Mar 2012 09:24:25 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1S6ikh-00031D-TX for bug-guile@gnu.org; Sun, 11 Mar 2012 09:24:19 -0400 Received: from mail-ee0-f41.google.com ([74.125.83.41]:54384) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6ikh-00030w-KV for bug-guile@gnu.org; Sun, 11 Mar 2012 09:23:59 -0400 Received: by eeke53 with SMTP id e53so834261eek.0 for ; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:date:message-id:subject:from:to:content-type; bh=ozxLEaQXiIz4Rdumq4ZpTTP15NbRTqs6di8QikUDTbY=; b=Ewje3neP7klzhDeiadrT2PzuJPMl7c8PlRIVl5oVIH6n2XPY2hwOcmGLfnTb7mOvST zrZiiOeDwLOr+J2c6Tev4X66ngS1N2rpr1cggtRvoIfOMGvO1SdiGmcLI+mR1UuP3yWR woxpMhZgc4ZNL5bXgR2WUCZ2aDHHhQLUKRIvojyNmdQmvD5Yyj+Jt1EBI9NON+Gv07+H n/JzrHPBDu9URE6wQZA91zSYcOwPDXuPXFg2hJS7jGqPse1iiJOWYieda0mSG7gcc78v /YoymIzwG5AZKHQPa1hFpilWRTE3iTlSWHI+ICVDA4pt4b4YFPpnFnniZuVvzxZA37ur DhyA== MIME-Version: 1.0 Received: by 10.14.202.200 with SMTP id d48mr1376241eeo.44.1331472237478; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) Received: by 10.213.13.206 with HTTP; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) Date: Sun, 11 Mar 2012 14:23:57 +0100 Message-ID: From: Stefan Israelsson Tampe Content-Type: multipart/mixed; boundary=047d7b343ae4be42bf04baf7899a X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Received-From: 208.118.235.17 X-Spam-Score: -6.1 (------) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.1 (------) --047d7b343ae4be42bf04baf7899a Content-Type: multipart/alternative; boundary=047d7b343ae4be42bb04baf78998 --047d7b343ae4be42bb04baf78998 Content-Type: text/plain; charset=ISO-8859-1 Hi, I wanted to enter meta data where the symbols are important into a syntax object and tried to be smart in doing that but stumbled on this because loading (a simplified example) the attached file I get an annoying error e.g. ERROR: bad src $7 = #(a (a b) (a (b c) #f)) --047d7b343ae4be42bb04baf78998 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Hi,

I wanted to enter meta data where the= symbols are important into a syntax object and tried to be smart
in doi= ng that but stumbled on this because loading (a simplified example) the att= ached file I get an annoying error e.g.

ERROR: bad src
$7 =3D #(a (a b) (a (b c) #f))



--047d7b343ae4be42bb04baf78998-- --047d7b343ae4be42bf04baf7899a Content-Type: text/x-scheme; charset=US-ASCII; name="stx-bug.scm" Content-Disposition: attachment; filename="stx-bug.scm" Content-Transfer-Encoding: base64 X-Attachment-Id: f_gznw8g8s0 KGV2YWwtd2hlbiAoY29tcGlsZSBsb2FkIGV2YWwpCiAgKGRlZmluZSAoc3ludGF4LT5saXN0IHgp CiAgICAoc3ludGF4LWNhc2UgeCAoKQogICAgICAoKHggLiBsKSAoY29ucyAjJ3ggKHN0eC0+bGlz dCAjJ2wpKSkKICAgICAgKCgpICAgICAnKCkpKSkpCgooZXZhbC13aGVuIChjb21waWxlIGxvYWQg ZXZhbCkKICAoZGVmaW5lIChteS1kYXR1bS0+c3ludGF4IHN0eCBsKQogICAgKGRhdHVtLT5zeW50 YXggCiAgICAgc3R4CiAgICAgKG1hcCAobGFtYmRhICh4KSBgKHF1b3RlICx4KSkgbCkpKSkKCihk ZWZpbmUgcSAxKQoKKGRlZmluZS1zeW50YXggZgogIChsYW1iZGEgKHgpCiAgICAjYCh2ZWN0b3Ig IyxAKG15LWRhdHVtLT5zeW50YXggIydxCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgJyhhIChhIGIpIChhIChiIGMpICNmKSkpKSkpCgoKKGYgMSkK --047d7b343ae4be42bf04baf7899a-- From unknown Fri Jun 20 07:25:08 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.428 (Entity 5.428) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Stefan Israelsson Tampe Subject: bug#10992: closed (Re: bug#10992: error signaled for syntax expression) Message-ID: References: <87lin7qccy.fsf@netris.org> X-Gnu-PR-Message: they-closed 10992 X-Gnu-PR-Package: guile Reply-To: 10992@debbugs.gnu.org Date: Sun, 11 Mar 2012 17:58:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1331488682-26960-1" This is a multi-part message in MIME format... ------------=_1331488682-26960-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #10992: error signaled for syntax expression 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 10992@debbugs.gnu.org. --=20 10992: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D10992 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1331488682-26960-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 10992-done) by debbugs.gnu.org; 11 Mar 2012 17:57:16 +0000 Received: from localhost ([127.0.0.1]:45255 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6n19-0006zt-GA for submit@debbugs.gnu.org; Sun, 11 Mar 2012 13:57:16 -0400 Received: from world.peace.net ([96.39.62.75]:44426) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6n0x-0006zc-ME for 10992-done@debbugs.gnu.org; Sun, 11 Mar 2012 13:57:14 -0400 Received: from 209-6-97-113.c3-0.smr-ubr2.sbo-smr.ma.cable.rcn.com ([209.6.97.113] helo=yeeloong) by world.peace.net with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1S6mY2-0007Mp-P7; Sun, 11 Mar 2012 13:27:10 -0400 From: Mark H Weaver To: Stefan Israelsson Tampe Subject: Re: bug#10992: error signaled for syntax expression References: Date: Sun, 11 Mar 2012 13:25:01 -0400 In-Reply-To: (Stefan Israelsson Tampe's message of "Sun, 11 Mar 2012 14:23:57 +0100") Message-ID: <87lin7qccy.fsf@netris.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.92 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -1.9 (-) X-Debbugs-Envelope-To: 10992-done Cc: 10992-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -1.9 (-) Stefan Israelsson Tampe writes: > Hi, > > > I wanted to enter meta data where the symbols are important into a > syntax object and tried to be smart > in doing that but stumbled on this because loading (a simplified > example) the attached file I get an annoying error e.g. > > ERROR: bad src > $7 = #(a (a b) (a (b c) #f)) Fixed in 30398e94f9cadfaff44117bbff214b0b7ba703ca. Thanks! Mark ------------=_1331488682-26960-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 11 Mar 2012 13:54:25 +0000 Received: from localhost ([127.0.0.1]:44738 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6jE8-0005he-LB for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:54:25 -0400 Received: from eggs.gnu.org ([208.118.235.92]:54815) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S6jDw-0005hC-A3 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:54:23 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1S6il7-0003CG-S3 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:24:27 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-6.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM, HTML_MESSAGE,RCVD_IN_DNSWL_HI,T_DKIM_INVALID autolearn=unavailable version=3.3.2 Received: from lists.gnu.org ([208.118.235.17]:33639) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6il7-0003CC-M2 for submit@debbugs.gnu.org; Sun, 11 Mar 2012 09:24:25 -0400 Received: from eggs.gnu.org ([208.118.235.92]:35331) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6il2-0001ja-GE for bug-guile@gnu.org; Sun, 11 Mar 2012 09:24:25 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1S6ikh-00031D-TX for bug-guile@gnu.org; Sun, 11 Mar 2012 09:24:19 -0400 Received: from mail-ee0-f41.google.com ([74.125.83.41]:54384) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S6ikh-00030w-KV for bug-guile@gnu.org; Sun, 11 Mar 2012 09:23:59 -0400 Received: by eeke53 with SMTP id e53so834261eek.0 for ; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:date:message-id:subject:from:to:content-type; bh=ozxLEaQXiIz4Rdumq4ZpTTP15NbRTqs6di8QikUDTbY=; b=Ewje3neP7klzhDeiadrT2PzuJPMl7c8PlRIVl5oVIH6n2XPY2hwOcmGLfnTb7mOvST zrZiiOeDwLOr+J2c6Tev4X66ngS1N2rpr1cggtRvoIfOMGvO1SdiGmcLI+mR1UuP3yWR woxpMhZgc4ZNL5bXgR2WUCZ2aDHHhQLUKRIvojyNmdQmvD5Yyj+Jt1EBI9NON+Gv07+H n/JzrHPBDu9URE6wQZA91zSYcOwPDXuPXFg2hJS7jGqPse1iiJOWYieda0mSG7gcc78v /YoymIzwG5AZKHQPa1hFpilWRTE3iTlSWHI+ICVDA4pt4b4YFPpnFnniZuVvzxZA37ur DhyA== MIME-Version: 1.0 Received: by 10.14.202.200 with SMTP id d48mr1376241eeo.44.1331472237478; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) Received: by 10.213.13.206 with HTTP; Sun, 11 Mar 2012 06:23:57 -0700 (PDT) Date: Sun, 11 Mar 2012 14:23:57 +0100 Message-ID: Subject: error signaled for syntax expression From: Stefan Israelsson Tampe To: bug-guile@gnu.org Content-Type: multipart/mixed; boundary=047d7b343ae4be42bf04baf7899a X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Received-From: 208.118.235.17 X-Spam-Score: -6.1 (------) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.1 (------) --047d7b343ae4be42bf04baf7899a Content-Type: multipart/alternative; boundary=047d7b343ae4be42bb04baf78998 --047d7b343ae4be42bb04baf78998 Content-Type: text/plain; charset=ISO-8859-1 Hi, I wanted to enter meta data where the symbols are important into a syntax object and tried to be smart in doing that but stumbled on this because loading (a simplified example) the attached file I get an annoying error e.g. ERROR: bad src $7 = #(a (a b) (a (b c) #f)) --047d7b343ae4be42bb04baf78998 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Hi,

I wanted to enter meta data where the= symbols are important into a syntax object and tried to be smart
in doi= ng that but stumbled on this because loading (a simplified example) the att= ached file I get an annoying error e.g.

ERROR: bad src
$7 =3D #(a (a b) (a (b c) #f))



--047d7b343ae4be42bb04baf78998-- --047d7b343ae4be42bf04baf7899a Content-Type: text/x-scheme; charset=US-ASCII; name="stx-bug.scm" Content-Disposition: attachment; filename="stx-bug.scm" Content-Transfer-Encoding: base64 X-Attachment-Id: f_gznw8g8s0 KGV2YWwtd2hlbiAoY29tcGlsZSBsb2FkIGV2YWwpCiAgKGRlZmluZSAoc3ludGF4LT5saXN0IHgp CiAgICAoc3ludGF4LWNhc2UgeCAoKQogICAgICAoKHggLiBsKSAoY29ucyAjJ3ggKHN0eC0+bGlz dCAjJ2wpKSkKICAgICAgKCgpICAgICAnKCkpKSkpCgooZXZhbC13aGVuIChjb21waWxlIGxvYWQg ZXZhbCkKICAoZGVmaW5lIChteS1kYXR1bS0+c3ludGF4IHN0eCBsKQogICAgKGRhdHVtLT5zeW50 YXggCiAgICAgc3R4CiAgICAgKG1hcCAobGFtYmRhICh4KSBgKHF1b3RlICx4KSkgbCkpKSkKCihk ZWZpbmUgcSAxKQoKKGRlZmluZS1zeW50YXggZgogIChsYW1iZGEgKHgpCiAgICAjYCh2ZWN0b3Ig IyxAKG15LWRhdHVtLT5zeW50YXggIydxCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgJyhhIChhIGIpIChhIChiIGMpICNmKSkpKSkpCgoKKGYgMSkK --047d7b343ae4be42bf04baf7899a-- ------------=_1331488682-26960-1-- From unknown Fri Jun 20 07:25:08 2025 X-Loop: help-debbugs@gnu.org Subject: bug#10992: patch and fixed test References: In-Reply-To: Resent-From: Stefan Israelsson Tampe Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-guile@gnu.org Resent-Date: Sun, 18 Mar 2012 21:43:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 10992 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: 10992@debbugs.gnu.org Received: via spool by 10992-submit@debbugs.gnu.org id=B10992.13321069343412 (code B ref 10992); Sun, 18 Mar 2012 21:43:01 +0000 Received: (at 10992) by debbugs.gnu.org; 18 Mar 2012 21:42:14 +0000 Received: from localhost ([127.0.0.1]:56076 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S9Nrh-0000sz-FI for submit@debbugs.gnu.org; Sun, 18 Mar 2012 17:42:13 -0400 Received: from mail-ey0-f172.google.com ([209.85.215.172]:57387) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S9NrV-0000sQ-F1 for 10992@debbugs.gnu.org; Sun, 18 Mar 2012 17:42:11 -0400 Received: by eaaq11 with SMTP id q11so2714776eaa.3 for <10992@debbugs.gnu.org>; Sun, 18 Mar 2012 14:11:34 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:date:message-id:subject:from:to:content-type; bh=ebOvWHEi6JF+IgIEQ3BDWv/BZIHEk9m93++vLbXvZ0I=; b=gh2zD8g8UcYC3qSQyLFiqvwhvIQmTy6xVtqqwDiquHvQuCjGfVqaSldvj7ctjP7axM VNtwfZc8pHRSxdf8mDhqNP2B2AXI7AoDXL1X4CLPMo1UdYVL/QOLe5C2IwEIXIzhMCA7 Mf0EgsBdzcR033h88Cg5fOVPh3F1prsZP8BDL8iX7iyLejJyp+pfsFVZTJ1E7fL4Atw/ j7MmRaJFKIT5afJ04u/gTM0fH2lLqcZrMnzEMllDEyUt+Qoc1lYaPK7WFon1s5PcG19/ 5lmsyZw0hDCrl66E+sMPeV1fDl96UhZITrEz3elNp4UDkrRXDUcuJIuUrG6RFFDTswNq 3akw== MIME-Version: 1.0 Received: by 10.14.127.5 with SMTP id c5mr1264942eei.17.1332105093953; Sun, 18 Mar 2012 14:11:33 -0700 (PDT) Received: by 10.213.32.10 with HTTP; Sun, 18 Mar 2012 14:11:33 -0700 (PDT) Date: Sun, 18 Mar 2012 22:11:33 +0100 Message-ID: From: Stefan Israelsson Tampe Content-Type: multipart/mixed; boundary=90e6ba615076edba1504bb8ae227 X-Spam-Score: -2.6 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.6 (--) --90e6ba615076edba1504bb8ae227 Content-Type: multipart/alternative; boundary=90e6ba615076edba0e04bb8ae225 --90e6ba615076edba0e04bb8ae225 Content-Type: text/plain; charset=ISO-8859-1 Racket has two versions of syntax-local-binding, one that does lookup of syntax parameters and one that don't. So it would be interesting to know why. Anyway with this mail, there is a patch that enable syntax-local-value to lookup syntax-parameters as well. Also let's fix the test. With the definitions as in the previous mail use in stead, (define-syntax info (lambda (x) (syntax-case x () ((_ f) (let-values (((key ret) (syntax-local-binding #'f))) (datum->syntax x (eq? ret %f))))))) and (info f) => #t (fluid-let-syntax ((f (lambda x #'#t))) (info f)) => #f --90e6ba615076edba0e04bb8ae225 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Racket has two versions of syntax-local-binding, one that does lookup of sy= ntax parameters and one that don't. So it would be interesting to know = why.

Anyway with this mail, there is a patch that enable syntax-loca= l-value to lookup syntax-parameters
as well.

Also let's fix the test. With the definitions as in the= previous mail use in stead,

(define-syntax info=A0=A0
=A0 (lamb= da (x)
=A0=A0=A0 (syntax-case x ()=A0=A0=A0=A0=A0=A0
=A0=A0=A0=A0= =A0 ((_ f)=A0=A0=A0=A0=A0=A0=A0
=A0=A0=A0=A0=A0=A0=A0 (let-values (((ke= y ret) (syntax-local-binding #'f)))
=A0=A0=A0=A0=A0=A0=A0=A0=A0 (datum->syntax x (eq? ret %f)))))))

a= nd
(info f)=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0= =A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0= =A0=A0=A0=A0=A0=A0=A0=A0=A0 =3D> #t
(fluid-let-syntax ((f (lambda x #= '#t))) (info f))=A0 =3D>=A0 #f




--90e6ba615076edba0e04bb8ae225-- --90e6ba615076edba1504bb8ae227 Content-Type: text/x-patch; charset=US-ASCII; name="resolve-identifier.patch" Content-Disposition: attachment; filename="resolve-identifier.patch" Content-Transfer-Encoding: base64 X-Attachment-Id: f_gzyl36790 RnJvbSA4NDc5OTFkNjQyNGFiOTkwMDlhNjMyYmY3NTYxMzkyYzUyZTc3MDRkIE1vbiBTZXAgMTcg MDA6MDA6MDAgMjAwMQpGcm9tOiBTdGVmYW4gSXNyYWVsc3NvbiBUYW1wZSA8c3RlZmFuLml0YW1w ZUBnbWFpbC5jb20+CkRhdGU6IFN1biwgMTggTWFyIDIwMTIgMjI6MDg6MzkgKzAxMDAKU3ViamVj dDogW1BBVENIXSBtb2R1bGUvaWNlLTkvcHN5bnRheC5zY20gKHJlc29sdmUtaWRlbnRpZmllcik6 IGVuYWJsZQogc3ludGF4LWxvY2FsLXZhbHVlIHRvIGxvb2t1cCBzeW50YXgtcGFyYW1ldGVycy4K Ci0tLQogbW9kdWxlL2ljZS05L3BzeW50YXguc2NtIHwgICAgNyArKysrKysrCiAxIGZpbGVzIGNo YW5nZWQsIDcgaW5zZXJ0aW9ucygrKSwgMCBkZWxldGlvbnMoLSkKCmRpZmYgLS1naXQgYS9tb2R1 bGUvaWNlLTkvcHN5bnRheC5zY20gYi9tb2R1bGUvaWNlLTkvcHN5bnRheC5zY20KaW5kZXggNjAx NWVmZi4uNGY3MTc2NCAxMDA2NDQKLS0tIGEvbW9kdWxlL2ljZS05L3BzeW50YXguc2NtCisrKyBi L21vZHVsZS9pY2UtOS9wc3ludGF4LnNjbQpAQCAtODQzLDYgKzg0MywxMyBAQAogICAgICAgICAg ICh2YWx1ZXMgKGJpbmRpbmctdHlwZSBiKSAoYmluZGluZy12YWx1ZSBiKSBtb2QpKSkKICAgICAg IChsZXQgKChuIChpZC12YXItbmFtZSBpZCB3KSkpCiAgICAgICAgIChjb25kCisgICAgICAgICAo KGFzc3EgbiByKSA9PiAobGFtYmRhIChwYikgCisgICAgICAgICAgICAgICAgICAgICAgICAgIChs ZXQgKChiIChjZHIgcGIpKSkKKyAgICAgICAgICAgICAgICAgICAgICAgICAgICAodmFsdWVzIChi aW5kaW5nLXR5cGUgIGIpCisgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAoYmlu ZGluZy12YWx1ZSBiKQorICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKGlmIChz eW50YXgtb2JqZWN0PyBpZCkKKyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAoc3ludGF4LW9iamVjdC1tb2R1bGUgaWQpCisgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgbW9kKSkpKSkKICAgICAgICAgICgoc3ltYm9sPyBuKQogICAgICAgICAgIChy ZXNvbHZlLWdsb2JhbCBuIChpZiAoc3ludGF4LW9iamVjdD8gaWQpCiAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgIChzeW50YXgtb2JqZWN0LW1vZHVsZSBpZCkKLS0gCjEuNy45Cgo= --90e6ba615076edba1504bb8ae227--