From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Michael Albinus Newsgroups: gmane.emacs.bugs Subject: bug#50869: 28.0.50; tramp: void-function tramp-file-name-method--cmacro Date: Sat, 02 Oct 2021 18:36:37 +0200 Message-ID: <87tuhzcrje.fsf@gmx.de> References: Mime-Version: 1.0 Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="35366"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux) Cc: shuguang79@qq.com To: 50869@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sat Oct 02 18:37:21 2021 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 1mWi0m-0008xo-H3 for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 02 Oct 2021 18:37:20 +0200 Original-Received: from localhost ([::1]:43072 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1mWi0k-0008NY-UB for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 02 Oct 2021 12:37:18 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:36864) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mWi0X-0008MN-3b for bug-gnu-emacs@gnu.org; Sat, 02 Oct 2021 12:37:05 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:48841) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1mWi0U-0000Qn-Vx for bug-gnu-emacs@gnu.org; Sat, 02 Oct 2021 12:37:04 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1mWi0U-0008Aw-TO for bug-gnu-emacs@gnu.org; Sat, 02 Oct 2021 12:37:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Michael Albinus Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 02 Oct 2021 16:37:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 50869 X-GNU-PR-Package: emacs X-Debbugs-Original-To: "Shuguang Sun" via "Bug reports for GNU Emacs, the Swiss army knife of text editors" X-Debbugs-Original-Cc: Shuguang Sun , 50869@debbugs.gnu.org Original-Received: via spool by 50869-submit@debbugs.gnu.org id=B50869.163319261331391 (code B ref 50869); Sat, 02 Oct 2021 16:37:02 +0000 Original-Received: (at 50869) by debbugs.gnu.org; 2 Oct 2021 16:36:53 +0000 Original-Received: from localhost ([127.0.0.1]:60383 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1mWi0K-0008AE-P1 for submit@debbugs.gnu.org; Sat, 02 Oct 2021 12:36:53 -0400 Original-Received: from mout.gmx.net ([212.227.15.18]:58525) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1mWi0I-00089y-2C for 50869@debbugs.gnu.org; Sat, 02 Oct 2021 12:36:50 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.net; s=badeba3b8450; t=1633192599; bh=fDbWkIiZJG2tv+jE81MYQRRw6CkYFCvFKkf8HTCw4U4=; h=X-UI-Sender-Class:From:To:Cc:Subject:References:Date:In-Reply-To; b=LvO3TuDIQM3r9cRJQCsp0fWwt6EdOM6q4k2brpRDO2lF6TdbOcj71edI8NviVriYj v9ATLb8FgD8lYi3e0AMw7HnGZmzA7NySFKCbJ7J5A41dbntS1W807Tjs0FXXmhRJWy YvTmDQMn7G9HUCEHTPM5jQkGz+LTI9mBkWByS9pg= X-UI-Sender-Class: 01bb95c1-4bf8-414a-932a-4f6e2808ef9c Original-Received: from gandalf.gmx.de ([79.140.124.29]) by mail.gmx.net (mrgmx005 [212.227.17.190]) with ESMTPSA (Nemesis) id 1MQMuR-1mB4Xn3iNd-00MHED; Sat, 02 Oct 2021 18:36:39 +0200 In-Reply-To: (Shuguang Sun's message of "Tue, 28 Sep 2021 23:15:44 +0800") X-Provags-ID: V03:K1:NVK/ft5R8RRTqga5it5/1RLV2pf5509O9iHVJDT+QUVKMbcXtuF 7kWPN50Put+iZuU9nsooob4JmSixBh08o8tM5u93asXfotidYzuAnOcyxzvkKngSQsjqH9j /OXCgwgMBKazeBFpNLedxcHJQ6Iaj9hx66o9BPkM0XtpEzh/zYGYVxmaoTiXVTyzbYJEKn4 f2/7ykZq9gK4oYM7GX33Q== X-UI-Out-Filterresults: notjunk:1;V03:K0:MvDMqfYODMU=:fElKrdkUacDy21dCUULF1+ 10vV+xAMsnv1yg4KhOio8GktUu4jNuB9jQTx+Rqw+oKeRPg2fXML3HzYoS8p/HjbYDxJIxV56 1u+kLQ+XuOZWfDhOJBdDbzytpRp0QXXQS7cFl5J1p2ZV0YFuPpLJCkn9JAzGaKqKL2TKS6HVz PDU7DuE62Y2h8m7/YYbRjoSBYrl/VIQ3urG4KyWTNFzzZ4t4Rua6qNn1K0thAzqweVPjF4hur bqqnFhkRpWkoPGe8MVQzghLzcpZNupPEG5U6H+D8l11eua3zG7SfvPFBuEXb5LEXVEhLov150 DrqM/APbPQ4LqG0iJF6m3GkX4DXjz2dHITpd/DD07PvS0wnubpCfRPtStQ4xeOp5cF+lPDRpi Ttl1uzMZYdC1GLv5pBwBBMUzlHojNhGzLbtvGSDE0FKDJwjBQK/VVJZTRPy010/MBeT1yXYFj oxDH+z6pPOUrZi1Fuy5XrE0xH6AAFU9QRmXgiZrQwIcGrVn4yJuoAFSWfHdilII9QMyWR0+rJ gSvOOr/B7x/DzaKonEcPTwWhTsYMLxbyYWCfVSJ5j0fnnaptedkIqzpzo2Di9CtDeHGDCPxwk zqvKxs89MUg6zd60slO3EQLgevc4gtTrXzMlppa5FAmVk7ncWDsWpqCifdqDJK/Y+/tFAHRs8 8mb6uUGSLfk7RNKTxANIZuUvCgJJs1HvMqKWXRsuxoyUOmh6qg/mrMsDv5SouIuxHOIiQa/A9 N8tq6U7B5Y2dkjPDc6u4YTgL5RFfKwsiIqVCvYfn16+KO+Kq7ZIGxQajAXWp5J7IgwSOhS1a 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:216182 Archived-At: "Shuguang Sun" via "Bug reports for GNU Emacs, the Swiss army knife of text editors" writes: > Hi, Hi, > After load - unload - load tramp, I got an compile error: > Compiler-macro error for tramp-file-name-method: (void-function > tramp-file-name-method--cmacro) [7 times] > > How to replicate it: > - Start emacs > - load-libary tramp > - tramp-unload-tramp > - load-libary tramp > - tramp-unload-tramp > - load-libary tramp tramp-file-name-method--cmacro is a generated accessor function of the defstruct tramp-file-name. I'm not sure that this is native Tramp error. The backtrace shows as --8<---------------cut here---------------start------------->8--- Debugger entered--Lisp error: (void-function tramp-file-name-method--cmacro) tramp-file-name-method--cmacro((tramp-file-name-method (tramp-dissect-fil= e-name filename)) (tramp-dissect-file-name filename)) apply(tramp-file-name-method--cmacro (tramp-file-name-method (tramp-disse= ct-file-name filename)) (tramp-dissect-file-name filename)) macroexp--compiler-macro(tramp-file-name-method--cmacro (tramp-file-name-= method (tramp-dissect-file-name filename))) #f(compiled-function (form func) #)(((tramp-f= ile-name-method (tramp-dissect-file-name filename))) tramp-file-name-method) macroexp--expand-all((tramp-file-name-method (tramp-dissect-file-name fil= ename))) macroexp--all-forms((string=3D (tramp-file-name-method (tramp-dissect-fil= e-name filename)) tramp-adb-method) 1) #f(compiled-function (form func) #)(((string= =3D (tramp-file-name-method (tramp-dissect-file-name filename)) tramp-adb-m= ethod)) string=3D) macroexp--expand-all((string=3D (tramp-file-name-method (tramp-dissect-fi= le-name filename)) tramp-adb-method)) macroexp--all-forms((and (tramp-tramp-file-p filename) (string=3D (tramp-= file-name-method (tramp-dissect-file-name filename)) tramp-adb-method)) 1) #f(compiled-function (form func) #)(((and (tr= amp-tramp-file-p filename) (string=3D (tramp-file-name-method (tramp-dissec= t-file-name filename)) tramp-adb-method))) and) macroexp--expand-all((and (tramp-tramp-file-p filename) (string=3D (tramp= -file-name-method (tramp-dissect-file-name filename)) tramp-adb-method))) macroexp--all-forms((lambda (filename) "Check if it's a FILENAME for ADB.= " (and (tramp-tramp-file-p filename) (string=3D (tramp-file-name-method (tr= amp-dissect-file-name filename)) tramp-adb-method))) 2) macroexp--expand-all(#'(lambda (filename) "Check if it's a FILENAME for A= DB." (and (tramp-tramp-file-p filename) (string=3D (tramp-file-name-method = (tramp-dissect-file-name filename)) tramp-adb-method)))) macroexp--all-forms((defalias 'tramp-adb-file-name-p #'(lambda (filename)= "Check if it's a FILENAME for ADB." (and (tramp-tramp-file-p filename) (st= ring=3D (tramp-file-name-method (tramp-dissect-file-name filename)) tramp-a= db-method)))) 1) #f(compiled-function (form func) #)(((defalia= s 'tramp-adb-file-name-p #'(lambda (filename) "Check if it's a FILENAME for= ADB." (and (tramp-tramp-file-p filename) (string=3D (tramp-file-name-metho= d ...) tramp-adb-method))))) defalias) macroexp--expand-all((defun tramp-adb-file-name-p (filename) "Check if it= 's a FILENAME for ADB." (and (tramp-tramp-file-p filename) (string=3D (tram= p-file-name-method (tramp-dissect-file-name filename)) tramp-adb-method)))) macroexp--all-forms((prog1 (defun tramp-adb-file-name-p (filename) "Check= if it's a FILENAME for ADB." (and (tramp-tramp-file-p filename) (string=3D= (tramp-file-name-method (tramp-dissect-file-name filename)) tramp-adb-meth= od))) (eval-and-compile (function-put 'tramp-adb-file-name-p 'speed '-1) (p= ut 'tramp-adb-file-name-p 'byte-optimizer 'byte-compile-inline-expand))) 1) #f(compiled-function (form func) #)(((prog1 (= defun tramp-adb-file-name-p (filename) "Check if it's a FILENAME for ADB." = (and (tramp-tramp-file-p filename) (string=3D (tramp-file-name-method (tram= p-dissect-file-name filename)) tramp-adb-method))) (eval-and-compile (funct= ion-put 'tramp-adb-file-name-p 'speed '-1) (put 'tramp-adb-file-name-p 'byt= e-optimizer 'byte-compile-inline-expand)))) prog1) macroexp--expand-all((prog1 (defun tramp-adb-file-name-p (filename) "Chec= k if it's a FILENAME for ADB." (and (tramp-tramp-file-p filename) (string= =3D (tramp-file-name-method (tramp-dissect-file-name filename)) tramp-adb-m= ethod))) (eval-and-compile (function-put 'tramp-adb-file-name-p 'speed '-1)= (put 'tramp-adb-file-name-p 'byte-optimizer 'byte-compile-inline-expand)))) macroexpand-all((prog1 (defun tramp-adb-file-name-p (filename) "Check if = it's a FILENAME for ADB." (and (tramp-tramp-file-p filename) (string=3D (tr= amp-file-name-method (tramp-dissect-file-name filename)) tramp-adb-method))= ) (eval-and-compile (function-put 'tramp-adb-file-name-p 'speed '-1) (put '= tramp-adb-file-name-p 'byte-optimizer 'byte-compile-inline-expand)))) internal-macroexpand-for-load((prog1 (defun tramp-adb-file-name-p (filena= me) "Check if it's a FILENAME for ADB." (and (tramp-tramp-file-p filename) = (string=3D (tramp-file-name-method (tramp-dissect-file-name filename)) tram= p-adb-method))) (eval-and-compile (function-put 'tramp-adb-file-name-p 'spe= ed '-1) (put 'tramp-adb-file-name-p 'byte-optimizer 'byte-compile-inline-ex= pand))) t) eval-buffer(# nil "/home/albinus/src/emacs-28/lisp/net/tr= amp-loaddefs..." nil t) ; Reading at buffer position 4857 load-with-code-conversion("/home/albinus/src/emacs-28/lisp/net/tramp-load= defs..." "/home/albinus/src/emacs-28/lisp/net/tramp-loaddefs..." nil t) load-with-shorthands-and-code-conversion("/home/albinus/src/emacs-28/lisp= /net/tramp-loaddefs..." "/home/albinus/src/emacs-28/lisp/net/tramp-loaddefs= ..." nil t) require(tramp-loaddefs) byte-code("\300\301!\210\302\303\304\305\306DD\307\310\311%\210\302\312\3= 04\305\313DD\314\310\315%\210\302\316\304\305\317DD\320\321\322\310\311&\7\= 210\302\323\304\305\324DD..." [require tramp-loaddefs custom-declare-variab= le tramp-mode funcall function #f(compiled-function () #) "Whether Tramp is enabled.\nIf it is set to nil, all..." :type boo= lean tramp-verbose #f(compiled-function () #) "Ve= rbosity level for Tramp messages.\nAny level x in..." integer tramp-debug-t= o-file #f(compiled-function () #) "Whether Tramp = debug messages shall be saved to fil..." :version "28.1" tramp-backup-direc= tory-alist #f(compiled-function () #) "Alist of f= ilename patterns and backup directory na..." (repeat (cons (regexp :tag "Re= gexp matching filename") (directory :tag "Backup directory name"))) tramp-a= uto-save-directory #f(compiled-function () #) "Pu= t auto-save files in this directory, if set.\nThe..." (choice (const :tag "= Use default" nil) (directory :tag "Auto save directory name")) tramp-encodi= ng-shell #f(compiled-function () #) "Use this = program for encoding and decoding command..." (file :must-match t) tramp-en= coding-command-switch #f(compiled-function () #) "Use this switch together with `tramp-encoding-shel..." string tramp-en= coding-command-interactive #f(compiled-function () #) "Use this switch together with `tramp-encoding-shel..." "24.1" (cho= ice (const nil) string)] 8) load("tramp") load-library("tramp") funcall-interactively(load-library "tramp") call-interactively(load-library record nil) command-execute(load-library record) execute-extended-command(nil "load-library" nil) funcall-interactively(execute-extended-command nil "load-library" nil) call-interactively(execute-extended-command nil nil) command-execute(execute-extended-command) --8<---------------cut here---------------end--------------->8--- > Best Regards, > Shuguang Sun Best regards, Michael.