From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Maxime Devos Newsgroups: gmane.lisp.guile.devel Subject: Re: [PATCH] New function array-mutable? Date: Thu, 25 Nov 2021 18:19:53 +0000 Message-ID: References: <32F75DE0-14DA-4B7F-B6A9-81462A847A30@sarc.name> Mime-Version: 1.0 Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: 8bit Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="22159"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Evolution 3.38.3-1 To: lloda , guile-devel Original-X-From: guile-devel-bounces+guile-devel=m.gmane-mx.org@gnu.org Thu Nov 25 19:21:48 2021 Return-path: Envelope-to: guile-devel@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1mqJNS-0005aj-Cs for guile-devel@m.gmane-mx.org; Thu, 25 Nov 2021 19:21:46 +0100 Original-Received: from localhost ([::1]:41486 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1mqJNR-0007tF-DI for guile-devel@m.gmane-mx.org; Thu, 25 Nov 2021 13:21:45 -0500 Original-Received: from eggs.gnu.org ([209.51.188.92]:33076) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mqJLl-0005tE-0Z for guile-devel@gnu.org; Thu, 25 Nov 2021 13:20:01 -0500 Original-Received: from [2a02:1800:120:4::f00:14] (port=35946 helo=xavier.telenet-ops.be) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1mqJLi-0001qx-U1 for guile-devel@gnu.org; Thu, 25 Nov 2021 13:20:00 -0500 Original-Received: from ptr-bvsjgyhxw7psv60dyze.18120a2.ip6.access.telenet.be ([IPv6:2a02:1811:8c09:9d00:3c5f:2eff:feb0:ba5a]) by xavier.telenet-ops.be with bizsmtp id NiKt260094UW6Th01iKtwq; Thu, 25 Nov 2021 19:19:53 +0100 In-Reply-To: <32F75DE0-14DA-4B7F-B6A9-81462A847A30@sarc.name> DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=telenet.be; s=r21; t=1637864393; bh=cWlIAqpX40yg26e+7LtrQchrp3NXDHqvV3lE71TFGIY=; h=Subject:From:To:Date:In-Reply-To:References; b=XHrcB5tPFm6OKDp7x1E4gupv66N0tlfyxfprZq9C+fmqpBWoGFNOG6YjJGHYmWYem EB/0Iek2h/XH0x8pBo7/yyOGjnlhAXD+o+TW+JwQ227HGqzFlyqO+FXsCSNgVKMHPe MAYzzh1F0suxRaWV2f4QccRD3VUixG3o3q+NH6qWpw/qbeaM2s9ZZdroUyxG6icOYF hrJdjI3qGnQdRewXk8neRmAw2W0EkjuYTduc9eLKtFy8upSHF0+3j43vVnxOiocerw Y5kUEK/wATqCTWxxju0ZGHxOo8LKoW2gorV3lDur0pLDOItZAr6YUXH59hC8eqwpQK 7cOf0WCl68xCA== X-Host-Lookup-Failed: Reverse DNS lookup failed for 2a02:1800:120:4::f00:14 (failed) Received-SPF: pass client-ip=2a02:1800:120:4::f00:14; envelope-from=maximedevos@telenet.be; helo=xavier.telenet-ops.be X-Spam_score_int: -19 X-Spam_score: -2.0 X-Spam_bar: -- X-Spam_report: (-2.0 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_LOW=-0.7, RDNS_NONE=0.793, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.29 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-mx.org@gnu.org Original-Sender: "guile-devel" Xref: news.gmane.io gmane.lisp.guile.devel:20983 Archived-At: lloda schreef op do 25-11-2021 om 17:40 [+0100]: > [...] Suggestion: add a few tests to test-suite/tests/arrays.test: (pass-if-equal "new" #t (array-mutable? (make-array #f '(1 2) '(3 4)))) (pass-if-equal "empty (two-dimensional)" #t (array-mutable? (array-copy #1()))) (pass-if-equal "empty (two-dimensional)" #t (array-mutable? (array-copy #2(() ())))) (pass-if-equal "immutable copy" #f (array-mutable? (immutable-array-copy #2((h) (h))))) This requires a currently non-existent procedure ‘make-immutable- array’, copying an array into a new immutable array. Greetings, Maxime