From unknown Mon Jun 16 23:48:12 2025 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.509 (Entity 5.509) Content-Type: text/plain; charset=utf-8 From: bug#24320 <24320@debbugs.gnu.org> To: bug#24320 <24320@debbugs.gnu.org> Subject: Status: Error when printing foreign functions Reply-To: bug#24320 <24320@debbugs.gnu.org> Date: Tue, 17 Jun 2025 06:48:12 +0000 retitle 24320 Error when printing foreign functions reassign 24320 guile submitter 24320 Robin Templeton severity 24320 normal thanks From debbugs-submit-bounces@debbugs.gnu.org Sat Aug 27 15:00:26 2016 Received: (at submit) by debbugs.gnu.org; 27 Aug 2016 19:00:26 +0000 Received: from localhost ([127.0.0.1]:42206 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bdiqA-0007Yk-3E for submit@debbugs.gnu.org; Sat, 27 Aug 2016 15:00:26 -0400 Received: from eggs.gnu.org ([208.118.235.92]:58522) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bdiq9-0007YX-0q for submit@debbugs.gnu.org; Sat, 27 Aug 2016 15:00:25 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bdiq3-00064P-1M for submit@debbugs.gnu.org; Sat, 27 Aug 2016 15:00:19 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-0.0 required=5.0 tests=BAYES_20 autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:51109) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bdiq2-00064L-UU for submit@debbugs.gnu.org; Sat, 27 Aug 2016 15:00:18 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:49493) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bdiq0-0006b4-Ri for bug-guile@gnu.org; Sat, 27 Aug 2016 15:00:17 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bdipv-00063L-UU for bug-guile@gnu.org; Sat, 27 Aug 2016 15:00:16 -0400 Received: from [195.159.176.226] (port=38181 helo=blaine.gmane.org) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bdipv-000611-NI for bug-guile@gnu.org; Sat, 27 Aug 2016 15:00:11 -0400 Received: from list by blaine.gmane.org with local (Exim 4.84_2) (envelope-from ) id 1bdipo-0003fR-GT for bug-guile@gnu.org; Sat, 27 Aug 2016 21:00:04 +0200 X-Injected-Via-Gmane: http://gmane.org/ To: bug-guile@gnu.org From: Robin Templeton Subject: Error when printing foreign functions Date: Sat, 27 Aug 2016 14:05:25 -0400 Lines: 40 Message-ID: <871t1auly2.fsf@panthera.terpri.org> Mime-Version: 1.0 Content-Type: text/plain X-Complaints-To: usenet@blaine.gmane.org User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) Cancel-Lock: sha1:YnyGOZt3F0QzclfWyrcsucUKhbk= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -5.0 (-----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -5.0 (-----) The following program causes `(@ (system vm program) print-program)' to throw an exception when run in Guile 2.1.3.104-8f2f8: (use-modules (system foreign)) (format #t "~S~%" (pointer->procedure double (dynamic-func "sqrt" (dynamic-link)) (list double))) print-program tries to access fields of the procedure's debug info record even if find-program-debug-info fails and returns #f. The following patch fixes the problem. >From 0ec7bff9e71f1c1c46fa3c1d2bdbc43f5db3588c Mon Sep 17 00:00:00 2001 From: Robin Templeton Date: Sat, 27 Aug 2016 13:42:10 -0400 Subject: [PATCH] Check for missing debug info in print-program * module/system/vm/program.scm (print-program): Check the return value of find-program-debug-info. --- module/system/vm/program.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/system/vm/program.scm b/module/system/vm/program.scm index 9f5b764..32c96f2 100644 --- a/module/system/vm/program.scm +++ b/module/system/vm/program.scm @@ -265,7 +265,7 @@ lists." ;; It could be the procedure had its name property set via the ;; procedure property interface. (name (or (and program (procedure-name program)) - (program-debug-info-name pdi))) + (and pdi (program-debug-info-name pdi)))) (source (match (find-program-sources addr) (() #f) ((source . _) source))) -- 2.9.3 From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 02 04:08:32 2016 Received: (at 24320) by debbugs.gnu.org; 2 Sep 2016 08:08:32 +0000 Received: from localhost ([127.0.0.1]:46941 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfjWW-0006uV-A0 for submit@debbugs.gnu.org; Fri, 02 Sep 2016 04:08:32 -0400 Received: from pb-sasl1.pobox.com ([64.147.108.66]:59578 helo=sasl.smtp.pobox.com) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfjWT-0006uM-S3 for 24320@debbugs.gnu.org; Fri, 02 Sep 2016 04:08:26 -0400 Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id A117737D4E; Fri, 2 Sep 2016 04:08:25 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; s=sasl; bh=xTpz6eeJOwnNLEIoH5eedVM8pJ4=; b=vw98RM d6MB40gtDH2fL9DbtIGimYXg84sTY5M73kDBG/HUnhHn2odcTVKmz5zloWYqTM2C AEJZj20iGV8FXeqDmLSQdRIvd+6sA24exhsCZeI+rI5FgTlyWyW5t+MEvV5TsyOS 60yCHfZ/WVU3AKNn8o7ZwYdBjT1oS4/qm6Wqo= DomainKey-Signature: a=rsa-sha1; c=nofws; d=pobox.com; h=from:to:cc :subject:references:date:in-reply-to:message-id:mime-version :content-type; q=dns; s=sasl; b=OrMoYQgi5AmW/gRb2Gk0FBAzA2vRfm1C XIhHHJ70cXS0oQXzzOXD51S2QoeHvhmmkfxWGnAP7p6AsVznFvCSIY5RI7+hFd49 Gwd0MTLv5aup2qP5hAVy5zi925659NjudkWPpSrp+jRHPgI1gFX3q+kIpj6KVIOO TaiBVjJMw1c= Received: from pb-sasl1.nyi.icgroup.com (unknown [127.0.0.1]) by pb-sasl1.pobox.com (Postfix) with ESMTP id 83C8137D4C; Fri, 2 Sep 2016 04:08:25 -0400 (EDT) Received: from clucks (unknown [88.160.190.192]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by pb-sasl1.pobox.com (Postfix) with ESMTPSA id A05B037D4A; Fri, 2 Sep 2016 04:08:24 -0400 (EDT) From: Andy Wingo To: Robin Templeton Subject: Re: bug#24320: Error when printing foreign functions References: <871t1auly2.fsf@panthera.terpri.org> Date: Fri, 02 Sep 2016 10:08:17 +0200 In-Reply-To: <871t1auly2.fsf@panthera.terpri.org> (Robin Templeton's message of "Sat, 27 Aug 2016 14:05:25 -0400") Message-ID: <87shtiiv0u.fsf@pobox.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Pobox-Relay-ID: 6C0A7040-70E4-11E6-922D-CE686462E9F6-02397024!pb-sasl1.pobox.com X-Spam-Score: -1.5 (-) X-Debbugs-Envelope-To: 24320 Cc: 24320@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.5 (-) On Sat 27 Aug 2016 20:05, Robin Templeton writes: > The following program causes `(@ (system vm program) print-program)' to > throw an exception when run in Guile 2.1.3.104-8f2f8: LGTM, please apply! I think you have the permissions to push to master; let me know if that's not the case. Andy From debbugs-submit-bounces@debbugs.gnu.org Fri Sep 02 21:38:16 2016 Received: (at 24320-done) by debbugs.gnu.org; 3 Sep 2016 01:38:16 +0000 Received: from localhost ([127.0.0.1]:48150 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfzuS-0000kj-DL for submit@debbugs.gnu.org; Fri, 02 Sep 2016 21:38:16 -0400 Received: from mccarthy.hcoop.net ([69.90.123.73]:60183) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bfzuR-0000kV-8H for 24320-done@debbugs.gnu.org; Fri, 02 Sep 2016 21:38:15 -0400 Received: from cpe-98-27-57-28.nc.res.rr.com ([98.27.57.28] helo=panthera.terpri.org) by mccarthy.hcoop.net with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84) (envelope-from ) id 1bfzuJ-0005b2-3s; Fri, 02 Sep 2016 21:38:07 -0400 From: Robin Templeton To: Andy Wingo Subject: Re: bug#24320: Error when printing foreign functions References: <871t1auly2.fsf@panthera.terpri.org> <87shtiiv0u.fsf@pobox.com> Date: Fri, 02 Sep 2016 21:38:06 -0400 In-Reply-To: <87shtiiv0u.fsf@pobox.com> (Andy Wingo's message of "Fri, 02 Sep 2016 10:08:17 +0200") Message-ID: <87inudn4ox.fsf@panthera.terpri.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: 24320-done Cc: 24320-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: 0.0 (/) Andy Wingo writes: > On Sat 27 Aug 2016 20:05, Robin Templeton writes: > >> The following program causes `(@ (system vm program) print-program)' to >> throw an exception when run in Guile 2.1.3.104-8f2f8: > > LGTM, please apply! Thanks, now fixed in master -- Inteligenta persono lernas la lingvon Esperanton rapide kaj facile. Esperanto estas moderna, kultura lingvo por la mondo. Simpla, fleksebla, belsona, Esperanto estas la praktika solvo de la problemo de universala interkompreno. Lernu la interlingvon Esperanton! From unknown Mon Jun 16 23:48:12 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Sat, 01 Oct 2016 11:24:03 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator