Re: cl-byte-compile-compiler-macro

[Andreas Schwab]

Glenn Morris <address@hidden> writes:

> Richard Stallman wrote:
>
>>     Yes, I see this the first time (in any emacs session) I use C-x v = on
>>     a file under CVS control. I don't see it with `emacs -q' though.
>>
>> Can you track down which customization causes it?
>
> For me, commenting out the line "(require 'tramp)" in my .emacs stops
> this error appearing on my first call to vc-diff. If I start emacs
> with -q, require tramp, and then use vc-diff, I don't see the error,
> however; so it's not quite that simple. tramp.elc does at least
> contain "cl-byte-compile-compiler-macro".

I think the problem is that (defstruct tramp-file-name) needs to be moved
before its first use (in with-parsed-tramp-file-name).

Can you still reproduce it when you apply this patch?

--- lisp/net/tramp.el.~1.89.~   2006-02-13 11:08:07.000000000 +0100
+++ lisp/net/tramp.el   2006-03-25 15:17:34.000000000 +0100
@@ -1995,6 +1995,8 @@ own implementation."
    ((fboundp 'point-at-eol)     (funcall (symbol-function 'point-at-eol)))
    (t (save-excursion (end-of-line) (point)))))
 
+(defstruct tramp-file-name multi-method method user host localname)
+
 (defmacro with-parsed-tramp-file-name (filename var &rest body)
   "Parse a Tramp filename and make components available in the body.
 
@@ -6866,8 +6868,6 @@ Not actually used.  Use `(format \"%o\" 
 ;; internal data structure.  Convenience functions for internal
 ;; data structure.
 
-(defstruct tramp-file-name multi-method method user host localname)
-
 (defun tramp-tramp-file-p (name)
   "Return t iff NAME is a tramp file."
   (save-match-data

Andreas.

-- 
Andreas Schwab, SuSE Labs, address@hidden
SuSE Linux Products GmbH, Maxfeldstraße 5, 90409 Nürnberg, Germany
PGP key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."