From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail From: =?utf-8?Q?Mattias_Engdeg=C3=A5rd?= Newsgroups: gmane.emacs.devel Subject: Re: Parsing beyond sexps Date: Sun, 19 Jan 2020 10:46:18 +0100 Message-ID: <6E24B253-0F38-468D-80D4-A4D78D96B89B@acm.org> References: <87wo9nn9vd.fsf@cassou.me> Mime-Version: 1.0 (Mac OS X Mail 12.4 \(3445.104.11\)) Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202"; logging-data="130062"; mail-complaints-to="usenet@ciao.gmane.io" Cc: emacs-devel@gnu.org To: Damien Cassou Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Sun Jan 19 11:41:00 2020 Return-path: Envelope-to: ged-emacs-devel@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 1it80p-000XoF-QU for ged-emacs-devel@m.gmane-mx.org; Sun, 19 Jan 2020 11:40:59 +0100 Original-Received: from localhost ([::1]:49104 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1it80o-0007Qo-T6 for ged-emacs-devel@m.gmane-mx.org; Sun, 19 Jan 2020 05:40:58 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:51062) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1it80B-0006ub-5a for emacs-devel@gnu.org; Sun, 19 Jan 2020 05:40:20 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1it808-0006pH-TP for emacs-devel@gnu.org; Sun, 19 Jan 2020 05:40:18 -0500 Original-Received: from mail1459c50.megamailservers.eu ([91.136.14.59]:40498 helo=mail267c50.megamailservers.eu) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1it808-0006m8-Bh for emacs-devel@gnu.org; Sun, 19 Jan 2020 05:40:16 -0500 X-Authenticated-User: mattiase@bredband.net DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=megamailservers.eu; s=maildub; t=1579427181; bh=nCHHleSb/wY+fhvVp4GKNGnld6J//xEfwuMT+rkyQEs=; h=Subject:From:In-Reply-To:Date:Cc:References:To:From; b=IPu/gKqGh6tyAKIzlLNyJ1qzkE50ar60pyLYGtNcffnQBdVCfTziThNPUikZ5TcD0 cWMPhr2TLl1v3fY/lgpvLp38sUn2QOgQt7xg821YWCcxgg7M3J3/7FezAkdUOno9AK +dx9sbWUPLZv/07VcqR9ISM1mubY+Uaei6zdjikU= Feedback-ID: mattiase@acm.or Original-Received: from stanniol.lan (c-6f4fe655.032-75-73746f71.bbcust.telenor.se [85.230.79.111]) (authenticated bits=0) by mail267c50.megamailservers.eu (8.14.9/8.13.1) with ESMTP id 00J9kIwG016248; Sun, 19 Jan 2020 09:46:20 +0000 In-Reply-To: <87wo9nn9vd.fsf@cassou.me> X-Mailer: Apple Mail (2.3445.104.11) X-CTCH-RefID: str=0001.0A0B0213.5E24256D.0018, ss=1, re=0.000, recu=0.000, reip=0.000, cl=1, cld=1, fgs=0 X-CTCH-VOD: Unknown X-CTCH-Spam: Unknown X-CTCH-Score: 0.000 X-CTCH-Flags: 0 X-CTCH-ScoreCust: 0.000 X-CSC: 0 X-CHA: v=2.3 cv=OY7m8SbY c=1 sm=1 tr=0 a=fHaj9vQUQVKQ4sUldAaXuQ==:117 a=fHaj9vQUQVKQ4sUldAaXuQ==:17 a=jpOVt7BSZ2e4Z31A5e1TngXxSK0=:19 a=kj9zAlcOel0A:10 a=M51BFTxLslgA:10 a=sNqZOQgZ0mTuraZ3hgYA:9 a=CjuIK1q_8ugA:10 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x (no timestamps) [generic] [fuzzy] X-Received-From: 91.136.14.59 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.io gmane.emacs.devel:244366 Archived-At: 19 jan. 2020 kl. 09.11 skrev Damien Cassou : > This is not enough though as I want comments and line/column positions > in the yielded values. Is there anything I could use from Emacs core > that would make my life easier? Nothing in Emacs core that I know of, but you could have a look at how = the 'relint' package does it: keep track of the position before each = top-level form, and then maintain a path of list indices taken as it = descends into each form. Example: (defun select-weapon (opponent) "A Matter of Life and Death." (if (fencing-master-p opponent) 'duelling-pistols 'rapier)) The path to duelling-pistols would be (1 2 4), since it is built up = backwards as a stack during descent: first take element 4 of the = top-level form to the 'if'-expression, then element 2 of that form to = the (quote duelling-pistols), and finally element 1 to get past the = quote. Maintaining the path during traversal turns out to be fairly = cheap. The tuple can then be transformed into (or just a buffer position) when required for diagnostics; see = 'relint--pos-line-col-from-toplevel-pos-path'. It's somewhat slow but = not time-critical.