From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Andy Wingo Newsgroups: gmane.lisp.guile.bugs Subject: bug#24102: Use guile variable objects as SRFI-111 boxes. Date: Thu, 04 Aug 2016 22:59:33 +0200 Message-ID: <87twf0s11m.fsf@pobox.com> References: NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1470344432 17270 195.159.176.226 (4 Aug 2016 21:00:32 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Thu, 4 Aug 2016 21:00:32 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) Cc: 24102@debbugs.gnu.org To: "Glenn Michaels" Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Thu Aug 04 23:00:28 2016 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bVPkb-0002g6-1E for guile-bugs@m.gmane.org; Thu, 04 Aug 2016 23:00:21 +0200 Original-Received: from localhost ([::1]:41743 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bVPkX-0008RM-T7 for guile-bugs@m.gmane.org; Thu, 04 Aug 2016 17:00:17 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:52111) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bVPkO-0008LT-SU for bug-guile@gnu.org; Thu, 04 Aug 2016 17:00:12 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bVPkI-00089w-Vq for bug-guile@gnu.org; Thu, 04 Aug 2016 17:00:07 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:58611) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bVPkI-00089l-S7 for bug-guile@gnu.org; Thu, 04 Aug 2016 17:00:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1bVPkI-0003KQ-LT for bug-guile@gnu.org; Thu, 04 Aug 2016 17:00:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Andy Wingo Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Thu, 04 Aug 2016 21:00:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 24102 X-GNU-PR-Package: guile X-GNU-PR-Keywords: patch Original-Received: via spool by 24102-submit@debbugs.gnu.org id=B24102.147034438412745 (code B ref 24102); Thu, 04 Aug 2016 21:00:02 +0000 Original-Received: (at 24102) by debbugs.gnu.org; 4 Aug 2016 20:59:44 +0000 Original-Received: from localhost ([127.0.0.1]:55908 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bVPk0-0003JV-Kl for submit@debbugs.gnu.org; Thu, 04 Aug 2016 16:59:44 -0400 Original-Received: from pb-sasl1.pobox.com ([64.147.108.66]:57178 helo=sasl.smtp.pobox.com) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bVPjz-0003JO-B1 for 24102@debbugs.gnu.org; Thu, 04 Aug 2016 16:59:43 -0400 Original-Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id E23952EBBF; Thu, 4 Aug 2016 16:59:40 -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=dzzGbEegOG34epbV39pcZKUBVQY=; b=W7tQww 5ZRoQK4UfGeVz1yMbV8VlqWsRfDWV1r0j5We6sr9t9B8433rhNyubEO501M3C+yo 6E+2u1B9uD+98nKZemO4CX2JSb/8sEDaRuDtE6OOpDdv6jstzasc7DXqB/b1WkRD oX0LSEvjPU7WVW97MeWwBCtYXf/mZbOUNZR3c= 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=NuKuIjxns9soW7UoEGLA2TvoPmG60/Fj dbEhhamrPDZnMPVeFyIQhzPETVRZc+Hs7wKsZOWSLm8HF8e93caQeCP0Imf/4rRt 2sHMl+/uZDOwiCYB97KwiTaNJHPjmd3psTALytzMJRQrfXEX/T7PC/QyDLE766dv 0aI5sdXUT9E= Original-Received: from pb-sasl1.nyi.icgroup.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id D9B942EBBE; Thu, 4 Aug 2016 16:59:40 -0400 (EDT) Original-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 208BB2EBBC; Thu, 4 Aug 2016 16:59:40 -0400 (EDT) In-Reply-To: (Glenn Michaels's message of "Tue, 2 Aug 2016 06:25:56 -0400") X-Pobox-Relay-ID: 5C54FD60-5A86-11E6-A44A-C1836462E9F6-02397024!pb-sasl1.pobox.com X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.org gmane.lisp.guile.bugs:8329 Archived-At: On Tue 02 Aug 2016 12:25, "Glenn Michaels" writes: > Trivial patch implementing this suggestion attached. > > --- a/module/srfi/srfi-111.scm > +++ b/module/srfi/srfi-111.scm > @@ -17,21 +17,9 @@ > ;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA > > (define-module (srfi srfi-111) > - #:use-module (srfi srfi-9) > - #:use-module (srfi srfi-9 gnu) > - #:export (box box? unbox set-box!)) > + #:re-export ((make-variable . box) > + (variable? . box?) > + (variable-ref . unbox) > + (variable-set! . set-box!))) > > (cond-expand-provide (current-module) '(srfi-111)) I like it. Let me check in with Mark and see if there's any reason to keep it like it is. Andy