xref: /openbsd/gnu/gcc/gcc/config/i386/nwld.c (revision 404b540a)
1 /* Subroutines for insn-output.c for NetWare.
2    Contributed by Jan Beulich (jbeulich@novell.com)
3    Copyright (C) 2004 Free Software Foundation, Inc.
4 
5 This file is part of GCC.
6 
7 GCC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
11 
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
16 
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING.  If not, write to
19 the Free Software Foundation, 51 Franklin Street, Fifth Floor,
20 Boston, MA 02110-1301, USA.  */
21 
22 #include "config.h"
23 #include "system.h"
24 #include "coretypes.h"
25 #include "tm.h"
26 #include "rtl.h"
27 #include "regs.h"
28 #include "hard-reg-set.h"
29 #include "output.h"
30 #include "tree.h"
31 #include "flags.h"
32 #include "tm_p.h"
33 #include "toplev.h"
34 
35 void
nwld_named_section_asm_out_constructor(rtx symbol,int priority)36 nwld_named_section_asm_out_constructor (rtx symbol, int priority)
37 {
38 #if !SUPPORTS_INIT_PRIORITY
39   const char section[] = ".ctors"TARGET_SUB_SECTION_SEPARATOR;
40 #else
41   char section[20];
42 
43   sprintf (section,
44 	   ".ctors"TARGET_SUB_SECTION_SEPARATOR"%.5u",
45 	   /* Invert the numbering so the linker puts us in the proper
46 	      order; constructors are run from right to left, and the
47 	      linker sorts in increasing order.  */
48 	   MAX_INIT_PRIORITY - priority);
49 #endif
50 
51   switch_to_section (get_section (section, 0, NULL));
52   assemble_align (POINTER_SIZE);
53   assemble_integer (symbol, POINTER_SIZE / BITS_PER_UNIT, POINTER_SIZE, 1);
54 }
55 
56 void
nwld_named_section_asm_out_destructor(rtx symbol,int priority)57 nwld_named_section_asm_out_destructor (rtx symbol, int priority)
58 {
59 #if !SUPPORTS_INIT_PRIORITY
60   const char section[] = ".dtors"TARGET_SUB_SECTION_SEPARATOR;
61 #else
62   char section[20];
63 
64   sprintf (section, ".dtors"TARGET_SUB_SECTION_SEPARATOR"%.5u",
65 	   /* Invert the numbering so the linker puts us in the proper
66 	      order; destructors are run from left to right, and the
67 	      linker sorts in increasing order.  */
68 	   MAX_INIT_PRIORITY - priority);
69 #endif
70 
71   switch_to_section (get_section (section, 0, NULL));
72   assemble_align (POINTER_SIZE);
73   assemble_integer (symbol, POINTER_SIZE / BITS_PER_UNIT, POINTER_SIZE, 1);
74 }
75