From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Mike Gran Newsgroups: gmane.lisp.guile.bugs Subject: [bug #31234] [1.9.12] errors in macroexpand don't give line numbers of source Date: Sun, 03 Oct 2010 18:08:47 +0000 Message-ID: <20101003-180846.sv73118.60397@savannah.gnu.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain;charset=UTF-8 X-Trace: dough.gmane.org 1286129342 24458 80.91.229.12 (3 Oct 2010 18:09:02 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sun, 3 Oct 2010 18:09:02 +0000 (UTC) To: Mike Gran , bug-guile@gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Sun Oct 03 20:08:59 2010 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1P2Sza-0005gI-0Y for guile-bugs@m.gmane.org; Sun, 03 Oct 2010 20:08:58 +0200 Original-Received: from localhost ([127.0.0.1]:50847 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1P2SzZ-00045e-5p for guile-bugs@m.gmane.org; Sun, 03 Oct 2010 14:08:57 -0400 Original-Received: from [140.186.70.92] (port=50782 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1P2SzR-00045Y-Kw for bug-guile@gnu.org; Sun, 03 Oct 2010 14:08:50 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1P2SzQ-0003yT-21 for bug-guile@gnu.org; Sun, 03 Oct 2010 14:08:49 -0400 Original-Received: from colonialone.fsf.org ([140.186.70.51]:59441 helo=internal.in.savannah.gnu.org) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1P2SzQ-0003yH-0A for bug-guile@gnu.org; Sun, 03 Oct 2010 14:08:48 -0400 Original-Received: from [10.1.0.103] (helo=frontend.in.savannah.gnu.org) by internal.in.savannah.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1P2SzP-0001xE-Pt; Sun, 03 Oct 2010 18:08:47 +0000 Original-Received: from www-data by frontend.in.savannah.gnu.org with local (Exim 4.69) (envelope-from ) id 1P2SzP-0006PR-Ko; Sun, 03 Oct 2010 18:08:47 +0000 X-Savane-Server: savannah.gnu.org:443 [10.1.0.103] X-Savane-Project: guile X-Savane-Tracker: bugs X-Savane-Item-ID: 31234 User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.2.10) Gecko/20100920 Fedora/3.6.10-1.fc13 Firefox/3.6.10 X-Apparently-From: 71.140.100.140 (Savane authenticated user mike121) Original-References: In-Reply-To: X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-BeenThere: bug-guile@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.bugs:4823 Archived-At: URL: Summary: [1.9.12] errors in macroexpand don't give line numbers of source Project: Guile Submitted by: mike121 Submitted on: Sun 03 Oct 2010 06:08:46 PM GMT Category: None Severity: 3 - Normal Item Group: None Status: None Privacy: Public Assigned to: None Open/Closed: Open Discussion Lock: Any _______________________________________________________ Details: Hi- Sometimes syntax errors in the macro expander don't give enough info to locate the error. If I create a file that contains (define (func) (let ((val #t)) (if val 0 1 2))) I load the file, Guile reports the syntax error, but, it doesn't give a line number. Obviously I could find the error in this trivial example, but, it longer source code files, it would be nice to know the line number. Below is the non-autocompiled outputs. The autocompiled output is similar. $ GUILE_AUTO_COMPILE=0 guile --debug -s tmp.scm Backtrace: In ice-9/boot-9.scm: 170: 19 [catch #t # ...] In unknown file: ?: 18 [catch-closure] In ice-9/boot-9.scm: 62: 17 [call-with-prompt prompt0 ...] In ice-9/eval.scm: 389: 16 [eval # #] In ice-9/boot-9.scm: 1844: 15 [save-module-excursion #] 1153: 14 [load "tmp.scm" #f] 1051: 13 [%start-stack load-stack ...] 1056: 12 [#] In unknown file: ?: 11 [primitive-load "tmp.scm"] In ice-9/eval.scm: 458: 10 [# (define # #)] In ice-9/psyntax.scm: 1147: 9 [chi-top (define (func) (let (#) (if val 0 ...))) () ...] 1504: 8 [chi-simple-lambda (# . #) () (()) ...] 1394: 7 [parse (((#) . #(syntax-object # # #))) () () () () () ()] In unknown file: ?: 6 [map # ((# . #))] In ice-9/psyntax.scm: 2008: 5 [chi-let (let ((val #t)) (if val 0 ...)) (("placeholder" placeholder)) ...] 1394: 4 [parse (((# # #) . #(syntax-object # # #))) () () () () () ()] In unknown file: ?: 3 [map # ((# . #))] ?: 2 [scm-error syntax-error macroexpand ...] In ice-9/boot-9.scm: 115: 1 [# syntax-error ...] In unknown file: ?: 0 [catch-closure syntax-error macroexpand ...] ERROR: In procedure macroexpand: ERROR: source expression failed to match any pattern in (if val 0 1 2) _______________________________________________________ Reply to this item at: _______________________________________________ Message sent via/by Savannah http://savannah.gnu.org/