From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Neil Jerram Newsgroups: gmane.lisp.guile.user,gmane.lisp.guile.devel Subject: Re: racing srfi-18 threads Date: Fri, 20 Nov 2009 00:00:53 +0000 Message-ID: <87my2iuksq.fsf@ossau.uklinux.net> References: <2e6d10880911060129s538fab2cv84805475450f33d0@mail.gmail.com> <2e6d10880911060652g56092de3g649c540e54102c05@mail.gmail.com> <87bpjcy4bc.fsf@ossau.uklinux.net> <87skceglog.fsf@ossau.uklinux.net> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1258675398 6679 80.91.229.12 (20 Nov 2009 00:03:18 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 20 Nov 2009 00:03:18 +0000 (UTC) Cc: guile-user@gnu.org, Guile Development To: Andy Wingo Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Fri Nov 20 01:03:10 2009 Return-path: Envelope-to: guile-user@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1NBGw7-0001B5-Ac for guile-user@m.gmane.org; Fri, 20 Nov 2009 01:01:15 +0100 Original-Received: from localhost ([127.0.0.1]:46066 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NBGw6-0003pm-PE for guile-user@m.gmane.org; Thu, 19 Nov 2009 19:01:14 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NBGw0-0003nc-4F for guile-user@gnu.org; Thu, 19 Nov 2009 19:01:08 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NBGvv-0003lW-GK for guile-user@gnu.org; Thu, 19 Nov 2009 19:01:07 -0500 Original-Received: from [199.232.76.173] (port=41876 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NBGvq-0003jR-Hq; Thu, 19 Nov 2009 19:00:58 -0500 Original-Received: from mail3.uklinux.net ([80.84.72.33]:59001) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1NBGvq-0007n3-2l; Thu, 19 Nov 2009 19:00:58 -0500 Original-Received: from arudy (host86-145-153-90.range86-145.btcentralplus.com [86.145.153.90]) by mail3.uklinux.net (Postfix) with ESMTP id 361731F662A; Fri, 20 Nov 2009 00:00:57 +0000 (GMT) Original-Received: from arudy (arudy [127.0.0.1]) by arudy (Postfix) with ESMTP id 7389238024; Fri, 20 Nov 2009 00:00:53 +0000 (GMT) In-Reply-To: (Andy Wingo's message of "Tue, 17 Nov 2009 20:58:44 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1 (gnu/linux) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.4-2.6 X-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: guile-user-bounces+guile-user=m.gmane.org@gnu.org Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.user:7499 gmane.lisp.guile.devel:9705 Archived-At: Andy Wingo writes: > On Mon 16 Nov 2009 23:16, Neil Jerram writes: > >> It seems that when run under the VM, (thunk? thunk) => #f. > > Ugly. Thanks for debugging this, Neil. I now have it down to this: a program compiled inside the RHS of a define-syntax form apparently has no meta; whereas the same program compiled outside a define-syntax form does have meta: (use-modules (system vm program)) (define-syntax race (syntax-rules () ((_ n) (begin (write (cons 'race (program-meta (lambda () n)))) (newline))))) (race 3) (begin (write (cons 'race (program-meta (lambda () n)))) (newline)) |= (race . #f) (race . #) I'll keep following this through, but if you have any idea where the root problem is, please say. Neil