From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: slbtty Newsgroups: gmane.lisp.guile.bugs Subject: bug#58068: pretty-print corrupts data modified by set-cdr! Date: Sat, 24 Sep 2022 18:09:45 -0400 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset="UTF-8" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="31549"; mail-complaints-to="usenet@ciao.gmane.io" To: 58068@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Sun Sep 25 09:44:38 2022 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 1ocMJa-00086P-RT for guile-bugs@m.gmane-mx.org; Sun, 25 Sep 2022 09:44:38 +0200 Original-Received: from localhost ([::1]:33200 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1ocMJZ-0005gq-Tl for guile-bugs@m.gmane-mx.org; Sun, 25 Sep 2022 03:44:37 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:34750) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ocMJ2-00057I-0w for bug-guile@gnu.org; Sun, 25 Sep 2022 03:44:04 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:46713) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1ocMJ1-00086Z-PM for bug-guile@gnu.org; Sun, 25 Sep 2022 03:44:03 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1ocMJ1-0002LN-KT for bug-guile@gnu.org; Sun, 25 Sep 2022 03:44:03 -0400 X-Loop: help-debbugs@gnu.org Resent-From: slbtty Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Sun, 25 Sep 2022 07:44:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 58068 X-GNU-PR-Package: guile X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.16640918418950 (code B ref -1); Sun, 25 Sep 2022 07:44:03 +0000 Original-Received: (at submit) by debbugs.gnu.org; 25 Sep 2022 07:44:01 +0000 Original-Received: from localhost ([127.0.0.1]:45786 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ocMIy-0002KG-Ky for submit@debbugs.gnu.org; Sun, 25 Sep 2022 03:44:00 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:40626) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ocDLs-0001px-Tf for submit@debbugs.gnu.org; Sat, 24 Sep 2022 18:10:29 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:48876) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ocDLs-0004Lz-On for bug-guile@gnu.org; Sat, 24 Sep 2022 18:10:24 -0400 Original-Received: from mail-lf1-x131.google.com ([2a00:1450:4864:20::131]:33547) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1ocDLr-00087a-2Y for bug-guile@gnu.org; Sat, 24 Sep 2022 18:10:24 -0400 Original-Received: by mail-lf1-x131.google.com with SMTP id d42so5515104lfv.0 for ; Sat, 24 Sep 2022 15:10:22 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=to:subject:message-id:date:from:mime-version:from:to:cc:subject :date; bh=F7ok+/7I3YEslmStsTeIhoz0QXnkTYBw68r2G6gsMeE=; b=izXp+GD1GvbFo+8WBXO3vlvXZ2iVbM8Yvy3tpd05/OpRRl39FsSYehrgE51YMx+auS hEfnFrJCon+fgXCvzcNeG/w91Kr12U6Gf24Udr6UTF+5m7PABw7u3GvLhS+kS39oEkEe wOhX9MNUnNCCAt5+m/uNdggUbvfBBaMeE85DGp95pgriYlJHqC4Pc7NRd4fbWmi7KckJ IxXg15cSGrR059Lb5qEj5uT0HsBDTvytll4ZPH+HtIGAvAiKjK6JJkHKQ0IwbKLhPxiX +7ev6cCnhILvW44Jowq8ok8Jhjs4rnGW+9aVgXLjoLB4TNnx06L+VBz5R1cA2MKHyQFD RYAw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=to:subject:message-id:date:from:mime-version:x-gm-message-state :from:to:cc:subject:date; bh=F7ok+/7I3YEslmStsTeIhoz0QXnkTYBw68r2G6gsMeE=; b=bkytVwZWFGWqNMYYFBTBjFJd5LYyfS+MUlTil7wry3JxgkRKflaNjT539vKAML6bU8 4h0X79J4+mncWvw7KLmD+V4yWGHEdxa+r06DafETD67IwYfAy8Ie8dbiMbcGiVsqkd5L 2aFq2Z8y4b21dwAuFaZjTX04r4kfM+Rxe5sny1+BVcXrAXdzYMRO7z+gQEWGXu9bzxk1 /Uja3Io0d69qhmfxziU256YI8ZvY6fUGIKgrLqFlZUptipSjAvdY/F2DcYYiMCHyc+uf yII81Fh7qQQoxgJZ/rhpNShZOxtg7fsoel3GmAhBEhyCwdXz6m/ake6K2XifYSU87sGc m0Gw== X-Gm-Message-State: ACrzQf2yUGaTrOLVidxLlzHk4LQI252PoEdm9zTlzKnKVQ6s0h66aZXQ UT4IDeEQYFBAjLAo14wnl7GD+ltRQUEMRFChGYhqdihrgzY= X-Google-Smtp-Source: AMsMyM7+gP4CkCRH3mm3DS+fqimrMsuA9K3WoRCFVajjgqaZBtsCFRaxr2Cs3xqbpPuyJWD7bEOeJNTuoKNYOCxgWEg= X-Received: by 2002:a05:6512:b87:b0:498:f223:7906 with SMTP id b7-20020a0565120b8700b00498f2237906mr5794025lfv.664.1664057421174; Sat, 24 Sep 2022 15:10:21 -0700 (PDT) Received-SPF: pass client-ip=2a00:1450:4864:20::131; envelope-from=shenlebantongying@gmail.com; helo=mail-lf1-x131.google.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 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_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Mailman-Approved-At: Sun, 25 Sep 2022 03:43:55 -0400 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:10379 Archived-At: GNU Guile 3.0.8 Using `guile3 < file.scm` to run the code below will makes the result of tp unpredictable (pointing to very random things) I am not sure about the set-cdr! and quote usage. However, i runned the same code in other schemes, mit, chicken, racket/r6rs, gambit, and they all yield tl as (1 2 3). (use-modules (ice-9 pretty-print)) (define tl '(1 2)) (define tp (cdr tl)) (set-cdr! tp (cons 3 '())) (pretty-print tl) (pretty-print tp) --- However, if i use plain old (display tp), the code will out put expected valve (1 2 3) (3) (define tl '(1 2)) (define tp (cdr tl)) (set-cdr! tp (cons 3 '())) (display tl) (newline) (display tp) (newline) --- Context: I am using guile3's repl and whenever i access a variable's by typing its name after (set-cdr!), the result will goes wild.