From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED.blaine.gmane.org!not-for-mail From: Braun =?UTF-8?Q?G=C3=A1bor?= Newsgroups: gmane.emacs.bugs Subject: bug#38206: 26.1; cl-prettyexpand incorrectly expands pushing to structures Date: Thu, 14 Nov 2019 09:20:19 +0100 Message-ID: <62949967.3QoF1lfsEv@gabor> Mime-Version: 1.0 Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable Injection-Info: blaine.gmane.org; posting-host="blaine.gmane.org:195.159.176.226"; logging-data="233774"; mail-complaints-to="usenet@blaine.gmane.org" To: 38206@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu Nov 14 09:21:14 2019 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([209.51.188.17]) by blaine.gmane.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.89) (envelope-from ) id 1iVANM-000yfp-F1 for geb-bug-gnu-emacs@m.gmane.org; Thu, 14 Nov 2019 09:21:12 +0100 Original-Received: from localhost ([::1]:54346 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iVANL-0004z2-8y for geb-bug-gnu-emacs@m.gmane.org; Thu, 14 Nov 2019 03:21:11 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:44583) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iVANE-0004yi-E7 for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:21:05 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iVAND-0002bp-1p for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:21:04 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:52071) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1iVANC-0002bj-Uw for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:21:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1iVANC-0005oV-KX for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:21:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Braun =?UTF-8?Q?G=C3=A1bor?= Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 14 Nov 2019 08:21:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 38206 X-GNU-PR-Package: emacs X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.157371963622290 (code B ref -1); Thu, 14 Nov 2019 08:21:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 14 Nov 2019 08:20:36 +0000 Original-Received: from localhost ([127.0.0.1]:60892 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1iVAMm-0005nQ-5R for submit@debbugs.gnu.org; Thu, 14 Nov 2019 03:20:36 -0500 Original-Received: from lists.gnu.org ([209.51.188.17]:50527) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1iVAMk-0005nJ-Rw for submit@debbugs.gnu.org; Thu, 14 Nov 2019 03:20:35 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:44450) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iVAMj-0004vw-CC for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:20:34 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iVAMh-0002Dp-VI for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:20:33 -0500 Original-Received: from mail-wr1-x42e.google.com ([2a00:1450:4864:20::42e]:45550) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1iVAMh-00029J-OR for bug-gnu-emacs@gnu.org; Thu, 14 Nov 2019 03:20:31 -0500 Original-Received: by mail-wr1-x42e.google.com with SMTP id z10so5334649wrs.12 for ; Thu, 14 Nov 2019 00:20:31 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=ppMNPXJ6i60g0Dn6uPzZCMKuSsBYUjqTJNzuyvl0FPE=; b=UHBMcN+/aRb3kUKrhde/tTAwYMCQd8cgf/FPAgN2ppxTjX//fv8ruIpVPj64LVvkH4 jQKCvOgrU7py4YI+jHC9mZN1KkdmnunjLMxEfnCEAUPEjJVNSbfaER/wTrRHZV7ZiK+F mwyS9yJLRL/q+Ksf4zd0L90uChV82Xtr2Gznh7vxpWkBxMpdFp7lq/dUD7BKAVBdhP24 NoIJsxG4XN2bPun/lsv2BW64S6hr9CjV+EzDCjPntikLtIwds4nY9cp7oeFtcO860Hji yZTVP0fJPrKK87fGCG4tgLBLr95VyWuGt6GL8PrD4HWn9AqPSQKdQwysvI55hIu3PoN4 daSA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=ppMNPXJ6i60g0Dn6uPzZCMKuSsBYUjqTJNzuyvl0FPE=; b=RxrwS0DAfZDi89noaNrf17cx08Kyg88ZivhkU61daI9f0RtmMK841rQ85qCYOp75jG pCakcteRo4ZTKtdeKVJ7oUyJoUBmqTHZBybpln+I3Ozsw4h1Hd/g0FVWEz/WpuSt7/Xf Gsskcyp5CvgtRDVWXIAuQwNCp+MN84yc4AyDgeLDWnMNylmDLr1Y1aF7NAegGKZGikDz oY7TGS0HNTwNMzSWEGmvjIfx6AUZ5spfs67fZe2dAUEmkSlQnrsxtoH4vNmtxMYDK+KC dBQP8HvCCDAHP/tlCpwCg1ypUqbVyxyoCY/RnbdTGbedNGRsm+0WQ+qwLR8dMuKspGCi ipXA== X-Gm-Message-State: APjAAAVcxD8L7+BdicIGZ0pxUleWxwPZSjhbpNcDyFbALa7KSqMiKirN NR4nYNJX2HgmDHHFFYjxC06EKzmm X-Google-Smtp-Source: APXvYqxLcFqp1H2slulWgfuKW68sPEwUb3I65KvF3Qo3Y64wej13B3zJMW6+ioVozhBQnbknGInu3A== X-Received: by 2002:adf:cf0c:: with SMTP id o12mr6734531wrj.102.1573719629718; Thu, 14 Nov 2019 00:20:29 -0800 (PST) Original-Received: from gabor.localnet (254C7E66.nat.pool.telekom.hu. [37.76.126.102]) by smtp.gmail.com with ESMTPSA id u187sm5633132wme.15.2019.11.14.00.20.28 for (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Thu, 14 Nov 2019 00:20:28 -0800 (PST) X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. 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: 209.51.188.43 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.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:171560 Archived-At: Hi, Create file test.el: (require 'cl-lib) (cl-defstruct test slot) (cl-prettyexpand '(push 1 (test-slot foo))) (message "%s" (buffer-string)) Let Emacs evaluate the file: $ emacs -Q -batch -l ./test.el Expanding... =46ormatting... (let* ((v test-slot) (v (or (cl-block test-p (and (memq (type-of foo) cl-struct-test-tags) t)) (signal 'wrong-type-argument (list 'test foo)))) (v (aref foo 1))) (\(setf\ cl-block\) (cons 1 (cl-block v v v)) v v v)) The form in the output is obviously an incorrect expansion of (push 1 (test-slot foo)). Two errors are (1) the reference to (non-existent) free variable `test-slot' in the=20 first line and (2) calling the nonexistent function `(setf cl-block)' in the last line. Best wishes, G=C3=A1bor In GNU Emacs 26.1 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.24.4) of 2019-02-03, modified by Debian built on zam904 Windowing system distributor 'The X.Org Foundation', version=20 11.0.12004000 System Description: Debian GNU/Linux 10 (buster) Configured using: 'configure --build x86_64-linux-gnu --prefix=3D/usr --sharedstatedir=3D/var/lib --libexecdir=3D/usr/lib --localstatedir=3D/var/lib --infodir=3D/usr/share/info --mandir=3D/usr/share/man --enable-libsystemd --with-pop=3Dyes --enable-locallisppath=3D/etc/emacs:/usr/local/share/emacs/26.1/site- lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/26.1/site-lisp:/ usr/share/emacs/site-lisp --with-sound=3Dalsa --without-gconf --with-mailutils --build x86_64-linux-gnu --prefix=3D/usr --sharedstatedir=3D/var/lib --libexecdir=3D/usr/lib --localstatedir=3D/var/lib --infodir=3D/usr/share/info --mandir=3D/usr/share/man --enable-libsystemd --with-pop=3Dyes --enable-locallisppath=3D/etc/emacs:/usr/local/share/emacs/26.1/site- lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/26.1/site-lisp:/ usr/share/emacs/site-lisp --with-sound=3Dalsa --without-gconf --with-mailutils --with-x=3Dyes --with-x-toolkit=3Dgtk3 --with-toolkit-scroll-bars 'CFLAGS=3D-g -O2 -fdebug-prefix-map=3D/build/emacs-26.1+1=3D. -fstack-protector-strong -Wformat -Werror=3Dformat-security -Wall' 'CPPFLAGS=3D-Wdate-time -D_FORTIFY_SOURCE=3D2' LDFLAGS=3D-Wl,-z,relro' Configured features: XPM JPEG TIFF GIF PNG RSVG IMAGEMAGICK SOUND GPM DBUS GSETTINGS NOTIFY ACL LIBSELINUX GNUTLS LIBXML2 FREETYPE M17N_FLT LIBOTF XFT ZLIB TOOLKIT_SCROLL_BARS GTK3 X11 THREADS LIBSYSTEMD LCMS2 Important settings: value of $LANG: hu_HU.UTF-8 locale-coding-system: utf-8-unix Major mode: Lisp Interaction Minor modes in effect: tooltip-mode: t global-eldoc-mode: t eldoc-mode: t electric-indent-mode: t mouse-wheel-mode: t tool-bar-mode: t menu-bar-mode: t file-name-shadow-mode: t global-font-lock-mode: t font-lock-mode: t blink-cursor-mode: t auto-composition-mode: t auto-encryption-mode: t auto-compression-mode: t line-number-mode: t transient-mark-mode: t Load-path shadows: None found. =46eatures: (shadow sort mail-extr emacsbug message rmc puny seq byte-opt bytecomp byte-compile cconv dired dired-loaddefs format-spec rfc822 mml mml-sec password-cache epa derived epg epg-config gnus-util rmail rmail-loaddefs mm-decode mm-bodies mm-encode mail-parse rfc2231 mailabbrev gmm-utils mailheader sendmail rfc2047 rfc2045 ietf-drums mm-util mail-prsvr mail-utils cl-extra help-mode easymenu cl-seq cl-macs gv cl-loaddefs cl-lib elec-pair time-date mule-util tooltip eldoc electric uniquify ediff-hook vc-hooks lisp-float-type mwheel term/x-win x-win term/common-win x-dnd tool-bar dnd fontset image regexp-opt fringe tabulated-list replace newcomment text-mode elisp-mode lisp-mode prog-mode register page menu-bar rfn-eshadow isearch timer select scroll-bar mouse jit-lock font-lock syntax facemenu font-core term/tty-colors frame cl-generic cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek romanian slovak czech european ethiopic indian cyrillic chinese composite charscript charprop case-table epa-hook jka-cmpr-hook help simple abbrev obarray minibuffer cl-preloaded nadvice loaddefs button faces cus-face macroexp files text-properties overlay sha1 md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote dbusbind inotify lcms2 dynamic-setting system-font-setting font-render-setting move-toolbar gtk x-toolkit x multi-tty make-network-process emacs) Memory information: ((conses 16 99333 7644) (symbols 48 20637 2) (miscs 40 53 104) (strings 32 28919 1306) (string-bytes 1 758567) (vectors 16 15133) (vector-slots 8 500702 9540) (floats 8 51 108) (intervals 56 308 6) (buffers 992 12))