1 /* OSF/rose half-pic support definitions.
2 Copyright (C) 1992, 1996, 1997 Free Software Foundation, Inc.
4 This file is part of GNU CC.
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING. If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
23 #include "gansidecl.h"
25 #if defined (USE_PROTOTYPES) ? USE_PROTOTYPES : defined (__STDC__)
26 union tree_node
; /* forward reference */
30 /* Declare the variable flag_half_pic as 'int' instead of 'extern
31 int', so that BSS variables are created (even though this is not
32 strict ANSI). This is because rtl.c now refers to the
33 CONSTANT_ADDRESS_P macro, which in turn refers to flag_half_pic,
34 and wants to call half_pic_address_p, whose address we also store
35 in a BSS variable. This way, the gen* programs won't get
36 unknown symbol errors when being linked (flag_half_pic will never
37 be true in the gen* programs). */
39 int flag_half_pic
; /* Global half-pic flag. */
40 int (*ptr_half_pic_address_p
) (); /* ptr to half_pic_address_p () */
42 extern int half_pic_number_ptrs
; /* # distinct pointers found */
43 extern int half_pic_number_refs
; /* # half-pic references */
44 extern void half_pic_encode
PROTO((union tree_node
*)); /* encode whether half-pic */
45 extern void half_pic_declare
PROTO((char *)); /* declare object local */
46 extern void half_pic_external
PROTO((char *)); /* declare object external */
47 extern void half_pic_init
PROTO((void)); /* half_pic initialization */
48 extern int half_pic_address_p
PROTO((struct rtx_def
*)); /* true if an address is half-pic */
49 extern struct rtx_def
*half_pic_ptr
PROTO((struct rtx_def
*)); /* return RTX for half-pic pointer */
50 /* Can't use prototype since FILE isn't defined yet. */
51 extern void half_pic_finish (/* FILE * */); /* half_pic termination */
53 /* Macros to provide access to the half-pic stuff (so they can easily
56 #define HALF_PIC_P() (flag_half_pic)
57 #define HALF_PIC_NUMBER_PTRS (half_pic_number_ptrs)
58 #define HALF_PIC_NUMBER_REFS (half_pic_number_refs)
60 #define HALF_PIC_ENCODE(DECL) half_pic_encode (DECL)
61 #define HALF_PIC_DECLARE(NAME) half_pic_declare (NAME)
62 #define HALF_PIC_EXTERNAL(NAME) half_pic_external (NAME)
63 #define HALF_PIC_INIT() half_pic_init ()
64 #define HALF_PIC_FINISH(STREAM) half_pic_finish (STREAM)
65 #define HALF_PIC_ADDRESS_P(X) ((*ptr_half_pic_address_p) (X))
66 #define HALF_PIC_PTR(X) half_pic_ptr (X)
68 /* Prefix for half-pic names */
69 #ifndef HALF_PIC_PREFIX
70 #define HALF_PIC_PREFIX "__pic_"
73 #endif /* NO_HALF_PIC */