From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Michael Welsh Duggan Newsgroups: gmane.emacs.bugs Subject: bug#50268: 28.0.50; Assertion warning during native compilation Date: Mon, 30 Aug 2021 10:05:16 -0400 Message-ID: <87sfyrt4df.fsf@md5i.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="30351"; mail-complaints-to="usenet@ciao.gmane.io" To: 50268@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Mon Aug 30 16:07:05 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 1mKhwG-0007ce-Tj for geb-bug-gnu-emacs@m.gmane-mx.org; Mon, 30 Aug 2021 16:07:05 +0200 Original-Received: from localhost ([::1]:58594 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1mKhwF-0002aW-QO for geb-bug-gnu-emacs@m.gmane-mx.org; Mon, 30 Aug 2021 10:07:03 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:47486) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mKhvH-0002Ly-5y for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:06:03 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:48395) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1mKhvG-0001z1-U5 for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:06:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1mKhvG-0005k9-Nd for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:06:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Michael Welsh Duggan Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 30 Aug 2021 14:06:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 50268 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.163033233822030 (code B ref -1); Mon, 30 Aug 2021 14:06:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 30 Aug 2021 14:05:38 +0000 Original-Received: from localhost ([127.0.0.1]:59941 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1mKhur-0005jF-JW for submit@debbugs.gnu.org; Mon, 30 Aug 2021 10:05:38 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:60908) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1mKhup-0005j8-Kr for submit@debbugs.gnu.org; Mon, 30 Aug 2021 10:05:36 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:47320) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mKhuk-0001jN-It for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:05:35 -0400 Original-Received: from md5i.com ([75.151.244.229]:57886) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mKhuf-0001V1-9r for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:05:30 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=md5i.com; s=dkim; h=Content-Type:MIME-Version:Message-ID:Date:Subject:To:From:Sender: Reply-To:Cc:Content-Transfer-Encoding:Content-ID:Content-Description: Resent-Date:Resent-From:Resent-Sender:Resent-To:Resent-Cc:Resent-Message-ID: In-Reply-To:References:List-Id:List-Help:List-Unsubscribe:List-Subscribe: List-Post:List-Owner:List-Archive; bh=2A6oQ5+Jd0ceD/hVdzApnVqy9RhiXl+H7gs2/+yrQPY=; b=chP2GoenasqFpw2hcbr9A/OIJH 5tbuLzRd28BAUp5NmS+zlDgt3lVnGDnIX4CSu6XBrSEe39VaIy4lryaJp8mTN12nFHTquj94k/LlM rHLXfsujOkiT3zFT5ZlgRLPrv; Original-Received: from abode ([192.168.177.1] helo=miko) by md5i.com with esmtpsa (TLS1.3) tls TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384 (Exim 4.94.2) (envelope-from ) id 1mKhud-002niK-84 for bug-gnu-emacs@gnu.org; Mon, 30 Aug 2021 10:05:23 -0400 Received-SPF: pass client-ip=75.151.244.229; envelope-from=md5i@md5i.com; helo=md5i.com X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action 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:213024 Archived-At: --=-=-= Content-Type: text/plain With the included file in the current working directory... First, byte compile the file: emacs -Q -batch --eval '(byte-compile-file "pacproxy.el")' Then, from emacs -Q M-: (push default-directory load-path) RET M-x load-library RET pacproxy RET For me, this results in the following warning: Warning (comp): /home/md5i/tmp/tmp/pacproxy.el: Error: Assertion failed (and (< idx (comp-vec-end vec)) (>= idx (comp-vec-beg vec))) --=-=-= Content-Type: application/emacs-lisp Content-Disposition: attachment; filename=pacproxy.el Content-Transfer-Encoding: quoted-printable ;;; pacproxy.el --- Description -*- lexical-binding: t -*- (require 'url) (require 'url-proxy) (require 'dbus) (defvar pacproxy-domain-alist '(("SEI" . "ad.sei.cmu.edu")) "Mapping from network IDs to domain names.") (defvar pacproxy--wpad-cache (make-hash-table :test #'equal)) (defvar pacproxy--original-locator nil) (defun pacproxy--current-connection-name () (let ((active (dbus-get-property :system "org.freedesktop.NetworkManager" "/org/freedesktop/NetworkManager" "org.freedesktop.NetworkManager" "PrimaryConnection"))) (dbus-get-property :system "org.freedesktop.NetworkManager" active "org.freedesktop.NetworkManager.Connection.Active" "Id"))) (defun pacproxy--retrieve-wpad (domain) (let ((result (gethash domain pacproxy--wpad-cache))) (if (eq result 'none) nil (or result (let* ((url-proxy-locator (lambda (&rest) "DIRECT")) (pacurl (concat "http://wpad." domain "/wpad.dat")) (result (ignore-errors (let ((result (url-retrieve-synchronously pacurl))) (with-current-buffer result (goto-char (point-min)) (re-search-forward "\n\n") (delete-region (point-min) (point))) (puthash domain result pacproxy--wpad-cache) result)))) (when (null result) (puthash domain 'none pacproxy--wpad-cache)) result))))) (defun pacproxy--url-destination (domain url host) (let ((wpad (pacproxy--retrieve-wpad domain))) (if (null wpad) "DIRECT" (with-temp-buffer (let ((result (current-buffer))) (with-current-buffer wpad (call-process-region (point-min) (point-max) "pactester" nil result nil "-p" "-" "-u" url "-h" host)) (buffer-string)))))) (defun pacproxy-find-proxy-for-url (urlobj host) (let ((manual (apply pacproxy--original-locator urlobj host nil))) (if (not (string-match "^DIRECT" manual)) manual (let* ((found (assoc (pacproxy--current-connection-name) pacproxy-domain-alist)) (domain (when found (cdr found)))) (if (null domain) "DIRECT" (pacproxy--url-destination domain (url-recreate-url urlobj) host)))))) (setq pacproxy--original-locator url-proxy-locator url-proxy-locator #'pacproxy-find-proxy-for-url) (defun pacproxy-unload-function () (setq url-proxy-locator pacproxy--original-locator) nil) (provide 'pacproxy) --=-=-= Content-Type: text/plain In GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version 1.16.0) of 2021-08-30 built on miko Repository revision: bc9516a6f12d21971db62ad5def51a3b4858a488 Windowing system distributor 'The X.Org Foundation', version 11.0.12011000 System Description: Debian GNU/Linux bookworm/sid Configured using: 'configure --without-toolkit-scroll-bars --with-x-toolkit=lucid --with-native-compilation' Configured features: CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM GSETTINGS HARFBUZZ JPEG JSON LCMS2 LIBOTF LIBSELINUX LIBSYSTEMD LIBXML2 M17N_FLT MODULES NATIVE_COMP NOTIFY INOTIFY PDUMPER PNG RSVG SECCOMP SOUND THREADS TIFF X11 XAW3D XDBE XIM XPM LUCID ZLIB Important settings: value of $LANG: en_US.UTF-8 value of $XMODIFIERS: @im=ibus locale-coding-system: utf-8-unix Major mode: Lisp Interaction Minor modes in effect: flyspell-mode: t display-time-mode: t magit-wip-initial-backup-mode: t magit-wip-before-change-mode: t magit-wip-after-apply-mode: t magit-wip-after-save-mode: t magit-wip-mode: t global-git-commit-mode: t magit-auto-revert-mode: t shell-dirtrack-mode: t 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 auto-composition-mode: t auto-encryption-mode: t auto-compression-mode: t line-number-mode: t Load-path shadows: /usr/share/emacs/site-lisp/cmake-mode hides /home/md5i/.config/emacs/elpa/cmake-mode-20210104.1831/cmake-mode /home/md5i/.config/emacs/elpa/transient-20210311.1549/transient hides /usr/local/share/emacs/28.0.50/lisp/transient Features: (shadow sort mail-extr gnus-msg gnus-art mm-uu mml2015 mm-view mml-smime smime dig gnus-sum shr kinsoku svg gnus-group gnus-undo gnus-start gnus-dbus gnus-cloud gnus-spec gnus-win emacsbug sendmail flyspell ispell view pacproxy dbus xml descr-text cus-edit pp cus-load time sieve-manage sasl sasl-anonymous sasl-login sasl-plain rng-loc rng-uri rng-parse rng-match rng-dt rng-util rng-pttrn nxml-parse nxml-ns nxml-enc xmltok nxml-util sgml-mode facemenu dom python tramp-sh tramp tramp-loaddefs trampver tramp-integration files-x tramp-compat parse-time iso8601 ls-lisp ps-print ps-print-loaddefs ps-def lpr picture magit-submodule magit-obsolete magit-blame magit-stash magit-reflog magit-bisect magit-push magit-pull magit-fetch magit-clone magit-remote magit-commit magit-sequence magit-notes magit-worktree magit-tag magit-merge magit-branch magit-reset magit-files magit-refs magit-status magit magit-repos magit-apply magit-wip magit-log magit-diff smerge-mode diff git-commit log-edit pcvs-util add-log magit-core magit-autorevert autorevert filenotify magit-margin magit-transient magit-process with-editor shell pcomplete server magit-mode transient format-spec magit-git magit-section comp comp-cstr warnings rx cl-extra help-mode benchmark magit-utils pcase which-func imenu vc-git diff-mode easy-mmode vc-dispatcher ido crm dash nnimap nnmail gnus-int gnus-range mail-source message rfc822 mml mml-sec epa mm-decode mm-bodies mm-encode mailabbrev gmm-utils mailheader utf7 netrc nnoo gnus wid-edit nnheader gnus-util rmail rmail-loaddefs time-date mail-utils gnus-o365-oauth2 oauth2 url-http url-auth mail-parse rfc2231 rfc2047 rfc2045 mm-util ietf-drums mail-prsvr url-gw nsm rmc puny plstore generated generic-x epg rfc6068 epg-config ediff ediff-merg ediff-mult ediff-wind ediff-diff ediff-help ediff-init ediff-util dired-x dired dired-loaddefs compile text-property-search comint ring ansi-color cc-mode cc-fonts cc-guess cc-menus cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs edmacro kmacro derived debian-el finder-inf info package browse-url url url-proxy url-privacy url-expand url-methods url-history url-cookie url-domsuf url-util mailcap url-handlers url-parse auth-source cl-seq eieio eieio-core cl-macs eieio-loaddefs password-cache json subr-x map url-vars seq byte-opt gv bytecomp byte-compile cconv cl-loaddefs cl-lib iso-transl 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 tab-bar menu-bar rfn-eshadow isearch easymenu timer select scroll-bar mouse jit-lock font-lock syntax font-core term/tty-colors frame minibuffer 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 cl-preloaded nadvice button loaddefs faces cus-face macroexp files window text-properties overlay sha1 md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote threads dbusbind inotify lcms2 dynamic-setting system-font-setting font-render-setting cairo x-toolkit x multi-tty make-network-process native-compile emacs) Memory information: ((conses 16 472475 15472) (symbols 48 29207 0) (strings 32 96154 4379) (string-bytes 1 3212668) (vectors 16 46522) (vector-slots 8 809008 15265) (floats 8 664 82) (intervals 56 418 14) (buffers 992 14)) -- Michael Welsh Duggan (md5i@md5i.com) --=-=-=--