From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Matt Wette <mwette@alumni.caltech.edu>
Newsgroups: gmane.lisp.guile.user
Subject: Re: syncase code issue 1.8.8 -> 2.0.11
Date: Thu, 18 Sep 2014 20:54:56 -0700
Message-ID: <6960BFD4-6C31-42E7-A880-033BAFBC6CC8@alumni.caltech.edu>
References: <d0e1477aea0c324a5bdec3ddc850c7fd.squirrel@mail.alumni.caltech.edu>
NNTP-Posting-Host: plane.gmane.org
Mime-Version: 1.0 (Mac OS X Mail 7.3 \(1878.6\))
Content-Type: multipart/alternative;
	boundary="Apple-Mail=_1A551F43-1F00-4379-9987-57D4C3F0E189"
X-Trace: ger.gmane.org 1411098956 9354 80.91.229.3 (19 Sep 2014 03:55:56 GMT)
X-Complaints-To: usenet@ger.gmane.org
NNTP-Posting-Date: Fri, 19 Sep 2014 03:55:56 +0000 (UTC)
To: guile-user@gnu.org
Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Fri Sep 19 05:55:49 2014
Return-path: <guile-user-bounces+guile-user=m.gmane.org@gnu.org>
Envelope-to: guile-user@m.gmane.org
Original-Received: from lists.gnu.org ([208.118.235.17])
	by plane.gmane.org with esmtp (Exim 4.69)
	(envelope-from <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1XUpIT-0003HD-14
	for guile-user@m.gmane.org; Fri, 19 Sep 2014 05:55:49 +0200
Original-Received: from localhost ([::1]:55780 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1XUpIS-0007VD-JG
	for guile-user@m.gmane.org; Thu, 18 Sep 2014 23:55:48 -0400
Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:49899)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <mwette@alumni.caltech.edu>) id 1XUpIB-0007V3-2W
	for guile-user@gnu.org; Thu, 18 Sep 2014 23:55:38 -0400
Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <mwette@alumni.caltech.edu>) id 1XUpI3-0002R5-J6
	for guile-user@gnu.org; Thu, 18 Sep 2014 23:55:30 -0400
Original-Received: from vms173023pub.verizon.net ([206.46.173.23]:44971)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <mwette@alumni.caltech.edu>) id 1XUpI3-0002PR-FN
	for guile-user@gnu.org; Thu, 18 Sep 2014 23:55:23 -0400
Original-Received: from [192.168.2.127] ([unknown] [71.108.232.6])
	by vms173023.mailsrvcs.net
	(Sun Java(tm) System Messaging Server 7u2-7.02 32bit (built Apr 16
	2009)) with ESMTPA id <0NC4004BXQVMFE50@vms173023.mailsrvcs.net> for
	guile-user@gnu.org; Thu, 18 Sep 2014 22:55:01 -0500 (CDT)
X-Priority: 3 (Normal)
In-reply-to: <d0e1477aea0c324a5bdec3ddc850c7fd.squirrel@mail.alumni.caltech.edu>
X-Mailer: Apple Mail (2.1878.6)
X-detected-operating-system: by eggs.gnu.org: Genre and OS details not
	recognized.
X-Received-From: 206.46.173.23
X-BeenThere: guile-user@gnu.org
X-Mailman-Version: 2.1.14
Precedence: list
List-Id: General Guile related discussions <guile-user.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/guile-user>
List-Post: <mailto:guile-user@gnu.org>
List-Help: <mailto:guile-user-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=subscribe>
Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org
Original-Sender: guile-user-bounces+guile-user=m.gmane.org@gnu.org
Xref: news.gmane.org gmane.lisp.guile.user:11531
Archived-At: <http://permalink.gmane.org/gmane.lisp.guile.user/11531>


--Apple-Mail=_1A551F43-1F00-4379-9987-57D4C3F0E189
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain;
	charset=us-ascii


I found the root bug, I think, flagged by this message:
scheme@(guile-user)> (define-tokenizer tokiz ("[a-z]+" #\a))
While compiling expression:
ERROR: build-constant-store: unrecognized object #<procedure make-regexp =
(_ . _)>

I was putting procedure-objects in the macro when I should have been =
putting in syntax.

works:
  (list
   (datum->syntax (car cz) 'make-regexp)
   (string-append
    "^" (syntax->datum (car cz)))))

broken (but worked in guile 1.8.8):
   (list
    make-regexp=20
    (list string-append "^" (car cz))))


Matt


--Apple-Mail=_1A551F43-1F00-4379-9987-57D4C3F0E189
Content-Transfer-Encoding: quoted-printable
Content-Type: text/html;
	charset=us-ascii

<html><head><meta http-equiv=3D"Content-Type" content=3D"text/html =
charset=3Dus-ascii"></head><body style=3D"word-wrap: break-word; =
-webkit-nbsp-mode: space; -webkit-line-break: =
after-white-space;"><br><div><div>I found the root bug, I think, flagged =
by this message:</div><div><div style=3D"margin: 0px; font-size: =
11px;">scheme@(guile-user)&gt; (define-tokenizer tokiz ("[a-z]+" =
#\a))</div><div style=3D"margin: 0px; font-size: 11px;">While compiling =
expression:</div><div style=3D"margin: 0px; font-size: 11px;">ERROR: =
build-constant-store: unrecognized object #&lt;procedure make-regexp (_ =
. _)&gt;</div></div><div><br></div><div>I was putting procedure-objects =
in the macro when I should have been putting in =
syntax.</div><div><br></div><div>works:</div><div>&nbsp;&nbsp;(list</div><=
div><div>&nbsp; &nbsp;(datum-&gt;syntax (car cz) =
'make-regexp)</div><div>&nbsp; &nbsp;(string-append</div><div>&nbsp; =
&nbsp; "^" (syntax-&gt;datum (car =
cz)))))</div></div><div><br></div><div>broken (but worked in guile =
1.8.8):</div><div>&nbsp; &nbsp;(list</div><div><div style=3D"margin: =
0px;">&nbsp; &nbsp;&nbsp;make-regexp&nbsp;</div><div style=3D"margin: =
0px;">&nbsp; &nbsp; (list string-append "^" (car cz))))</div><div =
style=3D"margin: =
0px;"><br></div></div><div><br></div><div>Matt</div><div><br></div></div><=
/body></html>=

--Apple-Mail=_1A551F43-1F00-4379-9987-57D4C3F0E189--