From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.bugs Subject: bug#44155: Print integers as characters Date: Sun, 01 Nov 2020 09:58:25 +0200 Organization: LINKOV.NET Message-ID: <87v9epa4we.fsf@mail.linkov.net> References: <877drh7unm.fsf@igel.home> <87lffxuwgn.fsf@mail.linkov.net> <87d0172yev.fsf@mail.linkov.net> <83mu0afcex.fsf@gnu.org> <87wnzenmwc.fsf@mail.linkov.net> <83imayf5f2.fsf@gnu.org> <878sbrc317.fsf@mail.linkov.net> <83h7qecps2.fsf@gnu.org> <87imaury51.fsf@mail.linkov.net> <83y2jpazc9.fsf@gnu.org> <87imaskarj.fsf@mail.linkov.net> <83lffob1zp.fsf@gnu.org> <87pn4ynok3.fsf@mail.linkov.net> <1pimaq6kom.fsf@fencepost.gnu.org> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="5549"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (x86_64-pc-linux-gnu) Cc: 44155@debbugs.gnu.org, schwab@linux-m68k.org To: Glenn Morris Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sun Nov 01 09:02:49 2020 Return-path: Envelope-to: geb-bug-gnu-emacs@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 1kZ8K9-0001Ko-Gu for geb-bug-gnu-emacs@m.gmane-mx.org; Sun, 01 Nov 2020 09:02:49 +0100 Original-Received: from localhost ([::1]:59970 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kZ8K8-0004BW-Cx for geb-bug-gnu-emacs@m.gmane-mx.org; Sun, 01 Nov 2020 03:02:48 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:41252) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kZ8JP-0003jg-FP for bug-gnu-emacs@gnu.org; Sun, 01 Nov 2020 03:02:03 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:52219) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1kZ8JP-0003cJ-0G for bug-gnu-emacs@gnu.org; Sun, 01 Nov 2020 03:02:03 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1kZ8JO-0000O3-UY for bug-gnu-emacs@gnu.org; Sun, 01 Nov 2020 03:02:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Juri Linkov Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 01 Nov 2020 08:02:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 44155 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: fixed patch Original-Received: via spool by 44155-submit@debbugs.gnu.org id=B44155.16042176781419 (code B ref 44155); Sun, 01 Nov 2020 08:02:02 +0000 Original-Received: (at 44155) by debbugs.gnu.org; 1 Nov 2020 08:01:18 +0000 Original-Received: from localhost ([127.0.0.1]:35530 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kZ8Ig-0000Mp-5U for submit@debbugs.gnu.org; Sun, 01 Nov 2020 03:01:18 -0500 Original-Received: from relay6-d.mail.gandi.net ([217.70.183.198]:56191) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kZ8Id-0000MB-4A for 44155@debbugs.gnu.org; Sun, 01 Nov 2020 03:01:16 -0500 X-Originating-IP: 91.129.102.160 Original-Received: from mail.gandi.net (m91-129-102-160.cust.tele2.ee [91.129.102.160]) (Authenticated sender: juri@linkov.net) by relay6-d.mail.gandi.net (Postfix) with ESMTPSA id F1998C0009; Sun, 1 Nov 2020 08:01:06 +0000 (UTC) In-Reply-To: <1pimaq6kom.fsf@fencepost.gnu.org> (Glenn Morris's message of "Sat, 31 Oct 2020 19:27:05 -0400") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:192335 Archived-At: > New test fails on some systems. > > (equal > (-1 0 1 80 4194175 128 255 4194304) > (-1 0 1 80 4194175 4194176 4194303 4194304)) > :value nil :explanation > (list-elt 5 > (different-atoms > (128 "#x80" "?") > (4194176 "#x3fff80" "?\200"))))) This is because 4194176 is printed as ?\200 that is parsed as 128. This patch should fix test failures by printing integers for ambiguous characters. I'm sure no user would complain that numbers between 4194176 and 4194303 are printed as integers. diff --git a/src/print.c b/src/print.c index fa65a3cb26..49daf753bd 100644 --- a/src/print.c +++ b/src/print.c @@ -1912,7 +1912,7 @@ print_object (Lisp_Object obj, Lisp_Object printcharfun, bool escapeflag) intmax_t i; if (EQ (Vinteger_output_format, Qt) && CHARACTERP (obj) - && (c = XFIXNUM (obj))) + && (c = XFIXNUM (obj)) && ! CHAR_BYTE8_P (c)) { printchar ('?', printcharfun); if (escapeflag