From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 30811 invoked by alias); 6 May 2011 14:11:19 -0000 Received: (qmail 30803 invoked by uid 22791); 6 May 2011 14:11:18 -0000 X-SWARE-Spam-Status: No, hits=-1.8 required=5.0 tests=AWL,BAYES_00 X-Spam-Check-By: sourceware.org Received: from mel.act-europe.fr (HELO mel.act-europe.fr) (194.98.77.210) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Fri, 06 May 2011 14:11:03 +0000 Received: from localhost (localhost [127.0.0.1]) by filtered-smtp.eu.adacore.com (Postfix) with ESMTP id A959ACB0243 for ; Fri, 6 May 2011 16:11:02 +0200 (CEST) Received: from mel.act-europe.fr ([127.0.0.1]) by localhost (smtp.eu.adacore.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id hyWWfoumDRhy for ; Fri, 6 May 2011 16:10:59 +0200 (CEST) Received: from ulanbator.act-europe.fr (ulanbator.act-europe.fr [10.10.1.67]) (using TLSv1 with cipher AES128-SHA (128/128 bits)) (No client certificate requested) by mel.act-europe.fr (Postfix) with ESMTP id A9641CB01EA for ; Fri, 6 May 2011 16:10:59 +0200 (CEST) From: Tristan Gingold Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Subject: [Patch]: Remove dead-code in gas for vax-vms Date: Fri, 06 May 2011 14:11:00 -0000 Message-Id: <94AAC5F0-E337-4A67-B5FE-34EBFDFF4101@adacore.com> To: binutils Development Mime-Version: 1.0 (Apple Message framework v1084) X-IsSubscribed: yes Mailing-List: contact binutils-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: binutils-owner@sourceware.org X-SW-Source: 2011-05/txt/msg00081.txt.bz2 Hi, there is some code between #ifdef OBJ_VMS/#endif in common gas code that ma= y have been used for vax-vms. But this platform is unsupported, so we may clean that up. Ok for trunk ? Tristan. gas/ 2011-05-06 Tristan Gingold * read.c (s_comm_internal): Remove code for OBJ_VMS. (s_data): Ditto. (s_text): Ditto. * write.c (write_object_file): Ditto. * symbols.c (define_sym_at_dot): Ditto. (colon): Ditto. diff --git a/gas/read.c b/gas/read.c index 5cca366..3a1805f 100644 --- a/gas/read.c +++ b/gas/read.c @@ -1508,13 +1508,6 @@ s_comm_internal (int param, S_SET_VALUE (symbolP, (valueT) size); S_SET_EXTERNAL (symbolP); S_SET_SEGMENT (symbolP, bfd_com_section_ptr); -#ifdef OBJ_VMS - { - extern int flag_one; - if (size =3D=3D 0 || !flag_one) - S_GET_OTHER (symbolP) =3D const_flag; - } -#endif } =20 demand_empty_rest_of_line (); @@ -1653,9 +1646,6 @@ s_data (int ignore ATTRIBUTE_UNUSED) =20 subseg_set (section, (subsegT) temp); =20 -#ifdef OBJ_VMS - const_flag =3D 0; -#endif demand_empty_rest_of_line (); } =20 @@ -3463,9 +3453,6 @@ s_text (int ignore ATTRIBUTE_UNUSED) temp =3D get_absolute_expression (); subseg_set (text_section, (subsegT) temp); demand_empty_rest_of_line (); -#ifdef OBJ_VMS - const_flag &=3D ~IN_DEFAULT_SECTION; -#endif } =20 /* .weakref x, y sets x as an alias to y that, as long as y is not diff --git a/gas/symbols.c b/gas/symbols.c index 91d0cdb..7dc9812 100644 --- a/gas/symbols.c +++ b/gas/symbols.c @@ -250,9 +250,6 @@ static void define_sym_at_dot (symbolS *symbolP) { symbolP->sy_frag =3D frag_now; -#ifdef OBJ_VMS - S_SET_OTHER (symbolP, const_flag); -#endif S_SET_VALUE (symbolP, (valueT) frag_now_fix ()); S_SET_SEGMENT (symbolP, now_seg); } @@ -447,9 +444,6 @@ colon (/* Just seen "x:" - rattle symbols & frags. */ { symbolP =3D symbol_new (sym_name, now_seg, (valueT) frag_now_fix (), frag_now); -#ifdef OBJ_VMS - S_SET_OTHER (symbolP, const_flag); -#endif /* OBJ_VMS */ =20 symbol_table_insert (symbolP); } diff --git a/gas/write.c b/gas/write.c index a5d2b4d..1bd1a62 100644 --- a/gas/write.c +++ b/gas/write.c @@ -1734,13 +1734,6 @@ write_object_file (void) } } =20 -#ifdef OBJ_VMS - /* Under VMS we try to be compatible with VAX-11 "C". Thus, we call - a routine to check for the definition of the procedure "_main", - and if so -- fix it up so that it can be program entry point. */ - vms_check_for_main (); -#endif /* OBJ_VMS */ - /* From now on, we don't care about sub-segments. Build one frag chain for each segment. Linked thru fr_next. */