From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Andy Wingo Newsgroups: gmane.lisp.guile.devel Subject: Re: syntax-local-value patch for discussion Date: Thu, 26 Jan 2012 12:31:03 +0100 Message-ID: <878vkuaefc.fsf@pobox.com> References: <87fwfq6m5x.fsf@netris.org> <87pqeapu4o.fsf@pobox.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1327580114 6325 80.91.229.12 (26 Jan 2012 12:15:14 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 26 Jan 2012 12:15:14 +0000 (UTC) Cc: guile-devel To: Stefan Israelsson Tampe Original-X-From: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Thu Jan 26 13:15:10 2012 Return-path: Envelope-to: guile-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RqOEP-0002Yj-4F for guile-devel@m.gmane.org; Thu, 26 Jan 2012 13:15:09 +0100 Original-Received: from localhost ([::1]:36632 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RqOEO-0007pk-7H for guile-devel@m.gmane.org; Thu, 26 Jan 2012 07:15:08 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:57158) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RqOEJ-0007jg-Nb for guile-devel@gnu.org; Thu, 26 Jan 2012 07:15:07 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RqOEE-0006IK-Tq for guile-devel@gnu.org; Thu, 26 Jan 2012 07:15:03 -0500 Original-Received: from a-pb-sasl-sd.pobox.com ([74.115.168.62]:46999 helo=sasl.smtp.pobox.com) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RqOEE-0006IE-Mc for guile-devel@gnu.org; Thu, 26 Jan 2012 07:14:58 -0500 Original-Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by a-pb-sasl-sd.pobox.com (Postfix) with ESMTP id 8FBD17C39; Thu, 26 Jan 2012 07:14:58 -0500 (EST) 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=daYmpzEuEV5L7U9DyVB8kZSALRo=; b=q/sg5h PbPbS8Q3Pz5qVqO1sqnkbV74xK6TTPrvKHEVl6DFCvOwEVwg/fqeZfwVrmu8VAeu gOvyvwq3xUEjA3lSPlwWferqQpLrsXYkEQKRILE3qJLPKiamY5p+QPPgaymOFhFb 1987Ft7La62BUwrlGRBQJOcW+9wvN0OJIAmLY= 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=eBUD8a4pO3hFuGAc0Q4wygmlZ8RSBvwb dgecmsVD1H7jBdcSBoGqDItFmqLopcGquEaokwftDYijzoCMqzB4XVImQF0ldrLf lRMjFRGe4zWkQknItb3aCpGhApXyDx/pKwPARLd/Y3Uizfc+zoThBbNOyuxJNf7j zmMxLGMs1qw= Original-Received: from a-pb-sasl-sd.pobox.com (unknown [127.0.0.1]) by a-pb-sasl-sd.pobox.com (Postfix) with ESMTP id 88A657C38; Thu, 26 Jan 2012 07:14:58 -0500 (EST) Original-Received: from badger (unknown [90.164.198.39]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by a-pb-sasl-sd.pobox.com (Postfix) with ESMTPSA id E89A17C37; Thu, 26 Jan 2012 07:14:57 -0500 (EST) In-Reply-To: (Stefan Israelsson Tampe's message of "Mon, 23 Jan 2012 17:06:09 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux) X-Pobox-Relay-ID: 5D15ED3A-4817-11E1-87FD-65B1DE995924-02397024!a-pb-sasl-sd.pobox.com X-detected-operating-system: by eggs.gnu.org: Solaris 10 (beta) X-Received-From: 74.115.168.62 X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Original-Sender: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.devel:13689 Archived-At: Hi Stefan, On Mon 23 Jan 2012 17:06, Stefan Israelsson Tampe writes: > and when parse is ready to unpack S we could have > > S = #(syntax-object # wrap-part hygiene) > > Now I basically solve this problem by constructing Why do syntax->datum and datum->syntax not work for you to pack and unpack these structs in syntax objects? > a = (vector 'syntax-object (vector-ref (struct-s-code (syntax->datum S)) 1) (un-mark wrap-part) hygiene) Gross :) Andy -- http://wingolog.org/