From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail From: Michael Heerdegen Newsgroups: gmane.emacs.help Subject: Re: Bookmarks in EWW Date: Mon, 20 Apr 2020 05:17:27 +0200 Message-ID: <87blnmlubc.fsf@web.de> References: <878sjrfh2m.fsf@mbork.pl> <871rpipzwa.fsf@web.de> <87tv2d3zii.fsf@web.de> <87lfnn9b2o.fsf@web.de> <87r1xeeek1.fsf@web.de> <87k135ky5j.fsf@web.de> <875zdwqgxz.fsf@web.de> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202"; logging-data="122140"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux) Cc: help-gnu-emacs@gnu.org To: Stefan Monnier Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Mon Apr 20 05:20:40 2020 Return-path: Envelope-to: geh-help-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 1jQMzA-000VgD-Ji for geh-help-gnu-emacs@m.gmane-mx.org; Mon, 20 Apr 2020 05:20:40 +0200 Original-Received: from localhost ([::1]:56582 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jQMz8-0004PM-CM for geh-help-gnu-emacs@m.gmane-mx.org; Sun, 19 Apr 2020 23:20:39 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:55532 helo=eggs1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jQMw9-0004OE-HR for help-gnu-emacs@gnu.org; Sun, 19 Apr 2020 23:17:33 -0400 Original-Received: from Debian-exim by eggs1p.gnu.org with spam-scanned (Exim 4.90_1) (envelope-from ) id 1jQMw8-0007eh-RX for help-gnu-emacs@gnu.org; Sun, 19 Apr 2020 23:17:33 -0400 Original-Received: from mout.web.de ([212.227.15.14]:34397) by eggs1p.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1jQMw8-0007df-5Z for help-gnu-emacs@gnu.org; Sun, 19 Apr 2020 23:17:32 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=web.de; s=dbaedf251592; t=1587352645; bh=VW4zDruinjGpqvryUt6oy8PLfEyMPoTfYqKdKCKT+PQ=; h=X-UI-Sender-Class:From:To:Cc:Subject:References:Date:In-Reply-To; b=edyeWSEE3oD3a7DFovYwS96+T3bO7QKRoXVB0E77T5O/asx6mIOz/x+fkA7TIGt11 FdFNqcd3PZHASngOy/KSoT7h4L4HNkXgfNUeACDqH45Q1niJsNDQKVdcg+HfVrki9E FK/VW24YwsbQgSbI9QSCmBwE6tphblsf8Guv2UUA= X-UI-Sender-Class: c548c8c5-30a9-4db5-a2e7-cb6cb037b8f9 Original-Received: from drachen.dragon ([188.98.99.7]) by smtp.web.de (mrweb001 [213.165.67.108]) with ESMTPSA (Nemesis) id 0McneT-1jhlKO2ZaD-00HySb; Mon, 20 Apr 2020 05:17:25 +0200 In-Reply-To: (Stefan Monnier's message of "Sun, 19 Apr 2020 09:18:21 -0400") X-Provags-ID: V03:K1:QzkUCFWUdfbyRXQKK+oz8GHjBZQ9wBNdBzwCvaE9w+ExPUIfuZJ gFD2t1yIu08SytJh6Z8OFIgsaVuoadFN3+NTqtVjpBgPJJCZpZG+x0AVih25uovXp6/z5Yd NYM9qnf8pvCIkFW9/wd/CupYir2elqQkhCu8Xqgy/jIxW1Is7CY2x+89ZFd4zGJyr+VwpSA EPHeO+z8Esrth1Tdx3Scg== X-UI-Out-Filterresults: notjunk:1;V03:K0:1tgtrk/8jCY=:jM1N7XIjsM1IwgKi3cEzM5 xUJTzaDoiPldsJva9xqpU7EyhQPrCXtzB24ez6lXz3r388ND2lVFUig4YlCGlITSZ/aEOou8k s4t5/mBIiXnOysdXT4pcKZ7b4Rt3JMgpM2CAsIkH/u8TnUpQhgBx5JgOT6Kg7LMm3dYWxY6OO ndUYZjUv1fYPlwP2lSYtmLlEmGe48Ohh/UUhK/UCTGLdZRl6+KyjuTy2HiLEcPoTbremXhkQy 4yRqQ2mfvbvDHwHTWjB3HRngkjWK5Ieae2ZbHgVyq2ERMF6xrXYXjqT8Bgf55Cyz/KXRvhpkU i9qvA4WUMulQbge5UACaDlhydXdOl15bKLFsvPzcOXjLDbgNF9LmGtP9b59FMn7Pd8o2QGVWw wADVmL0E5W24FXdWQTP2ILKswngxzKaNhwIFAAIYYSvq3kbT/2aeal2x0yRaHjCJJ6ktku9TS O5z+X3Pii6fT7Vb+aZ+Xb3kW7aOeBuTQb4GlpJOr6vfpGKDXeRpeQ9ESINy3OXQBiHLrbEqhs HPsPbChO2RRUBaLDVauc+CHd/6YetuS+/BHeogEUWoqsv9JBISeFWcA+y5VFVJksjG6kzWU3K MY7DaihFEc9SVv41tq+cV/u1vhr6Jf8O6TtrQMg4ymEB48LEZEAQ9jNfi06XROseQU34hm9mL /aBhgZEmEArAUN7MaOcshQKLP2HhCnQLXnOq6W4Kk0B3HJkDizC1SmCxGojFikEREmOaH2jpa OhZsdOYyx/JoWyftYyli+5ZOeOIKEfFU5jtAO6M+8FBk9wfr7Ms5l71k5fGthzKe7qmZkWr8 Received-SPF: pass client-ip=212.227.15.14; envelope-from=michael_heerdegen@web.de; helo=mout.web.de X-detected-operating-system: by eggs1p.gnu.org: First seen = 2020/04/19 23:17:29 X-ACL-Warn: Detected OS = Linux 2.2.x-3.x [generic] X-Received-From: 212.227.15.14 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "help-gnu-emacs" Xref: news.gmane.io gmane.emacs.help:122893 Archived-At: --=-=-= Content-Type: text/plain Stefan Monnier writes: > Oh, right `byte-hunk-handler` is to handle top-level uses only > (e.g. top-level uses of `require` trigger loading the file at > compilation time, whereas they don't when not at top-level). Yeah, I guess such stuff could be mentioned in the file header... > I think you want to use `(byte-defop-compiler-1 make-local-variable)` > and then define `byte-compile-make-local-variable`. Oh, that's what I originally wanted to try first, but `byte-defop-compiler-1' sounded too creepy. But that works now (unless I've missed something else): --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=0001-WIP-My-byte-compile-local-patch.patch Content-Transfer-Encoding: quoted-printable =46rom a21a6af1dfb60db4ba1c028aff91902649eae920 Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Fri, 10 Apr 2020 01:21:33 +0200 Subject: [PATCH] WIP: My byte compile local patch =2D-- lisp/emacs-lisp/bytecomp.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 4f01918bdb..4fdb6e65b7 100644 =2D-- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -4752,6 +4752,14 @@ byte-compile-make-variable-buffer-local (defun byte-compile-form-make-variable-buffer-local (form) (byte-compile-keep-pending form 'byte-compile-normal-call)) +(byte-defop-compiler-1 make-local-variable + byte-compile-make-local-variable) +(defun byte-compile-make-local-variable (form) + (let ((var-exp (car-safe (cdr-safe form)))) + (when (eq 'quote (car-safe var-exp)) + (byte-compile--declare-var (car (cdr var-exp))))) + (byte-compile-normal-call form)) + (put 'function-put 'byte-hunk-handler 'byte-compile-define-symbol-prop) (put 'define-symbol-prop 'byte-hunk-handler 'byte-compile-define-symbol-p= rop) (defun byte-compile-define-symbol-prop (form) =2D- 2.26.1 --=-=-= Content-Type: text/plain Michael. --=-=-=--