From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: raman Newsgroups: gmane.emacs.bugs Subject: bug#18139: 24.4.50; called-interactively-p and skip advice: Date: Wed, 30 Jul 2014 06:56:45 -0700 Message-ID: References: <87a97texjg.fsf@gmail.com> <87bns7n0fu.fsf@gmail.com> <83a97rts25.fsf@gnu.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1406728714 25576 80.91.229.3 (30 Jul 2014 13:58:34 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 30 Jul 2014 13:58:34 +0000 (UTC) Cc: 18139@debbugs.gnu.org To: Eli Zaretskii Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed Jul 30 15:58:24 2014 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1XCUOd-0006j8-8v for geb-bug-gnu-emacs@m.gmane.org; Wed, 30 Jul 2014 15:58:23 +0200 Original-Received: from localhost ([::1]:51098 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XCUOc-00040F-Vo for geb-bug-gnu-emacs@m.gmane.org; Wed, 30 Jul 2014 09:58:23 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:45067) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XCUOS-0003yP-Ta for bug-gnu-emacs@gnu.org; Wed, 30 Jul 2014 09:58:19 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XCUOI-0004Tu-Sl for bug-gnu-emacs@gnu.org; Wed, 30 Jul 2014 09:58:12 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:45023) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XCUOI-0004Tp-Pc for bug-gnu-emacs@gnu.org; Wed, 30 Jul 2014 09:58:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1XCUOI-0002c8-99 for bug-gnu-emacs@gnu.org; Wed, 30 Jul 2014 09:58:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: raman Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 30 Jul 2014 13:58:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 18139 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: moreinfo Original-Received: via spool by 18139-submit@debbugs.gnu.org id=B18139.14067286229971 (code B ref 18139); Wed, 30 Jul 2014 13:58:02 +0000 Original-Received: (at 18139) by debbugs.gnu.org; 30 Jul 2014 13:57:02 +0000 Original-Received: from localhost ([127.0.0.1]:51966 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1XCUNH-0002aU-MZ for submit@debbugs.gnu.org; Wed, 30 Jul 2014 09:57:02 -0400 Original-Received: from mail-ie0-f173.google.com ([209.85.223.173]:61345) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1XCUNE-0002aK-1s for 18139@debbugs.gnu.org; Wed, 30 Jul 2014 09:56:57 -0400 Original-Received: by mail-ie0-f173.google.com with SMTP id tr6so1554861ieb.18 for <18139@debbugs.gnu.org>; Wed, 30 Jul 2014 06:56:49 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=20120113; h=from:to:cc:subject:references:date:in-reply-to:message-id :user-agent:mime-version:content-type:content-transfer-encoding; bh=Qi4j8Xvw02CBm6zNQUGUk9JMIILQno8SOgoq7YDq4X0=; b=SUzIlOZKq5ZuxlNU+XGwIqvlGZU0qTbMswueICuFr1Sweh3Z9tpwUOuxB9QYVOpGZz bFPdsR3MixfAYSWraBS1ww7k4DtBxLtjUpR6Ia38wn94melDen/1DNYBQUVA70YDonr5 eAUbjrNGEPzG1HlBJGIvNEYdjVCiBwxIf5QEn5xSjhichfkz7gTHfK0dtptBIepQ6W/p OuIAziFhzyEE1Ybwm1S1hV7R927P2mv9kcbjlLKwPYKyui2C8aLjNFse+DYxouldTc+m H2TbIqR/sCmbOozAkd+Em9+bu/cwsASUJDKpn/7i+iWa9A0PTBshn6Bil9KI0ECw+YNg hI2A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:to:cc:subject:references:date:in-reply-to :message-id:user-agent:mime-version:content-type :content-transfer-encoding; bh=Qi4j8Xvw02CBm6zNQUGUk9JMIILQno8SOgoq7YDq4X0=; b=UyhWUaJcn0UMEiqCSSDoAx0khjy8AeO0sJ2Pp/BI0ib1pBIiUp0wSARUOP7xCNGmnm geHHmwm6CGjyNzTMS5LIA0uzzq+wME+Z5SeqIVzjLD1jOfm/yAEHVfw/6Izl+DyIrM1k DNyf5lU+06K7Z582ShoQAsiIOcxqSKWviu3HNwwkpvALdsFy4zutblIw2pWm8gCTyVSD wjBSyyy0v42ngcQlF5g52ff4nfsQE/tKDCTK2hX0HgqcxYSpz8XyoNxvW8QmV32pITrU PerD89eIY115/P/xXP3jMkcbyC/Pxehlyeh0V085wnpMZ0SB2VPiBH5JnPrrNCVetdDM 7kXQ== X-Gm-Message-State: ALoCoQnRZfZBsrWFwxrXQMQlhGw+msgjsyMzI4yAwBER7s8wmok91fX0zbCwyDnGiXL+6IC0J6JC X-Received: by 10.50.126.100 with SMTP id mx4mr7762690igb.1.1406728609723; Wed, 30 Jul 2014 06:56:49 -0700 (PDT) Original-Received: from raman-glaptop.roam.corp.google.com.google.com (dhcp-172-19-118-102.cbf.corp.google.com [172.19.118.102]) by mx.google.com with ESMTPSA id o9sm9796132igv.18.2014.07.30.06.56.48 for (version=TLSv1.2 cipher=RC4-SHA bits=128/128); Wed, 30 Jul 2014 06:56:48 -0700 (PDT) In-Reply-To: <83a97rts25.fsf@gnu.org> (Eli Zaretskii's message of "Wed, 30 Jul 2014 06:59:46 +0300") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.4.50 (gnu/linux) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.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-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:91969 Archived-At: This should hopefully produce the backtrace --=20=20 I'll give two recipes below -- the first is impossible for me to try=20 1. emacs -q 2. load-library ruby-mode 3. evaluate this form: (defadvice backward-sexp (around test pre act comp) (when (called-interactively-p 'interactive) (message "advice!")) ad-do-it) 3. Open a ruby file test.rb 4. type=20 puts "foo" 5. Invoke electric-newline-and-indent -- to trigger the bug. Recipe 2: Do the same as above with emacspeak loaded -- and without bothering with the additional piece of advice. I'll attach the emacspeak generated backtrace below. Debugger entered--Lisp error: (quit) advice--called-interactively-skip(3 (t ad-Advice-backward-sexp #[256 "\21= 1\204=07\300\262\301[!\207" [1 forward-sexp] 3 2382034 "^p"] 1) (t apply ad= -Advice-backward-sexp #[256 "\211\204=07\300\262\301[!\207" [1 forward-sexp= ] 3 2382034 "^p"] 1)) run-hook-with-args-until-success(advice--called-interactively-skip 3 (t a= d-Advice-backward-sexp #[256 "\211\204=07\300\262\301[!\207" [1 forward-sex= p] 3 2382034 "^p"] 1) (t apply ad-Advice-backward-sexp #[256 "\211\204=07\3= 00\262\301[!\207" [1 forward-sexp] 3 2382034 "^p"] 1)) called-interactively-p(interactive) ad-Advice-backward-sexp(#[256 "\211\204=07\300\262\301[!\207" [1 forward-= sexp] 3 2382034 "^p"] 1) apply(ad-Advice-backward-sexp #[256 "\211\204=07\300\262\301[!\207" [1 fo= rward-sexp] 3 2382034 "^p"] 1) #[128 "\300\301\302#\207" [apply ad-Advice-backward-sexp #[256 "\211\204= =07\300\262\301[!\207" [1 forward-sexp] 3 2382034 "^p"] nil] 5 nil "^p"](1) #[0 "\300\301!\210\302\207" [#[128 "\300\301\302#\207" [apply ad-Advice-b= ackward-sexp #[256 "\211\204=07\300\262\301[!\207" [1 forward-sexp] 3 23820= 34 "^p"] nil] 5 nil "^p"] 1 nil] 2 "\n\n(fn)"]() funcall(#[0 "\300\301!\210\302\207" [#[128 "\300\301\302#\207" [apply ad-= Advice-backward-sexp #[256 "\211\204=07\300\262\301[!\207" [1 forward-sexp]= 3 2382034 "^p"] nil] 5 nil "^p"] 1 nil] 2 "\n\n(fn)"]) #[0 "\304\242;\205=00\306\304\242\"AC\304\307\240\210`\300 \306=0D\"A\211= \204X=01G\310U\203$\311\312\313\310\314\315\316\301!\317\"\320\321%D\322\31= 2\313\323\324\315\316=0B!\325\"\326\327%\311EDC\217\210`=3D\203$\330\331\33= 2`D\"\210\202$\303!\247\204t\302!\247\204l\333\334\335C\"\210\211B\262\202$= =03\203\212\303!\302@!W\203\212=03A\262\202t=03\204\266\304\242\203\242\302= !\247\203\242\211B\262\202$\330\331\302!\206\253\332`Eb\210\"\210\202$=03\2= 11\203\313\303!\302=06@!U\203\313=04A\262=04\203\336\302!\247\203#=01B\262\= 202#\302!\247\204\361\330\331\307`=06E\"\210\202#\336!\204\377=01B\262\202#= \211\203 \336@!\203 \330\331\302!\206=01\332`=06E=06b\210\"\210\202#\211\26= 2\210\266\203\2051\304\307\240\210\202=00\207" [#[nil "`\304`[!\210\305 V\= 203=00\306 \203=00\307\310w\210\311\202\364n\203-o\204-\312`\313\"b\210\311= \202\364`V\203An\204A\314!\203A\315\202\364\316 \317 =1A \203O\320\nP`Sf\= 321=3D\203e\322\323\n\"\203e\313u\210\324\nP\n\325\235\203x\326 \203t\n\202= \363\327\202\363\n\330\232\203\224\331 \203\207\332\202\363\333 \203\220\33= 4\202\363\n\202\363\335\n\310\336\322=03#)\266\203\203\256\337u\210\n\337\3= 10O\202\363\n\340\232\203\312`Sf\341=3D\203\312\342\343!\203\312\313u\210\3= 44 \202\363\n\345\232\203\362\346 \204\331\n\202\363\212\337v\210\304d!\210= `)\305 V\203\356\344 \202\363\311\202\363\n*)\207" [pos dot tok inhibit-cha= nging-match-data forward-comment line-end-position ruby-smie--implicit-semi= -p " " nil ";" scan-sexps -1 ruby-smie--args-separator-p " @ " smie-defaul= t-backward-token ruby-smie--at-dot-call "." 58 string-match "\\`\\s." ":" (= "unless" "if" "while" "until") ruby-smie--bosp "iuwu-mod" "|" ruby-smie--op= ening-pipe-p "opening-|" ruby-smie--closing-pipe-p "closing-|" "\\`|[*&]\\'= " t 1 "" 92 looking-at "\n" ruby-smie--backward-token "do" ruby-smie--redun= dant-do-p] 7] #[128 "\300\301\302#\207" [apply ad-Advice-backward-sexp #[25= 6 "\211\204=07\300\262\301[!\207" [1 forward-sexp] 3 2382034 "^p"] nil] 5 n= il "^p"] # #[257 "\211A@\207" [] 2 1633439] (nil) smie-grammar as= soc nil 0 err funcall make-byte-code "\300\301!\210\302\207" vconcat vector= [1 nil] 2 "\n\n(fn)" scan-error 257 "\3018`X\203=00\3028\202=00\211\300b\2= 10\303\304\305\306\211`W\203%\307\202&\310\\\"E\"\207" [2 3 throw return t= buffer-substring-no-properties -1 1] 12 "\n\n(fn ERR)" throw return t sign= al cl-assertion-failed (numberp (funcall op-forw toklevels)) smie--associat= ive-p] 14 "\n\n(fn)"]() funcall(#[0 "\304\242;\205=00\306\304\242\"AC\304\307\240\210`\300 \306= =0D\"A\211\204X=01G\310U\203$\311\312\313\310\314\315\316\301!\317\"\320\32= 1%D\322\312\313\323\324\315\316=0B!\325\"\326\327%\311EDC\217\210`=3D\203$\= 330\331\332`D\"\210\202$\303!\247\204t\302!\247\204l\333\334\335C\"\210\211= B\262\202$=03\203\212\303!\302@!W\203\212=03A\262\202t=03\204\266\304\242\2= 03\242\302!\247\203\242\211B\262\202$\330\331\302!\206\253\332`Eb\210\"\210= \202$=03\211\203\313\303!\302=06@!U\203\313=04A\262=04\203\336\302!\247\203= #=01B\262\202#\302!\247\204\361\330\331\307`=06E\"\210\202#\336!\204\377=01= B\262\202#\211\203 \336@!\203 \330\331\302!\206=01\332`=06E=06b\210\"\210\2= 02#\211\262\210\266\203\2051\304\307\240\210\202=00\207" [#[nil "`\304`[!\2= 10\305 V\203=00\306 \203=00\307\310w\210\311\202\364n\203-o\204-\312`\313\= "b\210\311\202\364`V\203An\204A\314!\203A\315\202\364\316 \317 =1A \203O\= 320\nP`Sf\321=3D\203e\322\323\n\"\203e\313u\210\324\nP\n\325\235\203x\326 \= 203t\n\202\363\327\202\363\n\330\232\203\224\331 \203\207\332\202\363\333 \= 203\220\334\202\363\n\202\363\335\n\310\336\322=03#)\266\203\203\256\337u\2= 10\n\337\310O\202\363\n\340\232\203\312`Sf\341=3D\203\312\342\343!\203\312\= 313u\210\344 \202\363\n\345\232\203\362\346 \204\331\n\202\363\212\337v\210= \304d!\210`)\305 V\203\356\344 \202\363\311\202\363\n*)\207" [pos dot tok i= nhibit-changing-match-data forward-comment line-end-position ruby-smie--imp= licit-semi-p " " nil ";" scan-sexps -1 ruby-smie--args-separator-p " @ " s= mie-default-backward-token ruby-smie--at-dot-call "." 58 string-match "\\`\= \s." ":" ("unless" "if" "while" "until") ruby-smie--bosp "iuwu-mod" "|" rub= y-smie--opening-pipe-p "opening-|" ruby-smie--closing-pipe-p "closing-|" "\= \`|[*&]\\'" t 1 "" 92 looking-at "\n" ruby-smie--backward-token "do" ruby-s= mie--redundant-do-p] 7] #[128 "\300\301\302#\207" [apply ad-Advice-backward= -sexp #[256 "\211\204=07\300\262\301[!\207" [1 forward-sexp] 3 2382034 "^p"= ] nil] 5 nil "^p"] # #[257 "\211A@\207" [] 2 1633439] (nil) smie-= grammar assoc nil 0 err funcall make-byte-code "\300\301!\210\302\207" vcon= cat vector [1 nil] 2 "\n\n(fn)" scan-error 257 "\3018`X\203=00\3028\202=00\= 211\300b\210\303\304\305\306\211`W\203%\307\202&\310\\\"E\"\207" [2 3 thro= w return t buffer-substring-no-properties -1 1] 12 "\n\n(fn ERR)" throw ret= urn t signal cl-assertion-failed (numberp (funcall op-forw toklevels)) smie= --associative-p] 14 "\n\n(fn)"]) smie-next-sexp(#[nil "`\304`[!\210\305 V\203=00\306 \203=00\307\310w\210= \311\202\364n\203-o\204-\312`\313\"b\210\311\202\364`V\203An\204A\314!\20= 3A\315\202\364\316 \317 =1A \203O\320\nP`Sf\321=3D\203e\322\323\n\"\203e\31= 3u\210\324\nP\n\325\235\203x\326 \203t\n\202\363\327\202\363\n\330\232\203\= 224\331 \203\207\332\202\363\333 \203\220\334\202\363\n\202\363\335\n\310\3= 36\322=03#)\266\203\203\256\337u\210\n\337\310O\202\363\n\340\232\203\312`S= f\341=3D\203\312\342\343!\203\312\313u\210\344 \202\363\n\345\232\203\362\3= 46 \204\331\n\202\363\212\337v\210\304d!\210`)\305 V\203\356\344 \202\363\3= 11\202\363\n*)\207" [pos dot tok inhibit-changing-match-data forward-commen= t line-end-position ruby-smie--implicit-semi-p " " nil ";" scan-sexps -1 r= uby-smie--args-separator-p " @ " smie-default-backward-token ruby-smie--at-= dot-call "." 58 string-match "\\`\\s." ":" ("unless" "if" "while" "until") = ruby-smie--bosp "iuwu-mod" "|" ruby-smie--opening-pipe-p "opening-|" ruby-s= mie--closing-pipe-p "closing-|" "\\`|[*&]\\'" t 1 "" 92 looking-at "\n" rub= y-smie--backward-token "do" ruby-smie--redundant-do-p] 7] #[128 "\300\301\3= 02#\207" [apply ad-Advice-backward-sexp #[256 "\211\204=07\300\262\301[!\20= 7" [1 forward-sexp] 3 2382034 "^p"] nil] 5 nil "^p"] # #[257 "\21= 1A@\207" [] 2 1633439] ";") smie-backward-sexp(";") smie-indent-keyword() run-hook-with-args-until-success(smie-indent-keyword) smie-indent-calculate() smie-indent-virtual() smie-indent-after-keyword() run-hook-with-args-until-success(smie-indent-after-keyword) smie-indent-calculate() #[0 "\212\301y\210\302\303w\210`\300\242Y\203=00\300\303\240\210\304 \206= =00\301)\207" [(nil) 0 " " nil smie-indent-calculate] 2 "\n\n(fn)"]() funcall(#[0 "\212\301y\210\302\303w\210`\300\242Y\203=00\300\303\240\210\= 304 \206=00\301)\207" [(nil) 0 " " nil smie-indent-calculate] 2 "\n\n(fn)"= ]) smie-indent-line() indent-according-to-mode() #[0 "\300\301!\210\302\303\301\"\210\304 \207" [delete-horizontal-space t= newline nil indent-according-to-mode] 3 1970172 "*"]() ad-Advice-newline-and-indent(#[0 "\300\301!\210\302\303\301\"\210\304 \20= 7" [delete-horizontal-space t newline nil indent-according-to-mode] 3 19701= 72 "*"]) apply(ad-Advice-newline-and-indent #[0 "\300\301!\210\302\303\301\"\210\3= 04 \207" [delete-horizontal-space t newline nil indent-according-to-mode] 3= 1970172 "*"] nil) newline-and-indent() electric-newline-and-maybe-indent() funcall-interactively(electric-newline-and-maybe-indent) call-interactively(electric-newline-and-maybe-indent nil nil) command-execute(electric-newline-and-maybe-indent) =20=20=20=20=20=20