From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 27551 invoked by alias); 9 Apr 2014 16:09:49 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Received: (qmail 27491 invoked by uid 89); 9 Apr 2014 16:09:49 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-0.5 required=5.0 tests=AWL,BAYES_00,RCVD_IN_DNSWL_NONE,SPF_NEUTRAL autolearn=no version=3.3.2 X-HELO: sasl.smtp.pobox.com Received: from a-pb-sasl-quonix.pobox.com (HELO sasl.smtp.pobox.com) (208.72.237.25) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Wed, 09 Apr 2014 16:09:48 +0000 Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by a-pb-sasl-quonix.pobox.com (Postfix) with ESMTP id E4CC910FD9; Wed, 9 Apr 2014 12:09:46 -0400 (EDT) Received: from a-pb-sasl-quonix.pobox.com (unknown [127.0.0.1]) by a-pb-sasl-quonix.pobox.com (Postfix) with ESMTP id DDAFC10FD8; Wed, 9 Apr 2014 12:09:46 -0400 (EDT) Received: from localhost.localdomain (unknown [88.160.190.192]) (using TLSv1 with cipher AES128-SHA (128/128 bits)) (No client certificate requested) by a-pb-sasl-quonix.pobox.com (Postfix) with ESMTPSA id 7A44110FD5; Wed, 9 Apr 2014 12:09:44 -0400 (EDT) From: Andy Wingo To: gdb-patches@sourceware.org Cc: Andy Wingo Subject: [PATCH 8/8] Remove a useless Guile finalizer Date: Wed, 09 Apr 2014 16:09:00 -0000 Message-Id: <1397059725-18066-15-git-send-email-wingo@igalia.com> In-Reply-To: <1397059725-18066-1-git-send-email-wingo@igalia.com> References: <1397059725-18066-1-git-send-email-wingo@igalia.com> X-Pobox-Relay-ID: 5E1815D2-C001-11E3-9BA4-873F0E5B5709-02397024!a-pb-sasl-quonix.pobox.com X-SW-Source: 2014-04/txt/msg00130.txt.bz2 * gdb/guile/scm-symtab.c (stscm_free_sal_smob): Remove useless free function. (This was the only useless free function.) --- gdb/guile/scm-symtab.c | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/gdb/guile/scm-symtab.c b/gdb/guile/scm-symtab.c index 8910973..876bf64 100644 --- a/gdb/guile/scm-symtab.c +++ b/gdb/guile/scm-symtab.c @@ -386,19 +386,6 @@ gdbscm_symtab_static_block (SCM self) /* Administrivia for sal (symtab-and-line) smobs. */ -/* The smob "free" function for . */ - -static size_t -stscm_free_sal_smob (SCM self) -{ - sal_smob *s_smob = (sal_smob *) SCM_SMOB_DATA (self); - - /* Not necessary, done to catch bugs. */ - s_smob->symtab_scm = SCM_UNDEFINED; - - return 0; -} - /* The smob "print" function for . */ static int @@ -692,7 +679,6 @@ gdbscm_initialize_symtabs (void) scm_set_smob_print (symtab_smob_tag, stscm_print_symtab_smob); sal_smob_tag = gdbscm_make_smob_type (sal_smob_name, sizeof (sal_smob)); - scm_set_smob_free (sal_smob_tag, stscm_free_sal_smob); scm_set_smob_print (sal_smob_tag, stscm_print_sal_smob); gdbscm_define_functions (symtab_functions, 1); -- 1.9.1