From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Taylan Kammer Newsgroups: gmane.lisp.guile.bugs Subject: bug#40584: R7RS string-for-each does not work two or more strings on its argument Date: Wed, 12 May 2021 23:03:25 +0200 Message-ID: References: Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------AADBC402A86D20C15FFD1356" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="37347"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:78.0) Gecko/20100101 Thunderbird/78.10.1 Cc: OKUMURA Yuki To: 40584@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Wed May 12 23:04:07 2021 Return-path: Envelope-to: guile-bugs@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 1lgw1X-0009Z6-Nl for guile-bugs@m.gmane-mx.org; Wed, 12 May 2021 23:04:07 +0200 Original-Received: from localhost ([::1]:36204 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lgw1W-0002PS-HE for guile-bugs@m.gmane-mx.org; Wed, 12 May 2021 17:04:06 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:55274) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lgw1S-0002Ou-2b for bug-guile@gnu.org; Wed, 12 May 2021 17:04:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:57414) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lgw1R-0004yH-Qp for bug-guile@gnu.org; Wed, 12 May 2021 17:04:01 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lgw1R-0002VA-Lq for bug-guile@gnu.org; Wed, 12 May 2021 17:04:01 -0400 X-Loop: help-debbugs@gnu.org In-Reply-To: Resent-From: Taylan Kammer Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Wed, 12 May 2021 21:04:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 40584 X-GNU-PR-Package: guile Original-Received: via spool by 40584-submit@debbugs.gnu.org id=B40584.16208534159579 (code B ref 40584); Wed, 12 May 2021 21:04:01 +0000 Original-Received: (at 40584) by debbugs.gnu.org; 12 May 2021 21:03:35 +0000 Original-Received: from localhost ([127.0.0.1]:40727 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lgw10-0002UR-Og for submit@debbugs.gnu.org; Wed, 12 May 2021 17:03:34 -0400 Original-Received: from mail-ed1-f41.google.com ([209.85.208.41]:43562) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lgw0y-0002UE-Sh for 40584@debbugs.gnu.org; Wed, 12 May 2021 17:03:33 -0400 Original-Received: by mail-ed1-f41.google.com with SMTP id s6so28633039edu.10 for <40584@debbugs.gnu.org>; Wed, 12 May 2021 14:03:32 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=to:from:subject:cc:message-id:date:user-agent:mime-version :content-language; bh=VA/bUo5wAARMbuAXLwUUZEcxgKRlPS/E8akHkuM9934=; b=vaytx1n6Hj23K4MWdLPZ8OvbP83WQ5AM967VgxdYdaTJ/QzdPplor3GECsA3hwQwYK ZXCKgyvHz0XdKVd7SH3umzXusLm9c7zZFIoveygLH1ydEVCsKRGHafHBTd2pvboGwyUl EpcQhWtON2DiqVM+Ompw62/FVegU8nwB9zCQM444AQwyPjlVSksVUCvD+ZcKIDMuGSK4 DN922BNJNnFOlBwCkDvBvX2AZXPYevehd9gWrayUzM7z7Gb7vBSKmZxMVpxSJ3GjVxh9 JJjgzF8nZW0rm/xG1W9/H4DbdLEedOFX+RFmcgu30ikJA0Eb7A5Nj9JXD1RGMxTmOmrz 2C6A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:to:from:subject:cc:message-id:date:user-agent :mime-version:content-language; bh=VA/bUo5wAARMbuAXLwUUZEcxgKRlPS/E8akHkuM9934=; b=esdBHgmH9UGEIlvfnQdXiisYVpwhyWg1WvbD8hAx3jTfN5CixMCbMnZR81CMlQsxrl BG5y3W8iis2+1W27VdX2r4oGP6agRUqgqHqD1jYlZ/hsZRuq6VPl/XjP0pgUKIEcXaok pwBnCTCAfH0d7w6wIWctX9R2as6j3E4DxSBJFWoThrNwCXPsEYwISrME/aKnRDSmdMRd 5HzZhzdmDZLnzzAnfPLmyaThnNcGQEJq9hrMR4v1h5+mP192TvWmCWJEauPA08V+GF9B WB9JedUYppcGHj/H8x7ifuH5EY8bJNTfS/oxcz6PXtxLnVb9ycQBguQPf93zSFL4UrNr fbWg== X-Gm-Message-State: AOAM5318vzC0CXfs/UgkN26KxDRO/ph3cU1uf+6b41IrgUCE9hHDAA2Y 4o84UQKC+4SPkeGBzjdhhPY= X-Google-Smtp-Source: ABdhPJzG2qQmEbazS1g5EavymLAzGzCfCcUgpk/NxzXGUbL+mSpe91FkvogsF9Hkor5aRPZaRlxLUg== X-Received: by 2002:aa7:d685:: with SMTP id d5mr46087025edr.200.1620853407152; Wed, 12 May 2021 14:03:27 -0700 (PDT) Original-Received: from [192.168.178.20] (b2b-109-90-125-150.unitymedia.biz. [109.90.125.150]) by smtp.gmail.com with ESMTPSA id w6sm737932edc.25.2021.05.12.14.03.26 (version=TLS1_3 cipher=TLS_AES_128_GCM_SHA256 bits=128/128); Wed, 12 May 2021 14:03:26 -0700 (PDT) Content-Language: en-US X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list 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-mx.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.io gmane.lisp.guile.bugs:10049 Archived-At: This is a multi-part message in MIME format. --------------AADBC402A86D20C15FFD1356 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 7bit Attached is a simple patch to use Mark's implementation within the current (scheme base) module. - Taylan --------------AADBC402A86D20C15FFD1356 Content-Type: text/plain; charset=UTF-8; name="0001-Fix-scheme-base-string-for-each.patch" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="0001-Fix-scheme-base-string-for-each.patch" RnJvbSBkZGEyYWFhZjBlOTA2NGYxMWQ4OWE4M2Y1NTM0MGJhMGMwMTE1YmNhIE1vbiBTZXAg MTcgMDA6MDA6MDAgMjAwMQpGcm9tOiBUYXlsYW4gS2FtbWVyIDx0YXlsYW4ua2FtbWVyQGdt YWlsLmNvbT4KRGF0ZTogV2VkLCAxMiBNYXkgMjAyMSAyMjozNjoyNiArMDIwMApTdWJqZWN0 OiBbUEFUQ0hdIEZpeCAoc2NoZW1lIGJhc2UpIHN0cmluZy1mb3ItZWFjaC4KCiogbW9kdWxl L3NjaGVtZS9iYXNlLnNjbSAocjc6c3RyaW5nLWZvci1lYWNoKTogTmV3IHByb2NlZHVyZS4K CkZpeGVzIDxodHRwczovL2J1Z3MuZ251Lm9yZy80MDU4ND4uCi0tLQogbW9kdWxlL3NjaGVt ZS9iYXNlLnNjbSB8IDI2ICsrKysrKysrKysrKysrKysrKysrKysrKy0tCiAxIGZpbGUgY2hh bmdlZCwgMjQgaW5zZXJ0aW9ucygrKSwgMiBkZWxldGlvbnMoLSkKCmRpZmYgLS1naXQgYS9t b2R1bGUvc2NoZW1lL2Jhc2Uuc2NtIGIvbW9kdWxlL3NjaGVtZS9iYXNlLnNjbQppbmRleCAy MGUyODA0NjcuLjU4ZDVhY2M3NCAxMDA2NDQKLS0tIGEvbW9kdWxlL3NjaGVtZS9iYXNlLnNj bQorKysgYi9tb2R1bGUvc2NoZW1lL2Jhc2Uuc2NtCkBAIC01MSw2ICs1MSw3IEBACiAgICAg ICAgICAgICBvcGVuLW91dHB1dC1ieXRldmVjdG9yIGdldC1vdXRwdXQtYnl0ZXZlY3Rvcgog ICAgICAgICAgICAgcGVlay11OCByZWFkLXU4IHJlYWQtYnl0ZXZlY3RvciByZWFkLWJ5dGV2 ZWN0b3IhCiAgICAgICAgICAgICByZWFkLXN0cmluZyByZWFkLWxpbmUKKyAgICAgICAgICAg IChyNzpzdHJpbmctZm9yLWVhY2ggLiBzdHJpbmctZm9yLWVhY2gpCiAgICAgICAgICAgICB3 cml0ZS11OCB3cml0ZS1ieXRldmVjdG9yIHdyaXRlLXN0cmluZyBmbHVzaC1vdXRwdXQtcG9y dAogICAgICAgICAgICAgKHI3OnN0cmluZy1tYXAgLiBzdHJpbmctbWFwKQogICAgICAgICAg ICAgYnl0ZXZlY3RvciBieXRldmVjdG9yLWFwcGVuZApAQCAtMTA4LDcgKzEwOSw3IEBACiAg ICByZWFsPyByZW1haW5kZXIgcmV2ZXJzZSByb3VuZCBzZXQhCiAgICBzZXQtY2FyISBzZXQt Y2RyISBzdHJpbmcgc3RyaW5nLT5saXN0IHN0cmluZy0+bnVtYmVyCiAgICBzdHJpbmctPnN5 bWJvbCBzdHJpbmctYXBwZW5kCi0gICBzdHJpbmctY29weSBzdHJpbmctY29weSEgc3RyaW5n LWZpbGwhIHN0cmluZy1mb3ItZWFjaAorICAgc3RyaW5nLWNvcHkgc3RyaW5nLWNvcHkhIHN0 cmluZy1maWxsIQogICAgc3RyaW5nLWxlbmd0aCBzdHJpbmctcmVmIHN0cmluZy1zZXQhIHN0 cmluZzw9PyBzdHJpbmc8PwogICAgc3RyaW5nPT8gc3RyaW5nPj0/IHN0cmluZz4/IHN0cmlu Zz8gc3Vic3RyaW5nIHN5bWJvbC0+c3RyaW5nCiAgICBzeW1ib2w/IHN5bnRheC1lcnJvciBz eW50YXgtcnVsZXMgdHJ1bmNhdGUKQEAgLTQwMyw3ICs0MDQsMjggQEAKIChkZWZpbmUgKHI3 OnN0cmluZy1tYXAgcHJvYyBzIC4gcyopCiAgIChpZiAobnVsbD8gcyopCiAgICAgICAoc3Ry aW5nLW1hcCBwcm9jIHMpCi0gICAgICAobGlzdC0+c3RyaW5nIChhcHBseSBtYXAgcHJvYyAo c3RyaW5nLT5saXN0IHMpIChtYXAgc3RyaW5nLT5saXN0IHMqKSkpKSkKKyAgICAgIChsaXN0 LT5zdHJpbmcgKGFwcGx5IG1hcCBwcm9jIChzdHJpbmctPmxpc3QgcykgKG1hcCBzdHJpbmct Pmxpc3QKKyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICBzKikpKSkpCisKKyhkZWZpbmUgcjc6c3RyaW5nLWZvci1lYWNoCisgICAg ICAoY2FzZS1sYW1iZGEKKyAgICAgICAgKChwcm9jIHMpIChzdHJpbmctZm9yLWVhY2ggcHJv YyBzKSkKKyAgICAgICAgKChwcm9jIHMxIHMyKQorICAgICAgICAgKGxldCAoKGxlbiAobWlu IChzdHJpbmctbGVuZ3RoIHMxKQorICAgICAgICAgICAgICAgICAgICAgICAgIChzdHJpbmct bGVuZ3RoIHMyKSkpKQorICAgICAgICAgICAobGV0IGxvb3AgKChpIDApKQorICAgICAgICAg ICAgICh3aGVuICg8IGkgbGVuKQorICAgICAgICAgICAgICAgKHByb2MgKHN0cmluZy1yZWYg czEgaSkKKyAgICAgICAgICAgICAgICAgICAgIChzdHJpbmctcmVmIHMyIGkpKQorICAgICAg ICAgICAgICAgKGxvb3AgKCsgaSAxKSkpKSkpCisgICAgICAgICgocHJvYyAuIHN0cmluZ3Mp CisgICAgICAgICAobGV0ICgobGVuIChhcHBseSBtaW4gKG1hcCBzdHJpbmctbGVuZ3RoIHN0 cmluZ3MpKSkpCisgICAgICAgICAgIChsZXQgbG9vcCAoKGkgMCkpCisgICAgICAgICAgICAg KHdoZW4gKDwgaSBsZW4pCisgICAgICAgICAgICAgICAoYXBwbHkgcHJvYyAobWFwIChsYW1i ZGEgKHMpCisgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKHN0cmluZy1yZWYg cyBpKSkKKyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc3RyaW5ncykpCisgICAg ICAgICAgICAgICAobG9vcCAoKyBpIDEpKSkpKSkpKQogCiAoZGVmaW5lIChieXRldmVjdG9y IC4gbGlzKQogICAodTgtbGlzdC0+Ynl0ZXZlY3RvciBsaXMpKQotLSAKMi4zMC4yCgo= --------------AADBC402A86D20C15FFD1356--