/* Definitions for parsing and type checking for the GNU compiler for
|
/* Definitions for parsing and type checking for the GNU compiler for
|
the Java(TM) language.
|
the Java(TM) language.
|
Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
2005, 2006, 2007, 2008, 2010 Free Software Foundation, Inc.
|
2005, 2006, 2007, 2008, 2010 Free Software Foundation, Inc.
|
|
|
This file is part of GCC.
|
This file is part of GCC.
|
|
|
GCC is free software; you can redistribute it and/or modify
|
GCC is free software; you can redistribute it and/or modify
|
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3, or (at your option)
|
the Free Software Foundation; either version 3, or (at your option)
|
any later version.
|
any later version.
|
|
|
GCC is distributed in the hope that it will be useful,
|
GCC is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with GCC; see the file COPYING3. If not see
|
along with GCC; see the file COPYING3. If not see
|
<http://www.gnu.org/licenses/>.
|
<http://www.gnu.org/licenses/>.
|
|
|
Java and all Java-based marks are trademarks or registered trademarks
|
Java and all Java-based marks are trademarks or registered trademarks
|
of Sun Microsystems, Inc. in the United States and other countries.
|
of Sun Microsystems, Inc. in the United States and other countries.
|
The Free Software Foundation is independent of Sun Microsystems, Inc. */
|
The Free Software Foundation is independent of Sun Microsystems, Inc. */
|
|
|
/* Hacked by Per Bothner <bothner@cygnus.com> February 1996. */
|
/* Hacked by Per Bothner <bothner@cygnus.com> February 1996. */
|
|
|
#ifndef GCC_JAVA_TREE_H
|
#ifndef GCC_JAVA_TREE_H
|
#define GCC_JAVA_TREE_H
|
#define GCC_JAVA_TREE_H
|
|
|
#include "hashtab.h"
|
#include "hashtab.h"
|
|
|
struct JCF;
|
struct JCF;
|
|
|
/* Usage of TREE_LANG_FLAG_?:
|
/* Usage of TREE_LANG_FLAG_?:
|
2: QUALIFIED_P (in IDENTIFIER_NODE)
|
2: QUALIFIED_P (in IDENTIFIER_NODE)
|
CLASS_FILE_P (in a TRANSLATION_UNIT_DECL in current_file_list)
|
CLASS_FILE_P (in a TRANSLATION_UNIT_DECL in current_file_list)
|
3: HAS_FINALIZER (in RECORD_TYPE)
|
3: HAS_FINALIZER (in RECORD_TYPE)
|
4: IS_A_COMMAND_LINE_FILENAME_P (in IDENTIFIER_NODE)
|
4: IS_A_COMMAND_LINE_FILENAME_P (in IDENTIFIER_NODE)
|
IS_ARRAY_LENGTH_ACCESS (in INDIRECT_REF)
|
IS_ARRAY_LENGTH_ACCESS (in INDIRECT_REF)
|
5: HAS_BEEN_ALREADY_PARSED_P (in IDENTIFIER_NODE)
|
5: HAS_BEEN_ALREADY_PARSED_P (in IDENTIFIER_NODE)
|
|
|
Usage of TYPE_LANG_FLAG_?:
|
Usage of TYPE_LANG_FLAG_?:
|
1: TYPE_ARRAY_P (in RECORD_TYPE).
|
1: TYPE_ARRAY_P (in RECORD_TYPE).
|
2: CLASS_PARSED_P (in RECORD_TYPE).
|
2: CLASS_PARSED_P (in RECORD_TYPE).
|
4: CLASS_P (in RECORD_TYPE).
|
4: CLASS_P (in RECORD_TYPE).
|
5: CLASS_FROM_CURRENTLY_COMPILED_P (in RECORD_TYPE)
|
5: CLASS_FROM_CURRENTLY_COMPILED_P (in RECORD_TYPE)
|
6: CLASS_BEING_LAIDOUT (in RECORD_TYPE)
|
6: CLASS_BEING_LAIDOUT (in RECORD_TYPE)
|
|
|
Usage of DECL_LANG_FLAG_?:
|
Usage of DECL_LANG_FLAG_?:
|
0: METHOD_DEPRECATED (in FUNCTION_DECL).
|
0: METHOD_DEPRECATED (in FUNCTION_DECL).
|
FIELD_DEPRECATED (in FIELD_DECL).
|
FIELD_DEPRECATED (in FIELD_DECL).
|
CLASS_DEPRECATED (in TYPE_DECL).
|
CLASS_DEPRECATED (in TYPE_DECL).
|
1: METHOD_PUBLIC (in FUNCTION_DECL).
|
1: METHOD_PUBLIC (in FUNCTION_DECL).
|
FIELD_PUBLIC (in FIELD_DECL).
|
FIELD_PUBLIC (in FIELD_DECL).
|
CLASS_PUBLIC (in TYPE_DECL).
|
CLASS_PUBLIC (in TYPE_DECL).
|
2: METHOD_STATIC (in FUNCTION_DECL).
|
2: METHOD_STATIC (in FUNCTION_DECL).
|
(But note that FIELD_STATIC uses TREE_STATIC!)
|
(But note that FIELD_STATIC uses TREE_STATIC!)
|
FIELD_SYNTHETIC (in FIELD_DECL)
|
FIELD_SYNTHETIC (in FIELD_DECL)
|
CLASS_COMPLETE_P (in TYPE_DECL)
|
CLASS_COMPLETE_P (in TYPE_DECL)
|
3: METHOD_FINAL (in FUNCTION_DECL)
|
3: METHOD_FINAL (in FUNCTION_DECL)
|
FIELD_FINAL (in FIELD_DECL)
|
FIELD_FINAL (in FIELD_DECL)
|
CLASS_FINAL (in TYPE_DECL)
|
CLASS_FINAL (in TYPE_DECL)
|
DECL_FINAL (in any decl)
|
DECL_FINAL (in any decl)
|
4: METHOD_SYNCHRONIZED (in FUNCTION_DECL).
|
4: METHOD_SYNCHRONIZED (in FUNCTION_DECL).
|
CLASS_INTERFACE (in TYPE_DECL)
|
CLASS_INTERFACE (in TYPE_DECL)
|
FIELD_VOLATILE (int FIELD_DECL)
|
FIELD_VOLATILE (int FIELD_DECL)
|
5: METHOD_ABSTRACT (in FUNCTION_DECL).
|
5: METHOD_ABSTRACT (in FUNCTION_DECL).
|
CLASS_ABSTRACT (in TYPE_DECL)
|
CLASS_ABSTRACT (in TYPE_DECL)
|
FIELD_TRANSIENT (in FIELD_DECL)
|
FIELD_TRANSIENT (in FIELD_DECL)
|
6: CLASS_SUPER (in TYPE_DECL, ACC_SUPER flag)
|
6: CLASS_SUPER (in TYPE_DECL, ACC_SUPER flag)
|
7: DECL_CONSTRUCTOR_P (in FUNCTION_DECL).
|
7: DECL_CONSTRUCTOR_P (in FUNCTION_DECL).
|
CLASS_STATIC (in TYPE_DECL)
|
CLASS_STATIC (in TYPE_DECL)
|
*/
|
*/
|
|
|
#define VAR_OR_FIELD_CHECK(DECL) \
|
#define VAR_OR_FIELD_CHECK(DECL) \
|
TREE_CHECK3 (DECL, FIELD_DECL, VAR_DECL, PARM_DECL)
|
TREE_CHECK3 (DECL, FIELD_DECL, VAR_DECL, PARM_DECL)
|
|
|
/* True if the class whose TYPE_BINFO this is has a superclass.
|
/* True if the class whose TYPE_BINFO this is has a superclass.
|
(True of all classes except Object.) */
|
(True of all classes except Object.) */
|
#define CLASS_HAS_SUPER_FLAG(BINFO) BINFO_FLAG_1 (BINFO)
|
#define CLASS_HAS_SUPER_FLAG(BINFO) BINFO_FLAG_1 (BINFO)
|
#define CLASS_HAS_SUPER(TYPE) \
|
#define CLASS_HAS_SUPER(TYPE) \
|
(TYPE_BINFO (TYPE) && CLASS_HAS_SUPER_FLAG (TYPE_BINFO (TYPE)))
|
(TYPE_BINFO (TYPE) && CLASS_HAS_SUPER_FLAG (TYPE_BINFO (TYPE)))
|
|
|
/* Return the supertype of class TYPE, or NULL_TREE is it has none. */
|
/* Return the supertype of class TYPE, or NULL_TREE is it has none. */
|
#define CLASSTYPE_SUPER(TYPE) (CLASS_HAS_SUPER (TYPE) \
|
#define CLASSTYPE_SUPER(TYPE) (CLASS_HAS_SUPER (TYPE) \
|
? BINFO_TYPE (BINFO_BASE_BINFO (TYPE_BINFO (TYPE), 0)) \
|
? BINFO_TYPE (BINFO_BASE_BINFO (TYPE_BINFO (TYPE), 0)) \
|
: NULL_TREE)
|
: NULL_TREE)
|
|
|
/* The class defined by the actual (main) file we are compiling. */
|
/* The class defined by the actual (main) file we are compiling. */
|
#define main_class \
|
#define main_class \
|
java_global_trees[JTI_MAIN_CLASS]
|
java_global_trees[JTI_MAIN_CLASS]
|
|
|
/* The class we use as the base for name resolution. It's usually the
|
/* The class we use as the base for name resolution. It's usually the
|
class we're generating code for but sometimes it points to an inner
|
class we're generating code for but sometimes it points to an inner
|
class. If you really want to know the class we're currently
|
class. If you really want to know the class we're currently
|
generating code for, use output_class instead. */
|
generating code for, use output_class instead. */
|
#define current_class \
|
#define current_class \
|
java_global_trees[JTI_CURRENT_CLASS]
|
java_global_trees[JTI_CURRENT_CLASS]
|
|
|
/* The class we are currently generating. Really. */
|
/* The class we are currently generating. Really. */
|
#define output_class \
|
#define output_class \
|
java_global_trees[JTI_OUTPUT_CLASS]
|
java_global_trees[JTI_OUTPUT_CLASS]
|
|
|
/* List of virtual decls referred to by this translation unit, used to
|
/* List of virtual decls referred to by this translation unit, used to
|
generate virtual method offset symbol table. */
|
generate virtual method offset symbol table. */
|
|
|
/* The virtual offset table. This is emitted as uninitialized data of
|
/* The virtual offset table. This is emitted as uninitialized data of
|
the required length, and filled out at run time during class
|
the required length, and filled out at run time during class
|
linking. */
|
linking. */
|
|
|
/* The virtual offset symbol table. Used by the runtime to fill out
|
/* The virtual offset symbol table. Used by the runtime to fill out
|
the otable. */
|
the otable. */
|
|
|
/* Resource name. */
|
/* Resource name. */
|
extern const char *resource_name;
|
extern const char *resource_name;
|
|
|
/* Turned to 1 if -Wall was encountered. See lang.c for their meanings. */
|
/* Turned to 1 if -Wall was encountered. See lang.c for their meanings. */
|
extern int flag_wall;
|
extern int flag_wall;
|
|
|
/* The Java .class file that provides main_class; the main input file. */
|
/* The Java .class file that provides main_class; the main input file. */
|
extern GTY(()) struct JCF * current_jcf;
|
extern GTY(()) struct JCF * current_jcf;
|
|
|
/* Set to nonzero value in order to emit class initialization code
|
/* Set to nonzero value in order to emit class initialization code
|
before static field references. */
|
before static field references. */
|
extern int always_initialize_class_p;
|
extern int always_initialize_class_p;
|
|
|
extern int flag_verify_invocations;
|
extern int flag_verify_invocations;
|
|
|
/* Largest pc so far in this method that has been passed to lookup_label. */
|
/* Largest pc so far in this method that has been passed to lookup_label. */
|
extern int highest_label_pc_this_method;
|
extern int highest_label_pc_this_method;
|
|
|
/* Base value for this method to add to pc to get generated label. */
|
/* Base value for this method to add to pc to get generated label. */
|
extern int start_label_pc_this_method;
|
extern int start_label_pc_this_method;
|
|
|
typedef struct CPool constant_pool;
|
typedef struct CPool constant_pool;
|
|
|
#define CONSTANT_ResolvedFlag 16
|
#define CONSTANT_ResolvedFlag 16
|
|
|
/* Don't eagerly resolve this entry. When this flag is set, constant
|
/* Don't eagerly resolve this entry. When this flag is set, constant
|
pool entries are resolved only at runtime when the entry is first
|
pool entries are resolved only at runtime when the entry is first
|
referred to. */
|
referred to. */
|
#define CONSTANT_LazyFlag 32
|
#define CONSTANT_LazyFlag 32
|
|
|
/* The cpool->data[i] for a ResolvedString points to a STRING_CST. */
|
/* The cpool->data[i] for a ResolvedString points to a STRING_CST. */
|
#define CONSTANT_ResolvedString (CONSTANT_String+CONSTANT_ResolvedFlag)
|
#define CONSTANT_ResolvedString (CONSTANT_String+CONSTANT_ResolvedFlag)
|
|
|
/* The cpool->data[i] for a ResolvedClass points to a RECORD_TYPE. */
|
/* The cpool->data[i] for a ResolvedClass points to a RECORD_TYPE. */
|
#define CONSTANT_ResolvedClass (CONSTANT_Class+CONSTANT_ResolvedFlag)
|
#define CONSTANT_ResolvedClass (CONSTANT_Class+CONSTANT_ResolvedFlag)
|
|
|
#define CPOOL_UTF(CPOOL, INDEX) ((CPOOL)->data[INDEX].t)
|
#define CPOOL_UTF(CPOOL, INDEX) ((CPOOL)->data[INDEX].t)
|
|
|
/* A NameAndType constant is represented as a TREE_LIST.
|
/* A NameAndType constant is represented as a TREE_LIST.
|
The type is the signature string (as an IDENTIFIER_NODE). */
|
The type is the signature string (as an IDENTIFIER_NODE). */
|
|
|
#define NAME_AND_TYPE_NAME(CPOOL, IDX) \
|
#define NAME_AND_TYPE_NAME(CPOOL, IDX) \
|
CPOOL_UTF(CPOOL, CPOOL_USHORT1(CPOOL, IDX))
|
CPOOL_UTF(CPOOL, CPOOL_USHORT1(CPOOL, IDX))
|
#define NAME_AND_TYPE_SIGNATURE(CPOOL, IDX) \
|
#define NAME_AND_TYPE_SIGNATURE(CPOOL, IDX) \
|
CPOOL_UTF(CPOOL, CPOOL_USHORT2(CPOOL, IDX))
|
CPOOL_UTF(CPOOL, CPOOL_USHORT2(CPOOL, IDX))
|
|
|
/* A FieldRef, MethodRef or InterfaceMethodRef constant
|
/* A FieldRef, MethodRef or InterfaceMethodRef constant
|
is represented as a TREE_LIST. */
|
is represented as a TREE_LIST. */
|
|
|
#define COMPONENT_REF_CLASS_INDEX(CPOOL, IDX) CPOOL_USHORT1(CPOOL, IDX)
|
#define COMPONENT_REF_CLASS_INDEX(CPOOL, IDX) CPOOL_USHORT1(CPOOL, IDX)
|
#define COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX) CPOOL_USHORT2(CPOOL, IDX)
|
#define COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX) CPOOL_USHORT2(CPOOL, IDX)
|
#define COMPONENT_REF_NAME(CPOOL, IDX) \
|
#define COMPONENT_REF_NAME(CPOOL, IDX) \
|
NAME_AND_TYPE_NAME (CPOOL, COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX))
|
NAME_AND_TYPE_NAME (CPOOL, COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX))
|
#define COMPONENT_REF_SIGNATURE(CPOOL, IDX) \
|
#define COMPONENT_REF_SIGNATURE(CPOOL, IDX) \
|
NAME_AND_TYPE_SIGNATURE (CPOOL, COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX))
|
NAME_AND_TYPE_SIGNATURE (CPOOL, COMPONENT_REF_NAME_AND_TYPE(CPOOL, IDX))
|
|
|
extern GTY(()) tree java_lang_cloneable_identifier_node;
|
extern GTY(()) tree java_lang_cloneable_identifier_node;
|
extern GTY(()) tree java_io_serializable_identifier_node;
|
extern GTY(()) tree java_io_serializable_identifier_node;
|
extern GTY(()) tree gcj_abi_version;
|
extern GTY(()) tree gcj_abi_version;
|
|
|
/* The decl for the .constants field of an instance of Class. */
|
/* The decl for the .constants field of an instance of Class. */
|
extern GTY(()) tree constants_field_decl_node;
|
extern GTY(()) tree constants_field_decl_node;
|
|
|
/* The decl for the .data field of an instance of Class. */
|
/* The decl for the .data field of an instance of Class. */
|
extern GTY(()) tree constants_data_field_decl_node;
|
extern GTY(()) tree constants_data_field_decl_node;
|
|
|
enum java_tree_index
|
enum java_tree_index
|
{
|
{
|
JTI_PROMOTED_BYTE_TYPE_NODE,
|
JTI_PROMOTED_BYTE_TYPE_NODE,
|
JTI_PROMOTED_SHORT_TYPE_NODE,
|
JTI_PROMOTED_SHORT_TYPE_NODE,
|
JTI_PROMOTED_CHAR_TYPE_NODE,
|
JTI_PROMOTED_CHAR_TYPE_NODE,
|
JTI_PROMOTED_BOOLEAN_TYPE_NODE,
|
JTI_PROMOTED_BOOLEAN_TYPE_NODE,
|
|
|
JTI_BYTE_TYPE_NODE,
|
JTI_BYTE_TYPE_NODE,
|
JTI_SHORT_TYPE_NODE,
|
JTI_SHORT_TYPE_NODE,
|
JTI_INT_TYPE_NODE,
|
JTI_INT_TYPE_NODE,
|
JTI_LONG_TYPE_NODE,
|
JTI_LONG_TYPE_NODE,
|
|
|
JTI_UNSIGNED_BYTE_TYPE_NODE,
|
JTI_UNSIGNED_BYTE_TYPE_NODE,
|
JTI_UNSIGNED_SHORT_TYPE_NODE,
|
JTI_UNSIGNED_SHORT_TYPE_NODE,
|
JTI_UNSIGNED_INT_TYPE_NODE,
|
JTI_UNSIGNED_INT_TYPE_NODE,
|
JTI_UNSIGNED_LONG_TYPE_NODE,
|
JTI_UNSIGNED_LONG_TYPE_NODE,
|
|
|
JTI_DECIMAL_INT_MAX_NODE,
|
JTI_DECIMAL_INT_MAX_NODE,
|
JTI_DECIMAL_LONG_MAX_NODE,
|
JTI_DECIMAL_LONG_MAX_NODE,
|
|
|
JTI_OBJECT_TYPE_NODE,
|
JTI_OBJECT_TYPE_NODE,
|
JTI_UNQUALIFIED_OBJECT_ID_NODE,
|
JTI_UNQUALIFIED_OBJECT_ID_NODE,
|
JTI_OBJECT_PTR_TYPE_NODE,
|
JTI_OBJECT_PTR_TYPE_NODE,
|
JTI_STRING_TYPE_NODE,
|
JTI_STRING_TYPE_NODE,
|
JTI_STRING_PTR_TYPE_NODE,
|
JTI_STRING_PTR_TYPE_NODE,
|
JTI_THROWABLE_TYPE_NODE,
|
JTI_THROWABLE_TYPE_NODE,
|
JTI_EXCEPTION_TYPE_NODE,
|
JTI_EXCEPTION_TYPE_NODE,
|
JTI_RUNTIME_EXCEPTION_TYPE_NODE,
|
JTI_RUNTIME_EXCEPTION_TYPE_NODE,
|
JTI_ERROR_EXCEPTION_TYPE_NODE,
|
JTI_ERROR_EXCEPTION_TYPE_NODE,
|
JTI_RAWDATA_PTR_TYPE_NODE,
|
JTI_RAWDATA_PTR_TYPE_NODE,
|
|
|
JTI_BYTE_ARRAY_TYPE_NODE,
|
JTI_BYTE_ARRAY_TYPE_NODE,
|
JTI_SHORT_ARRAY_TYPE_NODE,
|
JTI_SHORT_ARRAY_TYPE_NODE,
|
JTI_INT_ARRAY_TYPE_NODE,
|
JTI_INT_ARRAY_TYPE_NODE,
|
JTI_LONG_ARRAY_TYPE_NODE,
|
JTI_LONG_ARRAY_TYPE_NODE,
|
JTI_BOOLEAN_ARRAY_TYPE_NODE,
|
JTI_BOOLEAN_ARRAY_TYPE_NODE,
|
JTI_CHAR_ARRAY_TYPE_NODE,
|
JTI_CHAR_ARRAY_TYPE_NODE,
|
JTI_DOUBLE_ARRAY_TYPE_NODE,
|
JTI_DOUBLE_ARRAY_TYPE_NODE,
|
JTI_FLOAT_ARRAY_TYPE_NODE,
|
JTI_FLOAT_ARRAY_TYPE_NODE,
|
JTI_ARRAY_ARRAY_TYPE_NODE,
|
JTI_ARRAY_ARRAY_TYPE_NODE,
|
JTI_OBJECT_ARRAY_TYPE_NODE,
|
JTI_OBJECT_ARRAY_TYPE_NODE,
|
JTI_STRING_ARRAY_TYPE_NODE,
|
JTI_STRING_ARRAY_TYPE_NODE,
|
JTI_BOOLEAN_ARRAY_VTABLE,
|
JTI_BOOLEAN_ARRAY_VTABLE,
|
JTI_BYTE_ARRAY_VTABLE,
|
JTI_BYTE_ARRAY_VTABLE,
|
JTI_CHAR_ARRAY_VTABLE,
|
JTI_CHAR_ARRAY_VTABLE,
|
JTI_SHORT_ARRAY_VTABLE,
|
JTI_SHORT_ARRAY_VTABLE,
|
JTI_INT_ARRAY_VTABLE,
|
JTI_INT_ARRAY_VTABLE,
|
JTI_LONG_ARRAY_VTABLE,
|
JTI_LONG_ARRAY_VTABLE,
|
JTI_FLOAT_ARRAY_VTABLE,
|
JTI_FLOAT_ARRAY_VTABLE,
|
JTI_DOUBLE_ARRAY_VTABLE,
|
JTI_DOUBLE_ARRAY_VTABLE,
|
JTI_TYPE_IDENTIFIER_NODE,
|
JTI_TYPE_IDENTIFIER_NODE,
|
JTI_INIT_IDENTIFIER_NODE,
|
JTI_INIT_IDENTIFIER_NODE,
|
JTI_CLINIT_IDENTIFIER_NODE,
|
JTI_CLINIT_IDENTIFIER_NODE,
|
JTI_VOID_SIGNATURE_NODE,
|
JTI_VOID_SIGNATURE_NODE,
|
JTI_FINALIZE_IDENTIFIER_NODE,
|
JTI_FINALIZE_IDENTIFIER_NODE,
|
JTI_THIS_IDENTIFIER_NODE,
|
JTI_THIS_IDENTIFIER_NODE,
|
JTI_ONE_ELT_ARRAY_DOMAIN_TYPE,
|
JTI_ONE_ELT_ARRAY_DOMAIN_TYPE,
|
|
|
JTI_RETURN_ADDRESS_TYPE_NODE,
|
JTI_RETURN_ADDRESS_TYPE_NODE,
|
|
|
JTI_LONG_ZERO_NODE,
|
JTI_LONG_ZERO_NODE,
|
JTI_FLOAT_ZERO_NODE,
|
JTI_FLOAT_ZERO_NODE,
|
JTI_DOUBLE_ZERO_NODE,
|
JTI_DOUBLE_ZERO_NODE,
|
JTI_INTEGER_TWO_NODE,
|
JTI_INTEGER_TWO_NODE,
|
JTI_INTEGER_FOUR_NODE,
|
JTI_INTEGER_FOUR_NODE,
|
|
|
JTI_METHODTABLE_TYPE,
|
JTI_METHODTABLE_TYPE,
|
JTI_METHODTABLE_PTR_TYPE,
|
JTI_METHODTABLE_PTR_TYPE,
|
|
|
JTI_UTF8CONST_TYPE,
|
JTI_UTF8CONST_TYPE,
|
JTI_UTF8CONST_PTR_TYPE,
|
JTI_UTF8CONST_PTR_TYPE,
|
|
|
JTI_CLASS_TYPE_NODE,
|
JTI_CLASS_TYPE_NODE,
|
JTI_CLASS_PTR_TYPE,
|
JTI_CLASS_PTR_TYPE,
|
JTI_FIELD_TYPE_NODE,
|
JTI_FIELD_TYPE_NODE,
|
JTI_CONSTANTS_TYPE_NODE,
|
JTI_CONSTANTS_TYPE_NODE,
|
JTI_DTABLE_TYPE,
|
JTI_DTABLE_TYPE,
|
JTI_DTABLE_PTR_TYPE,
|
JTI_DTABLE_PTR_TYPE,
|
JTI_FIELD_PTR_TYPE_NODE,
|
JTI_FIELD_PTR_TYPE_NODE,
|
JTI_FIELD_INFO_UNION_NODE,
|
JTI_FIELD_INFO_UNION_NODE,
|
JTI_EXCEPTION_TYPE,
|
JTI_EXCEPTION_TYPE,
|
JTI_EXCEPTION_PTR_TYPE,
|
JTI_EXCEPTION_PTR_TYPE,
|
JTI_LINENUMBERENTRY_TYPE,
|
JTI_LINENUMBERENTRY_TYPE,
|
JTI_LINENUMBERS_TYPE,
|
JTI_LINENUMBERS_TYPE,
|
JTI_METHOD_TYPE_NODE,
|
JTI_METHOD_TYPE_NODE,
|
JTI_METHOD_PTR_TYPE_NODE,
|
JTI_METHOD_PTR_TYPE_NODE,
|
JTI_OTABLE_TYPE,
|
JTI_OTABLE_TYPE,
|
JTI_OTABLE_PTR_TYPE,
|
JTI_OTABLE_PTR_TYPE,
|
JTI_ATABLE_TYPE,
|
JTI_ATABLE_TYPE,
|
JTI_ATABLE_PTR_TYPE,
|
JTI_ATABLE_PTR_TYPE,
|
JTI_ITABLE_TYPE,
|
JTI_ITABLE_TYPE,
|
JTI_ITABLE_PTR_TYPE,
|
JTI_ITABLE_PTR_TYPE,
|
JTI_SYMBOL_TYPE,
|
JTI_SYMBOL_TYPE,
|
JTI_SYMBOLS_ARRAY_TYPE,
|
JTI_SYMBOLS_ARRAY_TYPE,
|
JTI_SYMBOLS_ARRAY_PTR_TYPE,
|
JTI_SYMBOLS_ARRAY_PTR_TYPE,
|
JTI_ASSERTION_ENTRY_TYPE,
|
JTI_ASSERTION_ENTRY_TYPE,
|
JTI_ASSERTION_TABLE_TYPE,
|
JTI_ASSERTION_TABLE_TYPE,
|
|
|
JTI_END_PARAMS_NODE,
|
JTI_END_PARAMS_NODE,
|
|
|
JTI_THROW_NODE,
|
JTI_THROW_NODE,
|
JTI_ALLOC_OBJECT_NODE,
|
JTI_ALLOC_OBJECT_NODE,
|
JTI_ALLOC_NO_FINALIZER_NODE,
|
JTI_ALLOC_NO_FINALIZER_NODE,
|
JTI_SOFT_INSTANCEOF_NODE,
|
JTI_SOFT_INSTANCEOF_NODE,
|
JTI_SOFT_CHECKCAST_NODE,
|
JTI_SOFT_CHECKCAST_NODE,
|
JTI_SOFT_INITCLASS_NODE,
|
JTI_SOFT_INITCLASS_NODE,
|
JTI_SOFT_NEWARRAY_NODE,
|
JTI_SOFT_NEWARRAY_NODE,
|
JTI_SOFT_ANEWARRAY_NODE,
|
JTI_SOFT_ANEWARRAY_NODE,
|
JTI_SOFT_MULTIANEWARRAY_NODE,
|
JTI_SOFT_MULTIANEWARRAY_NODE,
|
JTI_SOFT_BADARRAYINDEX_NODE,
|
JTI_SOFT_BADARRAYINDEX_NODE,
|
JTI_SOFT_NULLPOINTER_NODE,
|
JTI_SOFT_NULLPOINTER_NODE,
|
JTI_SOFT_ABSTRACTMETHOD_NODE,
|
JTI_SOFT_ABSTRACTMETHOD_NODE,
|
JTI_SOFT_NOSUCHFIELD_NODE,
|
JTI_SOFT_NOSUCHFIELD_NODE,
|
JTI_SOFT_CHECKARRAYSTORE_NODE,
|
JTI_SOFT_CHECKARRAYSTORE_NODE,
|
JTI_SOFT_MONITORENTER_NODE,
|
JTI_SOFT_MONITORENTER_NODE,
|
JTI_SOFT_MONITOREXIT_NODE,
|
JTI_SOFT_MONITOREXIT_NODE,
|
JTI_SOFT_LOOKUPINTERFACEMETHOD_NODE,
|
JTI_SOFT_LOOKUPINTERFACEMETHOD_NODE,
|
JTI_SOFT_LOOKUPINTERFACEMETHODBYNAME_NODE,
|
JTI_SOFT_LOOKUPINTERFACEMETHODBYNAME_NODE,
|
JTI_SOFT_LOOKUPJNIMETHOD_NODE,
|
JTI_SOFT_LOOKUPJNIMETHOD_NODE,
|
JTI_SOFT_GETJNIENVNEWFRAME_NODE,
|
JTI_SOFT_GETJNIENVNEWFRAME_NODE,
|
JTI_SOFT_JNIPOPSYSTEMFRAME_NODE,
|
JTI_SOFT_JNIPOPSYSTEMFRAME_NODE,
|
JTI_SOFT_UNWRAPJNI_NODE,
|
JTI_SOFT_UNWRAPJNI_NODE,
|
JTI_SOFT_FMOD_NODE,
|
JTI_SOFT_FMOD_NODE,
|
JTI_SOFT_IDIV_NODE,
|
JTI_SOFT_IDIV_NODE,
|
JTI_SOFT_IREM_NODE,
|
JTI_SOFT_IREM_NODE,
|
JTI_SOFT_LDIV_NODE,
|
JTI_SOFT_LDIV_NODE,
|
JTI_SOFT_LREM_NODE,
|
JTI_SOFT_LREM_NODE,
|
|
|
JTI_ACCESS_FLAGS_TYPE_NODE,
|
JTI_ACCESS_FLAGS_TYPE_NODE,
|
|
|
JTI_NATIVECODE_PTR_ARRAY_TYPE_NODE,
|
JTI_NATIVECODE_PTR_ARRAY_TYPE_NODE,
|
|
|
JTI_MAIN_CLASS,
|
JTI_MAIN_CLASS,
|
JTI_CURRENT_CLASS,
|
JTI_CURRENT_CLASS,
|
JTI_OUTPUT_CLASS,
|
JTI_OUTPUT_CLASS,
|
|
|
JTI_MAX
|
JTI_MAX
|
};
|
};
|
|
|
extern GTY(()) tree java_global_trees[JTI_MAX];
|
extern GTY(()) tree java_global_trees[JTI_MAX];
|
|
|
/* "Promoted types" that are used for primitive types smaller
|
/* "Promoted types" that are used for primitive types smaller
|
than int. We could use int_type_node, but then we would lose
|
than int. We could use int_type_node, but then we would lose
|
type information (such as needed for debugging). */
|
type information (such as needed for debugging). */
|
#define promoted_byte_type_node \
|
#define promoted_byte_type_node \
|
java_global_trees[JTI_PROMOTED_BYTE_TYPE_NODE]
|
java_global_trees[JTI_PROMOTED_BYTE_TYPE_NODE]
|
#define promoted_short_type_node \
|
#define promoted_short_type_node \
|
java_global_trees[JTI_PROMOTED_SHORT_TYPE_NODE]
|
java_global_trees[JTI_PROMOTED_SHORT_TYPE_NODE]
|
#define promoted_char_type_node \
|
#define promoted_char_type_node \
|
java_global_trees[JTI_PROMOTED_CHAR_TYPE_NODE]
|
java_global_trees[JTI_PROMOTED_CHAR_TYPE_NODE]
|
#define promoted_boolean_type_node \
|
#define promoted_boolean_type_node \
|
java_global_trees[JTI_PROMOTED_BOOLEAN_TYPE_NODE]
|
java_global_trees[JTI_PROMOTED_BOOLEAN_TYPE_NODE]
|
|
|
#define byte_type_node \
|
#define byte_type_node \
|
java_global_trees[JTI_BYTE_TYPE_NODE]
|
java_global_trees[JTI_BYTE_TYPE_NODE]
|
#define short_type_node \
|
#define short_type_node \
|
java_global_trees[JTI_SHORT_TYPE_NODE]
|
java_global_trees[JTI_SHORT_TYPE_NODE]
|
#define int_type_node \
|
#define int_type_node \
|
java_global_trees[JTI_INT_TYPE_NODE]
|
java_global_trees[JTI_INT_TYPE_NODE]
|
#define long_type_node \
|
#define long_type_node \
|
java_global_trees[JTI_LONG_TYPE_NODE]
|
java_global_trees[JTI_LONG_TYPE_NODE]
|
|
|
#define unsigned_byte_type_node \
|
#define unsigned_byte_type_node \
|
java_global_trees[JTI_UNSIGNED_BYTE_TYPE_NODE]
|
java_global_trees[JTI_UNSIGNED_BYTE_TYPE_NODE]
|
#define unsigned_short_type_node \
|
#define unsigned_short_type_node \
|
java_global_trees[JTI_UNSIGNED_SHORT_TYPE_NODE]
|
java_global_trees[JTI_UNSIGNED_SHORT_TYPE_NODE]
|
#define unsigned_int_type_node \
|
#define unsigned_int_type_node \
|
java_global_trees[JTI_UNSIGNED_INT_TYPE_NODE]
|
java_global_trees[JTI_UNSIGNED_INT_TYPE_NODE]
|
#define unsigned_long_type_node \
|
#define unsigned_long_type_node \
|
java_global_trees[JTI_UNSIGNED_LONG_TYPE_NODE]
|
java_global_trees[JTI_UNSIGNED_LONG_TYPE_NODE]
|
|
|
#define decimal_int_max \
|
#define decimal_int_max \
|
java_global_trees[JTI_DECIMAL_INT_MAX_NODE]
|
java_global_trees[JTI_DECIMAL_INT_MAX_NODE]
|
#define decimal_long_max \
|
#define decimal_long_max \
|
java_global_trees[JTI_DECIMAL_LONG_MAX_NODE]
|
java_global_trees[JTI_DECIMAL_LONG_MAX_NODE]
|
|
|
#define object_type_node \
|
#define object_type_node \
|
java_global_trees[JTI_OBJECT_TYPE_NODE]
|
java_global_trees[JTI_OBJECT_TYPE_NODE]
|
#define unqualified_object_id_node \
|
#define unqualified_object_id_node \
|
java_global_trees[JTI_UNQUALIFIED_OBJECT_ID_NODE]
|
java_global_trees[JTI_UNQUALIFIED_OBJECT_ID_NODE]
|
#define object_ptr_type_node \
|
#define object_ptr_type_node \
|
java_global_trees[JTI_OBJECT_PTR_TYPE_NODE]
|
java_global_trees[JTI_OBJECT_PTR_TYPE_NODE]
|
#define string_type_node \
|
#define string_type_node \
|
java_global_trees[JTI_STRING_TYPE_NODE]
|
java_global_trees[JTI_STRING_TYPE_NODE]
|
#define string_ptr_type_node \
|
#define string_ptr_type_node \
|
java_global_trees[JTI_STRING_PTR_TYPE_NODE]
|
java_global_trees[JTI_STRING_PTR_TYPE_NODE]
|
#define throwable_type_node \
|
#define throwable_type_node \
|
java_global_trees[JTI_THROWABLE_TYPE_NODE]
|
java_global_trees[JTI_THROWABLE_TYPE_NODE]
|
#define exception_type_node \
|
#define exception_type_node \
|
java_global_trees[JTI_EXCEPTION_TYPE_NODE]
|
java_global_trees[JTI_EXCEPTION_TYPE_NODE]
|
#define runtime_exception_type_node \
|
#define runtime_exception_type_node \
|
java_global_trees[JTI_RUNTIME_EXCEPTION_TYPE_NODE]
|
java_global_trees[JTI_RUNTIME_EXCEPTION_TYPE_NODE]
|
#define error_exception_type_node \
|
#define error_exception_type_node \
|
java_global_trees[JTI_ERROR_EXCEPTION_TYPE_NODE]
|
java_global_trees[JTI_ERROR_EXCEPTION_TYPE_NODE]
|
#define rawdata_ptr_type_node \
|
#define rawdata_ptr_type_node \
|
java_global_trees[JTI_RAWDATA_PTR_TYPE_NODE]
|
java_global_trees[JTI_RAWDATA_PTR_TYPE_NODE]
|
|
|
#define byte_array_type_node \
|
#define byte_array_type_node \
|
java_global_trees[JTI_BYTE_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_BYTE_ARRAY_TYPE_NODE]
|
#define short_array_type_node \
|
#define short_array_type_node \
|
java_global_trees[JTI_SHORT_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_SHORT_ARRAY_TYPE_NODE]
|
#define int_array_type_node \
|
#define int_array_type_node \
|
java_global_trees[JTI_INT_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_INT_ARRAY_TYPE_NODE]
|
#define long_array_type_node \
|
#define long_array_type_node \
|
java_global_trees[JTI_LONG_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_LONG_ARRAY_TYPE_NODE]
|
#define boolean_array_type_node \
|
#define boolean_array_type_node \
|
java_global_trees[JTI_BOOLEAN_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_BOOLEAN_ARRAY_TYPE_NODE]
|
#define char_array_type_node \
|
#define char_array_type_node \
|
java_global_trees[JTI_CHAR_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_CHAR_ARRAY_TYPE_NODE]
|
#define double_array_type_node \
|
#define double_array_type_node \
|
java_global_trees[JTI_DOUBLE_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_DOUBLE_ARRAY_TYPE_NODE]
|
#define float_array_type_node \
|
#define float_array_type_node \
|
java_global_trees[JTI_FLOAT_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_FLOAT_ARRAY_TYPE_NODE]
|
#define array_array_type_node \
|
#define array_array_type_node \
|
java_global_trees[JTI_ARRAY_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_ARRAY_ARRAY_TYPE_NODE]
|
#define object_array_type_node \
|
#define object_array_type_node \
|
java_global_trees[JTI_OBJECT_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_OBJECT_ARRAY_TYPE_NODE]
|
#define string_array_type_node \
|
#define string_array_type_node \
|
java_global_trees[JTI_STRING_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_STRING_ARRAY_TYPE_NODE]
|
#define boolean_array_vtable \
|
#define boolean_array_vtable \
|
java_global_trees[JTI_BOOLEAN_ARRAY_VTABLE]
|
java_global_trees[JTI_BOOLEAN_ARRAY_VTABLE]
|
#define byte_array_vtable \
|
#define byte_array_vtable \
|
java_global_trees[JTI_BYTE_ARRAY_VTABLE]
|
java_global_trees[JTI_BYTE_ARRAY_VTABLE]
|
#define char_array_vtable \
|
#define char_array_vtable \
|
java_global_trees[JTI_CHAR_ARRAY_VTABLE]
|
java_global_trees[JTI_CHAR_ARRAY_VTABLE]
|
#define short_array_vtable \
|
#define short_array_vtable \
|
java_global_trees[JTI_SHORT_ARRAY_VTABLE]
|
java_global_trees[JTI_SHORT_ARRAY_VTABLE]
|
#define int_array_vtable \
|
#define int_array_vtable \
|
java_global_trees[JTI_INT_ARRAY_VTABLE]
|
java_global_trees[JTI_INT_ARRAY_VTABLE]
|
#define long_array_vtable \
|
#define long_array_vtable \
|
java_global_trees[JTI_LONG_ARRAY_VTABLE]
|
java_global_trees[JTI_LONG_ARRAY_VTABLE]
|
#define float_array_vtable \
|
#define float_array_vtable \
|
java_global_trees[JTI_FLOAT_ARRAY_VTABLE]
|
java_global_trees[JTI_FLOAT_ARRAY_VTABLE]
|
#define double_array_vtable \
|
#define double_array_vtable \
|
java_global_trees[JTI_DOUBLE_ARRAY_VTABLE]
|
java_global_trees[JTI_DOUBLE_ARRAY_VTABLE]
|
#define TYPE_identifier_node \
|
#define TYPE_identifier_node \
|
java_global_trees[JTI_TYPE_IDENTIFIER_NODE] /* "TYPE" */
|
java_global_trees[JTI_TYPE_IDENTIFIER_NODE] /* "TYPE" */
|
#define init_identifier_node \
|
#define init_identifier_node \
|
java_global_trees[JTI_INIT_IDENTIFIER_NODE] /* "<init>" */
|
java_global_trees[JTI_INIT_IDENTIFIER_NODE] /* "<init>" */
|
#define clinit_identifier_node \
|
#define clinit_identifier_node \
|
java_global_trees[JTI_CLINIT_IDENTIFIER_NODE] /* "<clinit>" */
|
java_global_trees[JTI_CLINIT_IDENTIFIER_NODE] /* "<clinit>" */
|
#define void_signature_node \
|
#define void_signature_node \
|
java_global_trees[JTI_VOID_SIGNATURE_NODE] /* "()V" */
|
java_global_trees[JTI_VOID_SIGNATURE_NODE] /* "()V" */
|
#define finalize_identifier_node \
|
#define finalize_identifier_node \
|
java_global_trees[JTI_FINALIZE_IDENTIFIER_NODE] /* "finalize" */
|
java_global_trees[JTI_FINALIZE_IDENTIFIER_NODE] /* "finalize" */
|
#define this_identifier_node \
|
#define this_identifier_node \
|
java_global_trees[JTI_THIS_IDENTIFIER_NODE] /* "this" */
|
java_global_trees[JTI_THIS_IDENTIFIER_NODE] /* "this" */
|
#define one_elt_array_domain_type \
|
#define one_elt_array_domain_type \
|
java_global_trees[JTI_ONE_ELT_ARRAY_DOMAIN_TYPE]
|
java_global_trees[JTI_ONE_ELT_ARRAY_DOMAIN_TYPE]
|
/* The type of the return address of a subroutine. */
|
/* The type of the return address of a subroutine. */
|
#define return_address_type_node \
|
#define return_address_type_node \
|
java_global_trees[JTI_RETURN_ADDRESS_TYPE_NODE]
|
java_global_trees[JTI_RETURN_ADDRESS_TYPE_NODE]
|
|
|
/* Integer constants not declared in tree.h. */
|
/* Integer constants not declared in tree.h. */
|
#define long_zero_node \
|
#define long_zero_node \
|
java_global_trees[JTI_LONG_ZERO_NODE]
|
java_global_trees[JTI_LONG_ZERO_NODE]
|
#define float_zero_node \
|
#define float_zero_node \
|
java_global_trees[JTI_FLOAT_ZERO_NODE]
|
java_global_trees[JTI_FLOAT_ZERO_NODE]
|
#define double_zero_node \
|
#define double_zero_node \
|
java_global_trees[JTI_DOUBLE_ZERO_NODE]
|
java_global_trees[JTI_DOUBLE_ZERO_NODE]
|
#define integer_two_node \
|
#define integer_two_node \
|
java_global_trees[JTI_INTEGER_TWO_NODE]
|
java_global_trees[JTI_INTEGER_TWO_NODE]
|
#define integer_four_node \
|
#define integer_four_node \
|
java_global_trees[JTI_INTEGER_FOUR_NODE]
|
java_global_trees[JTI_INTEGER_FOUR_NODE]
|
|
|
/* The type for struct methodtable. */
|
/* The type for struct methodtable. */
|
#define methodtable_type \
|
#define methodtable_type \
|
java_global_trees[JTI_METHODTABLE_TYPE]
|
java_global_trees[JTI_METHODTABLE_TYPE]
|
#define methodtable_ptr_type \
|
#define methodtable_ptr_type \
|
java_global_trees[JTI_METHODTABLE_PTR_TYPE]
|
java_global_trees[JTI_METHODTABLE_PTR_TYPE]
|
|
|
#define utf8const_type \
|
#define utf8const_type \
|
java_global_trees[JTI_UTF8CONST_TYPE]
|
java_global_trees[JTI_UTF8CONST_TYPE]
|
#define utf8const_ptr_type \
|
#define utf8const_ptr_type \
|
java_global_trees[JTI_UTF8CONST_PTR_TYPE]
|
java_global_trees[JTI_UTF8CONST_PTR_TYPE]
|
|
|
#define class_type_node \
|
#define class_type_node \
|
java_global_trees[JTI_CLASS_TYPE_NODE]
|
java_global_trees[JTI_CLASS_TYPE_NODE]
|
#define class_ptr_type \
|
#define class_ptr_type \
|
java_global_trees[JTI_CLASS_PTR_TYPE]
|
java_global_trees[JTI_CLASS_PTR_TYPE]
|
#define field_type_node \
|
#define field_type_node \
|
java_global_trees[JTI_FIELD_TYPE_NODE]
|
java_global_trees[JTI_FIELD_TYPE_NODE]
|
#define constants_type_node \
|
#define constants_type_node \
|
java_global_trees[JTI_CONSTANTS_TYPE_NODE]
|
java_global_trees[JTI_CONSTANTS_TYPE_NODE]
|
#define dtable_type \
|
#define dtable_type \
|
java_global_trees[JTI_DTABLE_TYPE]
|
java_global_trees[JTI_DTABLE_TYPE]
|
#define dtable_ptr_type \
|
#define dtable_ptr_type \
|
java_global_trees[JTI_DTABLE_PTR_TYPE]
|
java_global_trees[JTI_DTABLE_PTR_TYPE]
|
#define field_ptr_type_node \
|
#define field_ptr_type_node \
|
java_global_trees[JTI_FIELD_PTR_TYPE_NODE]
|
java_global_trees[JTI_FIELD_PTR_TYPE_NODE]
|
#define field_info_union_node \
|
#define field_info_union_node \
|
java_global_trees[JTI_FIELD_INFO_UNION_NODE]
|
java_global_trees[JTI_FIELD_INFO_UNION_NODE]
|
#define jexception_type \
|
#define jexception_type \
|
java_global_trees[JTI_EXCEPTION_TYPE]
|
java_global_trees[JTI_EXCEPTION_TYPE]
|
#define jexception_ptr_type \
|
#define jexception_ptr_type \
|
java_global_trees[JTI_EXCEPTION_PTR_TYPE]
|
java_global_trees[JTI_EXCEPTION_PTR_TYPE]
|
#define lineNumberEntry_type \
|
#define lineNumberEntry_type \
|
java_global_trees[JTI_LINENUMBERENTRY_TYPE]
|
java_global_trees[JTI_LINENUMBERENTRY_TYPE]
|
#define lineNumbers_type \
|
#define lineNumbers_type \
|
java_global_trees[JTI_LINENUMBERS_TYPE]
|
java_global_trees[JTI_LINENUMBERS_TYPE]
|
#define method_type_node \
|
#define method_type_node \
|
java_global_trees[JTI_METHOD_TYPE_NODE]
|
java_global_trees[JTI_METHOD_TYPE_NODE]
|
#define method_ptr_type_node \
|
#define method_ptr_type_node \
|
java_global_trees[JTI_METHOD_PTR_TYPE_NODE]
|
java_global_trees[JTI_METHOD_PTR_TYPE_NODE]
|
#define otable_type \
|
#define otable_type \
|
java_global_trees[JTI_OTABLE_TYPE]
|
java_global_trees[JTI_OTABLE_TYPE]
|
#define atable_type \
|
#define atable_type \
|
java_global_trees[JTI_ATABLE_TYPE]
|
java_global_trees[JTI_ATABLE_TYPE]
|
#define itable_type \
|
#define itable_type \
|
java_global_trees[JTI_ITABLE_TYPE]
|
java_global_trees[JTI_ITABLE_TYPE]
|
#define otable_ptr_type \
|
#define otable_ptr_type \
|
java_global_trees[JTI_OTABLE_PTR_TYPE]
|
java_global_trees[JTI_OTABLE_PTR_TYPE]
|
#define atable_ptr_type \
|
#define atable_ptr_type \
|
java_global_trees[JTI_ATABLE_PTR_TYPE]
|
java_global_trees[JTI_ATABLE_PTR_TYPE]
|
#define itable_ptr_type \
|
#define itable_ptr_type \
|
java_global_trees[JTI_ITABLE_PTR_TYPE]
|
java_global_trees[JTI_ITABLE_PTR_TYPE]
|
#define symbol_type \
|
#define symbol_type \
|
java_global_trees[JTI_SYMBOL_TYPE]
|
java_global_trees[JTI_SYMBOL_TYPE]
|
#define symbols_array_type \
|
#define symbols_array_type \
|
java_global_trees[JTI_SYMBOLS_ARRAY_TYPE]
|
java_global_trees[JTI_SYMBOLS_ARRAY_TYPE]
|
#define symbols_array_ptr_type \
|
#define symbols_array_ptr_type \
|
java_global_trees[JTI_SYMBOLS_ARRAY_PTR_TYPE]
|
java_global_trees[JTI_SYMBOLS_ARRAY_PTR_TYPE]
|
#define assertion_entry_type \
|
#define assertion_entry_type \
|
java_global_trees[JTI_ASSERTION_ENTRY_TYPE]
|
java_global_trees[JTI_ASSERTION_ENTRY_TYPE]
|
#define assertion_table_type \
|
#define assertion_table_type \
|
java_global_trees[JTI_ASSERTION_TABLE_TYPE]
|
java_global_trees[JTI_ASSERTION_TABLE_TYPE]
|
|
|
#define end_params_node \
|
#define end_params_node \
|
java_global_trees[JTI_END_PARAMS_NODE]
|
java_global_trees[JTI_END_PARAMS_NODE]
|
|
|
/* References to internal libjava functions we use. */
|
/* References to internal libjava functions we use. */
|
#define throw_node \
|
#define throw_node \
|
java_global_trees[JTI_THROW_NODE]
|
java_global_trees[JTI_THROW_NODE]
|
#define alloc_object_node \
|
#define alloc_object_node \
|
java_global_trees[JTI_ALLOC_OBJECT_NODE]
|
java_global_trees[JTI_ALLOC_OBJECT_NODE]
|
#define alloc_no_finalizer_node \
|
#define alloc_no_finalizer_node \
|
java_global_trees[JTI_ALLOC_NO_FINALIZER_NODE]
|
java_global_trees[JTI_ALLOC_NO_FINALIZER_NODE]
|
#define soft_instanceof_node \
|
#define soft_instanceof_node \
|
java_global_trees[JTI_SOFT_INSTANCEOF_NODE]
|
java_global_trees[JTI_SOFT_INSTANCEOF_NODE]
|
#define soft_checkcast_node \
|
#define soft_checkcast_node \
|
java_global_trees[JTI_SOFT_CHECKCAST_NODE]
|
java_global_trees[JTI_SOFT_CHECKCAST_NODE]
|
#define soft_initclass_node \
|
#define soft_initclass_node \
|
java_global_trees[JTI_SOFT_INITCLASS_NODE]
|
java_global_trees[JTI_SOFT_INITCLASS_NODE]
|
#define soft_newarray_node \
|
#define soft_newarray_node \
|
java_global_trees[JTI_SOFT_NEWARRAY_NODE]
|
java_global_trees[JTI_SOFT_NEWARRAY_NODE]
|
#define soft_anewarray_node \
|
#define soft_anewarray_node \
|
java_global_trees[JTI_SOFT_ANEWARRAY_NODE]
|
java_global_trees[JTI_SOFT_ANEWARRAY_NODE]
|
#define soft_multianewarray_node \
|
#define soft_multianewarray_node \
|
java_global_trees[JTI_SOFT_MULTIANEWARRAY_NODE]
|
java_global_trees[JTI_SOFT_MULTIANEWARRAY_NODE]
|
#define soft_badarrayindex_node \
|
#define soft_badarrayindex_node \
|
java_global_trees[JTI_SOFT_BADARRAYINDEX_NODE]
|
java_global_trees[JTI_SOFT_BADARRAYINDEX_NODE]
|
#define soft_nullpointer_node \
|
#define soft_nullpointer_node \
|
java_global_trees[JTI_SOFT_NULLPOINTER_NODE]
|
java_global_trees[JTI_SOFT_NULLPOINTER_NODE]
|
#define soft_abstractmethod_node \
|
#define soft_abstractmethod_node \
|
java_global_trees[JTI_SOFT_ABSTRACTMETHOD_NODE]
|
java_global_trees[JTI_SOFT_ABSTRACTMETHOD_NODE]
|
#define soft_nosuchfield_node \
|
#define soft_nosuchfield_node \
|
java_global_trees[JTI_SOFT_NOSUCHFIELD_NODE]
|
java_global_trees[JTI_SOFT_NOSUCHFIELD_NODE]
|
#define soft_checkarraystore_node \
|
#define soft_checkarraystore_node \
|
java_global_trees[JTI_SOFT_CHECKARRAYSTORE_NODE]
|
java_global_trees[JTI_SOFT_CHECKARRAYSTORE_NODE]
|
#define soft_monitorenter_node \
|
#define soft_monitorenter_node \
|
java_global_trees[JTI_SOFT_MONITORENTER_NODE]
|
java_global_trees[JTI_SOFT_MONITORENTER_NODE]
|
#define soft_monitorexit_node \
|
#define soft_monitorexit_node \
|
java_global_trees[JTI_SOFT_MONITOREXIT_NODE]
|
java_global_trees[JTI_SOFT_MONITOREXIT_NODE]
|
#define soft_lookupinterfacemethod_node \
|
#define soft_lookupinterfacemethod_node \
|
java_global_trees[JTI_SOFT_LOOKUPINTERFACEMETHOD_NODE]
|
java_global_trees[JTI_SOFT_LOOKUPINTERFACEMETHOD_NODE]
|
#define soft_lookupinterfacemethodbyname_node \
|
#define soft_lookupinterfacemethodbyname_node \
|
java_global_trees[JTI_SOFT_LOOKUPINTERFACEMETHODBYNAME_NODE]
|
java_global_trees[JTI_SOFT_LOOKUPINTERFACEMETHODBYNAME_NODE]
|
#define soft_lookupjnimethod_node \
|
#define soft_lookupjnimethod_node \
|
java_global_trees[JTI_SOFT_LOOKUPJNIMETHOD_NODE]
|
java_global_trees[JTI_SOFT_LOOKUPJNIMETHOD_NODE]
|
#define soft_getjnienvnewframe_node \
|
#define soft_getjnienvnewframe_node \
|
java_global_trees[JTI_SOFT_GETJNIENVNEWFRAME_NODE]
|
java_global_trees[JTI_SOFT_GETJNIENVNEWFRAME_NODE]
|
#define soft_jnipopsystemframe_node \
|
#define soft_jnipopsystemframe_node \
|
java_global_trees[JTI_SOFT_JNIPOPSYSTEMFRAME_NODE]
|
java_global_trees[JTI_SOFT_JNIPOPSYSTEMFRAME_NODE]
|
#define soft_unwrapjni_node \
|
#define soft_unwrapjni_node \
|
java_global_trees[JTI_SOFT_UNWRAPJNI_NODE]
|
java_global_trees[JTI_SOFT_UNWRAPJNI_NODE]
|
#define soft_fmod_node \
|
#define soft_fmod_node \
|
java_global_trees[JTI_SOFT_FMOD_NODE]
|
java_global_trees[JTI_SOFT_FMOD_NODE]
|
#define soft_idiv_node \
|
#define soft_idiv_node \
|
java_global_trees[JTI_SOFT_IDIV_NODE]
|
java_global_trees[JTI_SOFT_IDIV_NODE]
|
#define soft_irem_node \
|
#define soft_irem_node \
|
java_global_trees[JTI_SOFT_IREM_NODE]
|
java_global_trees[JTI_SOFT_IREM_NODE]
|
#define soft_ldiv_node \
|
#define soft_ldiv_node \
|
java_global_trees[JTI_SOFT_LDIV_NODE]
|
java_global_trees[JTI_SOFT_LDIV_NODE]
|
#define soft_lrem_node \
|
#define soft_lrem_node \
|
java_global_trees[JTI_SOFT_LREM_NODE]
|
java_global_trees[JTI_SOFT_LREM_NODE]
|
|
|
#define access_flags_type_node \
|
#define access_flags_type_node \
|
java_global_trees[JTI_ACCESS_FLAGS_TYPE_NODE]
|
java_global_trees[JTI_ACCESS_FLAGS_TYPE_NODE]
|
|
|
#define nativecode_ptr_array_type_node \
|
#define nativecode_ptr_array_type_node \
|
java_global_trees[JTI_NATIVECODE_PTR_ARRAY_TYPE_NODE]
|
java_global_trees[JTI_NATIVECODE_PTR_ARRAY_TYPE_NODE]
|
|
|
#define nativecode_ptr_type_node ptr_type_node
|
#define nativecode_ptr_type_node ptr_type_node
|
|
|
/* The decl for "_Jv_ResolvePoolEntry". */
|
/* The decl for "_Jv_ResolvePoolEntry". */
|
extern GTY(()) tree soft_resolvepoolentry_node;
|
extern GTY(()) tree soft_resolvepoolentry_node;
|
|
|
struct GTY(()) lang_identifier {
|
struct GTY(()) lang_identifier {
|
struct tree_identifier ignore;
|
struct tree_identifier ignore;
|
tree global_value;
|
tree global_value;
|
tree local_value;
|
tree local_value;
|
|
|
/* If non-NULL: An ADDR_REF to a VAR_DECL that contains
|
/* If non-NULL: An ADDR_REF to a VAR_DECL that contains
|
* the Utf8Const representation of the identifier. */
|
* the Utf8Const representation of the identifier. */
|
tree utf8_ref;
|
tree utf8_ref;
|
};
|
};
|
|
|
/* The resulting tree type. */
|
/* The resulting tree type. */
|
union GTY((desc ("TREE_CODE (&%h.generic) == IDENTIFIER_NODE"),
|
union GTY((desc ("TREE_CODE (&%h.generic) == IDENTIFIER_NODE"),
|
chain_next ("CODE_CONTAINS_STRUCT (TREE_CODE (&%h.generic), TS_COMMON) ? ((union lang_tree_node *) TREE_CHAIN (&%h.generic)) : NULL")))
|
chain_next ("CODE_CONTAINS_STRUCT (TREE_CODE (&%h.generic), TS_COMMON) ? ((union lang_tree_node *) TREE_CHAIN (&%h.generic)) : NULL")))
|
|
|
lang_tree_node {
|
lang_tree_node {
|
union tree_node GTY ((tag ("0"),
|
union tree_node GTY ((tag ("0"),
|
desc ("tree_node_structure (&%h)")))
|
desc ("tree_node_structure (&%h)")))
|
generic;
|
generic;
|
struct lang_identifier GTY ((tag ("1"))) identifier;
|
struct lang_identifier GTY ((tag ("1"))) identifier;
|
};
|
};
|
|
|
/* Macros for access to language-specific slots in an identifier. */
|
/* Macros for access to language-specific slots in an identifier. */
|
/* Unless specified, each of these slots contains a DECL node or null. */
|
/* Unless specified, each of these slots contains a DECL node or null. */
|
|
|
/* This represents the value which the identifier has in the
|
/* This represents the value which the identifier has in the
|
file-scope namespace. */
|
file-scope namespace. */
|
#define IDENTIFIER_GLOBAL_VALUE(NODE) \
|
#define IDENTIFIER_GLOBAL_VALUE(NODE) \
|
(((struct lang_identifier *)(NODE))->global_value)
|
(((struct lang_identifier *)(NODE))->global_value)
|
/* This represents the value which the identifier has in the current
|
/* This represents the value which the identifier has in the current
|
scope. */
|
scope. */
|
#define IDENTIFIER_LOCAL_VALUE(NODE) \
|
#define IDENTIFIER_LOCAL_VALUE(NODE) \
|
(((struct lang_identifier *)(NODE))->local_value)
|
(((struct lang_identifier *)(NODE))->local_value)
|
|
|
/* Given an identifier NODE, get the corresponding class.
|
/* Given an identifier NODE, get the corresponding class.
|
E.g. IDENTIFIER_CLASS_VALUE(get_identifier ("java.lang.Number"))
|
E.g. IDENTIFIER_CLASS_VALUE(get_identifier ("java.lang.Number"))
|
is the corresponding RECORD_TYPE. */
|
is the corresponding RECORD_TYPE. */
|
#define IDENTIFIER_CLASS_VALUE(NODE) IDENTIFIER_GLOBAL_VALUE(NODE)
|
#define IDENTIFIER_CLASS_VALUE(NODE) IDENTIFIER_GLOBAL_VALUE(NODE)
|
|
|
/* Given a signature of a reference (or array) type, or a method, return the
|
/* Given a signature of a reference (or array) type, or a method, return the
|
corresponding type (if one has been allocated).
|
corresponding type (if one has been allocated).
|
Do not use for primitive types, since they may be ambiguous.
|
Do not use for primitive types, since they may be ambiguous.
|
(E.g. is "I" a signature or a class name?) */
|
(E.g. is "I" a signature or a class name?) */
|
#define IDENTIFIER_SIGNATURE_TYPE(NODE) IDENTIFIER_GLOBAL_VALUE(NODE)
|
#define IDENTIFIER_SIGNATURE_TYPE(NODE) IDENTIFIER_GLOBAL_VALUE(NODE)
|
|
|
/* If non-NULL: An ADDR_REF to a VAR_DECL that contains
|
/* If non-NULL: An ADDR_REF to a VAR_DECL that contains
|
the Utf8Const representation of the identifier. */
|
the Utf8Const representation of the identifier. */
|
#define IDENTIFIER_UTF8_REF(NODE) \
|
#define IDENTIFIER_UTF8_REF(NODE) \
|
(((struct lang_identifier *)(NODE))->utf8_ref)
|
(((struct lang_identifier *)(NODE))->utf8_ref)
|
|
|
#define IDENTIFIER_UTF8_DECL(NODE) \
|
#define IDENTIFIER_UTF8_DECL(NODE) \
|
TREE_OPERAND((((struct lang_identifier *)(NODE))->utf8_ref), 0)
|
TREE_OPERAND((((struct lang_identifier *)(NODE))->utf8_ref), 0)
|
|
|
/* For a FUNCTION_DECL, if we are compiling a .class file, then this is
|
/* For a FUNCTION_DECL, if we are compiling a .class file, then this is
|
the position in the .class file of the method code.
|
the position in the .class file of the method code.
|
Specifically, this is the code itself, not the code attribute. */
|
Specifically, this is the code itself, not the code attribute. */
|
#define DECL_CODE_OFFSET(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.code_offset)
|
#define DECL_CODE_OFFSET(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.code_offset)
|
/* Similarly, the length of the bytecode. */
|
/* Similarly, the length of the bytecode. */
|
#define DECL_CODE_LENGTH(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.code_length)
|
#define DECL_CODE_LENGTH(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.code_length)
|
/* Similarly, the position of the LineNumberTable attribute. */
|
/* Similarly, the position of the LineNumberTable attribute. */
|
#define DECL_LINENUMBERS_OFFSET(DECL) \
|
#define DECL_LINENUMBERS_OFFSET(DECL) \
|
(DECL_LANG_SPECIFIC(DECL)->u.f.linenumbers_offset)
|
(DECL_LANG_SPECIFIC(DECL)->u.f.linenumbers_offset)
|
/* Similarly, the position of the LocalVariableTable attribute
|
/* Similarly, the position of the LocalVariableTable attribute
|
(following the standard attribute header). */
|
(following the standard attribute header). */
|
#define DECL_LOCALVARIABLES_OFFSET(DECL) \
|
#define DECL_LOCALVARIABLES_OFFSET(DECL) \
|
(DECL_LANG_SPECIFIC(DECL)->u.f.localvariables_offset)
|
(DECL_LANG_SPECIFIC(DECL)->u.f.localvariables_offset)
|
|
|
#define DECL_MAX_LOCALS(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.max_locals)
|
#define DECL_MAX_LOCALS(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.max_locals)
|
#define DECL_MAX_STACK(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.max_stack)
|
#define DECL_MAX_STACK(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.max_stack)
|
/* Number of local variable slots needed for the arguments of this function. */
|
/* Number of local variable slots needed for the arguments of this function. */
|
#define DECL_ARG_SLOT_COUNT(DECL) \
|
#define DECL_ARG_SLOT_COUNT(DECL) \
|
(DECL_LANG_SPECIFIC(DECL)->u.f.arg_slot_count)
|
(DECL_LANG_SPECIFIC(DECL)->u.f.arg_slot_count)
|
/* Source location of end of function. */
|
/* Source location of end of function. */
|
#define DECL_FUNCTION_LAST_LINE(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.last_line)
|
#define DECL_FUNCTION_LAST_LINE(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.last_line)
|
/* List of checked thrown exceptions, as specified with the `throws'
|
/* List of checked thrown exceptions, as specified with the `throws'
|
keyword */
|
keyword */
|
#define DECL_FUNCTION_THROWS(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.throws_list)
|
#define DECL_FUNCTION_THROWS(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.throws_list)
|
/* VAR_DECL containing the caught exception object. */
|
/* VAR_DECL containing the caught exception object. */
|
#define DECL_FUNCTION_EXC_OBJ(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.exc_obj)
|
#define DECL_FUNCTION_EXC_OBJ(DECL) (DECL_LANG_SPECIFIC(DECL)->u.f.exc_obj)
|
/* For each function decl, init_test_table contains a hash table whose
|
/* For each function decl, init_test_table contains a hash table whose
|
entries are keyed on class names, and whose values are local
|
entries are keyed on class names, and whose values are local
|
boolean decls. The variables are intended to be TRUE when the
|
boolean decls. The variables are intended to be TRUE when the
|
class has been initialized in this function, and FALSE otherwise. */
|
class has been initialized in this function, and FALSE otherwise. */
|
#define DECL_FUNCTION_INIT_TEST_TABLE(DECL) \
|
#define DECL_FUNCTION_INIT_TEST_TABLE(DECL) \
|
(DECL_LANG_SPECIFIC(DECL)->u.f.init_test_table)
|
(DECL_LANG_SPECIFIC(DECL)->u.f.init_test_table)
|
/* For each static function decl, itc contains a hash table whose
|
/* For each static function decl, itc contains a hash table whose
|
entries are keyed on class named that are definitively initialized
|
entries are keyed on class named that are definitively initialized
|
in DECL. */
|
in DECL. */
|
#define DECL_FUNCTION_INITIALIZED_CLASS_TABLE(DECL) \
|
#define DECL_FUNCTION_INITIALIZED_CLASS_TABLE(DECL) \
|
(DECL_LANG_SPECIFIC(DECL)->u.f.ict)
|
(DECL_LANG_SPECIFIC(DECL)->u.f.ict)
|
|
|
#define DECL_LOCAL_CNI_METHOD_P(NODE) \
|
#define DECL_LOCAL_CNI_METHOD_P(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.f.local_cni)
|
(DECL_LANG_SPECIFIC (NODE)->u.f.local_cni)
|
|
|
/* True when DECL (a field) is Synthetic. */
|
/* True when DECL (a field) is Synthetic. */
|
#define FIELD_SYNTHETIC(DECL) DECL_LANG_FLAG_2 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_SYNTHETIC(DECL) DECL_LANG_FLAG_2 (VAR_OR_FIELD_CHECK (DECL))
|
|
|
/* The slot number for this local variable. */
|
/* The slot number for this local variable. */
|
#define DECL_LOCAL_SLOT_NUMBER(NODE) \
|
#define DECL_LOCAL_SLOT_NUMBER(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.v.slot_number)
|
(DECL_LANG_SPECIFIC (NODE)->u.v.slot_number)
|
/* The start (bytecode) pc for the valid range of this local variable. */
|
/* The start (bytecode) pc for the valid range of this local variable. */
|
#define DECL_LOCAL_START_PC(NODE) (DECL_LANG_SPECIFIC (NODE)->u.v.start_pc)
|
#define DECL_LOCAL_START_PC(NODE) (DECL_LANG_SPECIFIC (NODE)->u.v.start_pc)
|
/* The end (bytecode) pc for the valid range of this local variable. */
|
/* The end (bytecode) pc for the valid range of this local variable. */
|
#define DECL_LOCAL_END_PC(NODE) (DECL_LANG_SPECIFIC (NODE)->u.v.end_pc)
|
#define DECL_LOCAL_END_PC(NODE) (DECL_LANG_SPECIFIC (NODE)->u.v.end_pc)
|
/* For a VAR_DECL or PARM_DECL, used to chain decls with the same
|
/* For a VAR_DECL or PARM_DECL, used to chain decls with the same
|
slot_number in decl_map. */
|
slot_number in decl_map. */
|
#define DECL_LOCAL_SLOT_CHAIN(NODE) (DECL_LANG_SPECIFIC(NODE)->u.v.slot_chain)
|
#define DECL_LOCAL_SLOT_CHAIN(NODE) (DECL_LANG_SPECIFIC(NODE)->u.v.slot_chain)
|
/* The class that's the owner of a dynamic binding table. */
|
/* The class that's the owner of a dynamic binding table. */
|
#define DECL_OWNER(NODE) (DECL_LANG_SPECIFIC(NODE)->u.v.owner)
|
#define DECL_OWNER(NODE) (DECL_LANG_SPECIFIC(NODE)->u.v.owner)
|
/* True if NODE is a class final field. */
|
/* True if NODE is a class final field. */
|
#define FIELD_ENUM(DECL) (DECL_LANG_SPECIFIC (DECL)->u.v.field_enum)
|
#define FIELD_ENUM(DECL) (DECL_LANG_SPECIFIC (DECL)->u.v.field_enum)
|
/* True if NODE is a variable that is out of scope. */
|
/* True if NODE is a variable that is out of scope. */
|
#define LOCAL_VAR_OUT_OF_SCOPE_P(NODE) \
|
#define LOCAL_VAR_OUT_OF_SCOPE_P(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.v.freed)
|
(DECL_LANG_SPECIFIC (NODE)->u.v.freed)
|
#define LOCAL_SLOT_P(NODE) \
|
#define LOCAL_SLOT_P(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.v.local_slot)
|
(DECL_LANG_SPECIFIC (NODE)->u.v.local_slot)
|
|
|
#define DECL_CLASS_FIELD_P(NODE) \
|
#define DECL_CLASS_FIELD_P(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.v.class_field)
|
(DECL_LANG_SPECIFIC (NODE)->u.v.class_field)
|
#define DECL_VTABLE_P(NODE) \
|
#define DECL_VTABLE_P(NODE) \
|
(DECL_LANG_SPECIFIC (NODE)->u.v.vtable)
|
(DECL_LANG_SPECIFIC (NODE)->u.v.vtable)
|
|
|
/* Create a DECL_LANG_SPECIFIC if necessary. */
|
/* Create a DECL_LANG_SPECIFIC if necessary. */
|
#define MAYBE_CREATE_VAR_LANG_DECL_SPECIFIC(T) \
|
#define MAYBE_CREATE_VAR_LANG_DECL_SPECIFIC(T) \
|
if (DECL_LANG_SPECIFIC (T) == NULL) \
|
if (DECL_LANG_SPECIFIC (T) == NULL) \
|
{ \
|
{ \
|
DECL_LANG_SPECIFIC ((T)) \
|
DECL_LANG_SPECIFIC ((T)) \
|
= ggc_alloc_cleared_lang_decl (sizeof (struct lang_decl)); \
|
= ggc_alloc_cleared_lang_decl (sizeof (struct lang_decl)); \
|
DECL_LANG_SPECIFIC (T)->desc = LANG_DECL_VAR; \
|
DECL_LANG_SPECIFIC (T)->desc = LANG_DECL_VAR; \
|
}
|
}
|
|
|
/* A ConstantExpression, after folding and name resolution. */
|
/* A ConstantExpression, after folding and name resolution. */
|
#define CONSTANT_VALUE_P(NODE) \
|
#define CONSTANT_VALUE_P(NODE) \
|
(TREE_CODE (NODE) == STRING_CST \
|
(TREE_CODE (NODE) == STRING_CST \
|
|| (TREE_CODE (NODE) == INTEGER_CST \
|
|| (TREE_CODE (NODE) == INTEGER_CST \
|
&& TREE_CODE (TREE_TYPE (NODE)) != POINTER_TYPE) \
|
&& TREE_CODE (TREE_TYPE (NODE)) != POINTER_TYPE) \
|
|| TREE_CODE (NODE) == REAL_CST)
|
|| TREE_CODE (NODE) == REAL_CST)
|
|
|
/* DECL_LANG_SPECIFIC for FUNCTION_DECLs. */
|
/* DECL_LANG_SPECIFIC for FUNCTION_DECLs. */
|
struct GTY(()) lang_decl_func {
|
struct GTY(()) lang_decl_func {
|
/* tree chain; not yet used. */
|
/* tree chain; not yet used. */
|
long code_offset;
|
long code_offset;
|
int code_length;
|
int code_length;
|
long linenumbers_offset;
|
long linenumbers_offset;
|
long localvariables_offset;
|
long localvariables_offset;
|
int arg_slots;
|
int arg_slots;
|
int max_locals;
|
int max_locals;
|
int max_stack;
|
int max_stack;
|
int arg_slot_count;
|
int arg_slot_count;
|
source_location last_line; /* End line number for a function decl */
|
source_location last_line; /* End line number for a function decl */
|
VEC(tree,gc) *throws_list; /* Exception specified by `throws' */
|
VEC(tree,gc) *throws_list; /* Exception specified by `throws' */
|
tree exc_obj; /* Decl holding the exception object. */
|
tree exc_obj; /* Decl holding the exception object. */
|
|
|
/* Class initialization test variables */
|
/* Class initialization test variables */
|
htab_t GTY ((param_is (struct treetreehash_entry))) init_test_table;
|
htab_t GTY ((param_is (struct treetreehash_entry))) init_test_table;
|
|
|
/* Initialized (static) Class Table */
|
/* Initialized (static) Class Table */
|
htab_t GTY ((param_is (union tree_node))) ict;
|
htab_t GTY ((param_is (union tree_node))) ict;
|
|
|
unsigned int native : 1; /* Nonzero if this is a native method */
|
unsigned int native : 1; /* Nonzero if this is a native method */
|
unsigned int strictfp : 1;
|
unsigned int strictfp : 1;
|
unsigned int invisible : 1; /* Set for methods we generate
|
unsigned int invisible : 1; /* Set for methods we generate
|
internally but which shouldn't be
|
internally but which shouldn't be
|
written to the .class file. */
|
written to the .class file. */
|
unsigned int dummy : 1;
|
unsigned int dummy : 1;
|
unsigned int local_cni : 1; /* Decl needs mangle_local_cni_method. */
|
unsigned int local_cni : 1; /* Decl needs mangle_local_cni_method. */
|
unsigned int bridge : 1; /* Bridge method. */
|
unsigned int bridge : 1; /* Bridge method. */
|
unsigned int varargs : 1; /* Varargs method. */
|
unsigned int varargs : 1; /* Varargs method. */
|
};
|
};
|
|
|
struct GTY(()) treetreehash_entry {
|
struct GTY(()) treetreehash_entry {
|
tree key;
|
tree key;
|
tree value;
|
tree value;
|
};
|
};
|
|
|
/* These represent the possible assertion_codes that can be emitted in the
|
/* These represent the possible assertion_codes that can be emitted in the
|
type assertion table. */
|
type assertion table. */
|
enum
|
enum
|
{
|
{
|
JV_ASSERT_END_OF_TABLE = 0, /* Last entry in table. */
|
JV_ASSERT_END_OF_TABLE = 0, /* Last entry in table. */
|
JV_ASSERT_TYPES_COMPATIBLE = 1, /* Operand A is assignable to Operand B. */
|
JV_ASSERT_TYPES_COMPATIBLE = 1, /* Operand A is assignable to Operand B. */
|
JV_ASSERT_IS_INSTANTIABLE = 2 /* Operand A is an instantiable class. */
|
JV_ASSERT_IS_INSTANTIABLE = 2 /* Operand A is an instantiable class. */
|
};
|
};
|
|
|
/* Annotation types used in the reflection_data. See
|
/* Annotation types used in the reflection_data. See
|
java.lang.Class.getDeclaredAnnotations() in the runtime library for
|
java.lang.Class.getDeclaredAnnotations() in the runtime library for
|
an example of how these are used. */
|
an example of how these are used. */
|
|
|
typedef enum
|
typedef enum
|
{
|
{
|
JV_CLASS_ATTR,
|
JV_CLASS_ATTR,
|
JV_METHOD_ATTR,
|
JV_METHOD_ATTR,
|
JV_FIELD_ATTR,
|
JV_FIELD_ATTR,
|
JV_DONE_ATTR
|
JV_DONE_ATTR
|
} jv_attr_type;
|
} jv_attr_type;
|
|
|
typedef enum
|
typedef enum
|
{
|
{
|
JV_INNER_CLASSES_KIND,
|
JV_INNER_CLASSES_KIND,
|
JV_ENCLOSING_METHOD_KIND,
|
JV_ENCLOSING_METHOD_KIND,
|
JV_SIGNATURE_KIND,
|
JV_SIGNATURE_KIND,
|
JV_ANNOTATIONS_KIND,
|
JV_ANNOTATIONS_KIND,
|
JV_PARAMETER_ANNOTATIONS_KIND,
|
JV_PARAMETER_ANNOTATIONS_KIND,
|
JV_ANNOTATION_DEFAULT_KIND
|
JV_ANNOTATION_DEFAULT_KIND
|
} jv_attr_kind;
|
} jv_attr_kind;
|
|
|
typedef struct GTY(()) type_assertion {
|
typedef struct GTY(()) type_assertion {
|
int assertion_code; /* 'opcode' for the type of this assertion. */
|
int assertion_code; /* 'opcode' for the type of this assertion. */
|
tree op1; /* First operand. */
|
tree op1; /* First operand. */
|
tree op2; /* Second operand. */
|
tree op2; /* Second operand. */
|
} type_assertion;
|
} type_assertion;
|
|
|
extern tree java_treetreehash_find (htab_t, tree);
|
extern tree java_treetreehash_find (htab_t, tree);
|
extern tree * java_treetreehash_new (htab_t, tree);
|
extern tree * java_treetreehash_new (htab_t, tree);
|
extern htab_t java_treetreehash_create (size_t size);
|
extern htab_t java_treetreehash_create (size_t size);
|
|
|
/* DECL_LANG_SPECIFIC for VAR_DECL, PARM_DECL and sometimes FIELD_DECL
|
/* DECL_LANG_SPECIFIC for VAR_DECL, PARM_DECL and sometimes FIELD_DECL
|
(access methods on outer class fields) and final fields. */
|
(access methods on outer class fields) and final fields. */
|
struct GTY(()) lang_decl_var {
|
struct GTY(()) lang_decl_var {
|
int slot_number;
|
int slot_number;
|
int start_pc;
|
int start_pc;
|
int end_pc;
|
int end_pc;
|
tree slot_chain;
|
tree slot_chain;
|
tree owner;
|
tree owner;
|
unsigned int freed : 1; /* Decl is no longer in scope. */
|
unsigned int freed : 1; /* Decl is no longer in scope. */
|
unsigned int local_slot : 1; /* Decl is a temporary in the stack frame. */
|
unsigned int local_slot : 1; /* Decl is a temporary in the stack frame. */
|
unsigned int class_field : 1; /* Decl needs mangle_class_field. */
|
unsigned int class_field : 1; /* Decl needs mangle_class_field. */
|
unsigned int vtable : 1; /* Decl needs mangle_vtable. */
|
unsigned int vtable : 1; /* Decl needs mangle_vtable. */
|
unsigned int field_enum:1; /* Field is an enum. */
|
unsigned int field_enum:1; /* Field is an enum. */
|
};
|
};
|
|
|
/* This is what 'lang_decl' really points to. */
|
/* This is what 'lang_decl' really points to. */
|
|
|
enum lang_decl_desc {LANG_DECL_FUNC, LANG_DECL_VAR};
|
enum lang_decl_desc {LANG_DECL_FUNC, LANG_DECL_VAR};
|
|
|
struct GTY((variable_size)) lang_decl {
|
struct GTY((variable_size)) lang_decl {
|
enum lang_decl_desc desc;
|
enum lang_decl_desc desc;
|
union lang_decl_u
|
union lang_decl_u
|
{
|
{
|
struct lang_decl_func GTY ((tag ("LANG_DECL_FUNC"))) f;
|
struct lang_decl_func GTY ((tag ("LANG_DECL_FUNC"))) f;
|
struct lang_decl_var GTY ((tag ("LANG_DECL_VAR"))) v;
|
struct lang_decl_var GTY ((tag ("LANG_DECL_VAR"))) v;
|
} GTY ((desc ("%0.desc"))) u;
|
} GTY ((desc ("%0.desc"))) u;
|
};
|
};
|
|
|
/* Macro to access fields in `struct lang_type'. */
|
/* Macro to access fields in `struct lang_type'. */
|
|
|
#define TYPE_SIGNATURE(T) (TYPE_LANG_SPECIFIC (T)->signature)
|
#define TYPE_SIGNATURE(T) (TYPE_LANG_SPECIFIC (T)->signature)
|
#define TYPE_JCF(T) (TYPE_LANG_SPECIFIC (T)->jcf)
|
#define TYPE_JCF(T) (TYPE_LANG_SPECIFIC (T)->jcf)
|
#define TYPE_CPOOL(T) (TYPE_LANG_SPECIFIC (T)->cpool)
|
#define TYPE_CPOOL(T) (TYPE_LANG_SPECIFIC (T)->cpool)
|
#define TYPE_CPOOL_DATA_REF(T) (TYPE_LANG_SPECIFIC (T)->cpool_data_ref)
|
#define TYPE_CPOOL_DATA_REF(T) (TYPE_LANG_SPECIFIC (T)->cpool_data_ref)
|
#define MAYBE_CREATE_TYPE_TYPE_LANG_SPECIFIC(T) \
|
#define MAYBE_CREATE_TYPE_TYPE_LANG_SPECIFIC(T) \
|
if (TYPE_LANG_SPECIFIC ((T)) == NULL) \
|
if (TYPE_LANG_SPECIFIC ((T)) == NULL) \
|
TYPE_LANG_SPECIFIC ((T)) \
|
TYPE_LANG_SPECIFIC ((T)) \
|
= ggc_alloc_cleared_lang_type (sizeof (struct lang_type));
|
= ggc_alloc_cleared_lang_type (sizeof (struct lang_type));
|
|
|
#define TYPE_DUMMY(T) (TYPE_LANG_SPECIFIC(T)->dummy_class)
|
#define TYPE_DUMMY(T) (TYPE_LANG_SPECIFIC(T)->dummy_class)
|
|
|
#define TYPE_PACKAGE_LIST(T) (TYPE_LANG_SPECIFIC (T)->package_list)
|
#define TYPE_PACKAGE_LIST(T) (TYPE_LANG_SPECIFIC (T)->package_list)
|
#define TYPE_PRIVATE_INNER_CLASS(T) (TYPE_LANG_SPECIFIC (T)->pic)
|
#define TYPE_PRIVATE_INNER_CLASS(T) (TYPE_LANG_SPECIFIC (T)->pic)
|
#define TYPE_PROTECTED_INNER_CLASS(T) (TYPE_LANG_SPECIFIC (T)->poic)
|
#define TYPE_PROTECTED_INNER_CLASS(T) (TYPE_LANG_SPECIFIC (T)->poic)
|
#define TYPE_STRICTFP(T) (TYPE_LANG_SPECIFIC (T)->strictfp)
|
#define TYPE_STRICTFP(T) (TYPE_LANG_SPECIFIC (T)->strictfp)
|
#define TYPE_ENUM(T) (TYPE_LANG_SPECIFIC (T)->enum_class)
|
#define TYPE_ENUM(T) (TYPE_LANG_SPECIFIC (T)->enum_class)
|
#define TYPE_SYNTHETIC(T) (TYPE_LANG_SPECIFIC (T)->synthetic)
|
#define TYPE_SYNTHETIC(T) (TYPE_LANG_SPECIFIC (T)->synthetic)
|
#define TYPE_ANNOTATION(T) (TYPE_LANG_SPECIFIC (T)->annotation)
|
#define TYPE_ANNOTATION(T) (TYPE_LANG_SPECIFIC (T)->annotation)
|
|
|
#define TYPE_USES_ASSERTIONS(T) (TYPE_LANG_SPECIFIC (T)->assertions)
|
#define TYPE_USES_ASSERTIONS(T) (TYPE_LANG_SPECIFIC (T)->assertions)
|
|
|
#define TYPE_ATABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->atable_methods)
|
#define TYPE_ATABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->atable_methods)
|
#define TYPE_ATABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->atable_syms_decl)
|
#define TYPE_ATABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->atable_syms_decl)
|
#define TYPE_ATABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->atable_decl)
|
#define TYPE_ATABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->atable_decl)
|
|
|
#define TYPE_OTABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->otable_methods)
|
#define TYPE_OTABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->otable_methods)
|
#define TYPE_OTABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->otable_syms_decl)
|
#define TYPE_OTABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->otable_syms_decl)
|
#define TYPE_OTABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->otable_decl)
|
#define TYPE_OTABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->otable_decl)
|
|
|
#define TYPE_ITABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->itable_methods)
|
#define TYPE_ITABLE_METHODS(T) (TYPE_LANG_SPECIFIC (T)->itable_methods)
|
#define TYPE_ITABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->itable_syms_decl)
|
#define TYPE_ITABLE_SYMS_DECL(T) (TYPE_LANG_SPECIFIC (T)->itable_syms_decl)
|
#define TYPE_ITABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->itable_decl)
|
#define TYPE_ITABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->itable_decl)
|
|
|
#define TYPE_CTABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->ctable_decl)
|
#define TYPE_CTABLE_DECL(T) (TYPE_LANG_SPECIFIC (T)->ctable_decl)
|
#define TYPE_CATCH_CLASSES(T) (TYPE_LANG_SPECIFIC (T)->catch_classes)
|
#define TYPE_CATCH_CLASSES(T) (TYPE_LANG_SPECIFIC (T)->catch_classes)
|
|
|
#define TYPE_TO_RUNTIME_MAP(T) (TYPE_LANG_SPECIFIC (T)->type_to_runtime_map)
|
#define TYPE_TO_RUNTIME_MAP(T) (TYPE_LANG_SPECIFIC (T)->type_to_runtime_map)
|
#define TYPE_ASSERTIONS(T) (TYPE_LANG_SPECIFIC (T)->type_assertions)
|
#define TYPE_ASSERTIONS(T) (TYPE_LANG_SPECIFIC (T)->type_assertions)
|
#define TYPE_PACKAGE(T) (TYPE_LANG_SPECIFIC (T)->package)
|
#define TYPE_PACKAGE(T) (TYPE_LANG_SPECIFIC (T)->package)
|
|
|
#define TYPE_REFLECTION_DATA(T) (TYPE_LANG_SPECIFIC (T)->reflection_data)
|
#define TYPE_REFLECTION_DATA(T) (TYPE_LANG_SPECIFIC (T)->reflection_data)
|
#define TYPE_REFLECTION_DATASIZE(T) \
|
#define TYPE_REFLECTION_DATASIZE(T) \
|
(TYPE_LANG_SPECIFIC (T)->reflection_datasize)
|
(TYPE_LANG_SPECIFIC (T)->reflection_datasize)
|
|
|
typedef struct GTY(()) method_entry_d {
|
typedef struct GTY(()) method_entry_d {
|
tree method;
|
tree method;
|
tree special;
|
tree special;
|
} method_entry;
|
} method_entry;
|
|
|
DEF_VEC_O(method_entry);
|
DEF_VEC_O(method_entry);
|
DEF_VEC_ALLOC_O(method_entry,gc);
|
DEF_VEC_ALLOC_O(method_entry,gc);
|
|
|
/* FIXME: the variable_size annotation here is needed because these types are
|
/* FIXME: the variable_size annotation here is needed because these types are
|
variable-sized in some other frontends. Due to gengtype deficiency the GTY
|
variable-sized in some other frontends. Due to gengtype deficiency the GTY
|
options of such types have to agree across all frontends. */
|
options of such types have to agree across all frontends. */
|
struct GTY((variable_size)) lang_type {
|
struct GTY((variable_size)) lang_type {
|
tree signature;
|
tree signature;
|
struct JCF *jcf;
|
struct JCF *jcf;
|
struct CPool *cpool;
|
struct CPool *cpool;
|
tree cpool_data_ref; /* Cached */
|
tree cpool_data_ref; /* Cached */
|
tree package_list; /* List of package names, progressive */
|
tree package_list; /* List of package names, progressive */
|
|
|
VEC(method_entry,gc) *otable_methods; /* List of static decls referred
|
VEC(method_entry,gc) *otable_methods; /* List of static decls referred
|
to by this class. */
|
to by this class. */
|
tree otable_decl; /* The static address table. */
|
tree otable_decl; /* The static address table. */
|
tree otable_syms_decl;
|
tree otable_syms_decl;
|
|
|
VEC(method_entry,gc) *atable_methods; /* List of abstract methods
|
VEC(method_entry,gc) *atable_methods; /* List of abstract methods
|
referred to by this class. */
|
referred to by this class. */
|
tree atable_decl; /* The static address table. */
|
tree atable_decl; /* The static address table. */
|
tree atable_syms_decl;
|
tree atable_syms_decl;
|
|
|
VEC(method_entry,gc) *itable_methods; /* List of interface methods
|
VEC(method_entry,gc) *itable_methods; /* List of interface methods
|
referred to by this class. */
|
referred to by this class. */
|
tree itable_decl; /* The interfaces table. */
|
tree itable_decl; /* The interfaces table. */
|
tree itable_syms_decl;
|
tree itable_syms_decl;
|
|
|
tree ctable_decl; /* The table of classes for the runtime
|
tree ctable_decl; /* The table of classes for the runtime
|
type matcher. */
|
type matcher. */
|
VEC(constructor_elt,gc) *catch_classes;
|
VEC(constructor_elt,gc) *catch_classes;
|
|
|
htab_t GTY ((param_is (struct treetreehash_entry))) type_to_runtime_map;
|
htab_t GTY ((param_is (struct treetreehash_entry))) type_to_runtime_map;
|
/* The mapping of classes to exception region
|
/* The mapping of classes to exception region
|
markers. */
|
markers. */
|
|
|
htab_t GTY ((param_is (struct type_assertion))) type_assertions;
|
htab_t GTY ((param_is (struct type_assertion))) type_assertions;
|
/* Table of type assertions to be evaluated
|
/* Table of type assertions to be evaluated
|
by the runtime when this class is loaded. */
|
by the runtime when this class is loaded. */
|
|
|
tree package; /* IDENTIFIER_NODE for package this class is
|
tree package; /* IDENTIFIER_NODE for package this class is
|
a member of. */
|
a member of. */
|
|
|
unsigned char* GTY((skip)) reflection_data; /* The raw reflection
|
unsigned char* GTY((skip)) reflection_data; /* The raw reflection
|
data for this
|
data for this
|
class. */
|
class. */
|
long reflection_datasize; /* The size of the raw reflection data
|
long reflection_datasize; /* The size of the raw reflection data
|
for this class, in bytes. */
|
for this class, in bytes. */
|
|
|
unsigned pic:1; /* Private Inner Class. */
|
unsigned pic:1; /* Private Inner Class. */
|
unsigned poic:1; /* Protected Inner Class. */
|
unsigned poic:1; /* Protected Inner Class. */
|
unsigned strictfp:1; /* `strictfp' class. */
|
unsigned strictfp:1; /* `strictfp' class. */
|
unsigned assertions:1; /* Any method uses `assert'. */
|
unsigned assertions:1; /* Any method uses `assert'. */
|
unsigned dummy_class:1; /* Not a real class, just a placeholder. */
|
unsigned dummy_class:1; /* Not a real class, just a placeholder. */
|
unsigned enum_class:1; /* Class is an enum type. */
|
unsigned enum_class:1; /* Class is an enum type. */
|
unsigned synthetic:1; /* Class is synthetic. */
|
unsigned synthetic:1; /* Class is synthetic. */
|
unsigned annotation:1; /* Class is an annotation type. */
|
unsigned annotation:1; /* Class is an annotation type. */
|
};
|
};
|
|
|
#define JCF_u4 unsigned long
|
#define JCF_u4 unsigned long
|
#define JCF_u2 unsigned short
|
#define JCF_u2 unsigned short
|
|
|
/* Possible values to pass to lookup_argument_method_generic. */
|
/* Possible values to pass to lookup_argument_method_generic. */
|
#define SEARCH_INTERFACE 1
|
#define SEARCH_INTERFACE 1
|
#define SEARCH_SUPER 2
|
#define SEARCH_SUPER 2
|
#define SEARCH_VISIBLE 4
|
#define SEARCH_VISIBLE 4
|
|
|
/* Defined in java-except.h */
|
/* Defined in java-except.h */
|
struct eh_range;
|
struct eh_range;
|
|
|
extern void java_parse_file (void);
|
extern void java_parse_file (void);
|
extern tree java_type_for_mode (enum machine_mode, int);
|
extern tree java_type_for_mode (enum machine_mode, int);
|
extern tree java_type_for_size (unsigned int, int);
|
extern tree java_type_for_size (unsigned int, int);
|
extern tree java_truthvalue_conversion (tree);
|
extern tree java_truthvalue_conversion (tree);
|
extern void add_assume_compiled (const char *, int);
|
extern void add_assume_compiled (const char *, int);
|
extern void add_enable_assert (const char *, int);
|
extern void add_enable_assert (const char *, int);
|
extern bool enable_assertions (tree);
|
extern bool enable_assertions (tree);
|
extern tree lookup_class (tree);
|
extern tree lookup_class (tree);
|
extern tree lookup_java_constructor (tree, tree);
|
extern tree lookup_java_constructor (tree, tree);
|
extern tree lookup_java_method (tree, tree, tree);
|
extern tree lookup_java_method (tree, tree, tree);
|
extern tree lookup_argument_method (tree, tree, tree);
|
extern tree lookup_argument_method (tree, tree, tree);
|
extern tree lookup_argument_method_generic (tree, tree, tree, int);
|
extern tree lookup_argument_method_generic (tree, tree, tree, int);
|
extern int has_method (tree, tree);
|
extern int has_method (tree, tree);
|
extern tree promote_type (tree);
|
extern tree promote_type (tree);
|
extern tree get_constant (struct JCF*, int);
|
extern tree get_constant (struct JCF*, int);
|
extern tree get_name_constant (struct JCF*, int);
|
extern tree get_name_constant (struct JCF*, int);
|
extern tree get_class_constant (struct JCF*, int);
|
extern tree get_class_constant (struct JCF*, int);
|
extern tree parse_signature (struct JCF *jcf, int sig_index);
|
extern tree parse_signature (struct JCF *jcf, int sig_index);
|
extern tree add_field (tree, tree, tree, int);
|
extern tree add_field (tree, tree, tree, int);
|
extern tree add_method (tree, int, tree, tree);
|
extern tree add_method (tree, int, tree, tree);
|
extern tree add_method_1 (tree, int, tree, tree);
|
extern tree add_method_1 (tree, int, tree, tree);
|
extern void java_hide_decl (tree);
|
extern void java_hide_decl (tree);
|
extern tree make_class (void);
|
extern tree make_class (void);
|
extern tree push_class (tree, tree);
|
extern tree push_class (tree, tree);
|
extern tree unmangle_classname (const char *name, int name_length);
|
extern tree unmangle_classname (const char *name, int name_length);
|
extern tree parse_signature_string (const unsigned char *, int);
|
extern tree parse_signature_string (const unsigned char *, int);
|
extern tree get_type_from_signature (tree);
|
extern tree get_type_from_signature (tree);
|
extern void layout_class (tree);
|
extern void layout_class (tree);
|
extern int get_interface_method_index (tree, tree);
|
extern int get_interface_method_index (tree, tree);
|
extern tree layout_class_method (tree, tree, tree, tree);
|
extern tree layout_class_method (tree, tree, tree, tree);
|
extern void layout_class_methods (tree);
|
extern void layout_class_methods (tree);
|
extern void cache_this_class_ref (tree);
|
extern void cache_this_class_ref (tree);
|
extern void uncache_this_class_ref (tree);
|
extern void uncache_this_class_ref (tree);
|
extern tree build_class_ref (tree);
|
extern tree build_class_ref (tree);
|
extern tree build_dtable_decl (tree);
|
extern tree build_dtable_decl (tree);
|
extern tree build_internal_class_name (tree);
|
extern tree build_internal_class_name (tree);
|
extern tree build_constants_constructor (void);
|
extern tree build_constants_constructor (void);
|
extern tree build_constant_data_ref (bool);
|
extern tree build_constant_data_ref (bool);
|
extern tree build_ref_from_constant_pool (int);
|
extern tree build_ref_from_constant_pool (int);
|
extern tree build_utf8_ref (tree);
|
extern tree build_utf8_ref (tree);
|
extern tree ident_subst (const char *, int, const char *, int, int,
|
extern tree ident_subst (const char *, int, const char *, int, int,
|
const char *);
|
const char *);
|
extern tree identifier_subst (const tree, const char *, int, int,
|
extern tree identifier_subst (const tree, const char *, int, int,
|
const char *);
|
const char *);
|
extern bool global_bindings_p (void);
|
extern bool global_bindings_p (void);
|
extern tree getdecls (void);
|
extern tree getdecls (void);
|
extern void pushlevel (int);
|
extern void pushlevel (int);
|
extern tree poplevel (int,int, int);
|
extern tree poplevel (int,int, int);
|
extern tree pushdecl (tree);
|
extern tree pushdecl (tree);
|
extern void java_init_decl_processing (void);
|
extern void java_init_decl_processing (void);
|
extern void java_dup_lang_specific_decl (tree);
|
extern void java_dup_lang_specific_decl (tree);
|
extern tree build_java_signature (tree);
|
extern tree build_java_signature (tree);
|
extern tree build_java_argument_signature (tree);
|
extern tree build_java_argument_signature (tree);
|
extern void set_java_signature (tree, tree);
|
extern void set_java_signature (tree, tree);
|
extern tree build_static_field_ref (tree);
|
extern tree build_static_field_ref (tree);
|
extern tree build_address_of (tree);
|
extern tree build_address_of (tree);
|
extern tree find_local_variable (int index, tree type, int pc);
|
extern tree find_local_variable (int index, tree type, int pc);
|
extern tree find_stack_slot (int index, tree type);
|
extern tree find_stack_slot (int index, tree type);
|
extern tree build_prim_array_type (tree, HOST_WIDE_INT);
|
extern tree build_prim_array_type (tree, HOST_WIDE_INT);
|
extern tree build_java_array_type (tree, HOST_WIDE_INT);
|
extern tree build_java_array_type (tree, HOST_WIDE_INT);
|
extern int is_compiled_class (tree);
|
extern int is_compiled_class (tree);
|
extern tree mangled_classname (const char *, tree);
|
extern tree mangled_classname (const char *, tree);
|
extern tree lookup_label (int);
|
extern tree lookup_label (int);
|
extern tree pop_type_0 (tree, char **);
|
extern tree pop_type_0 (tree, char **);
|
extern tree pop_type (tree);
|
extern tree pop_type (tree);
|
extern tree decode_newarray_type (int);
|
extern tree decode_newarray_type (int);
|
extern tree lookup_field (tree *, tree);
|
extern tree lookup_field (tree *, tree);
|
extern int is_array_type_p (tree);
|
extern int is_array_type_p (tree);
|
extern HOST_WIDE_INT java_array_type_length (tree);
|
extern HOST_WIDE_INT java_array_type_length (tree);
|
extern int read_class (tree);
|
extern int read_class (tree);
|
extern void load_class (tree, int);
|
extern void load_class (tree, int);
|
|
|
extern tree check_for_builtin (tree, tree);
|
extern tree check_for_builtin (tree, tree);
|
extern void initialize_builtins (void);
|
extern void initialize_builtins (void);
|
|
|
extern tree lookup_name (tree);
|
extern tree lookup_name (tree);
|
extern bool special_method_p (tree);
|
extern bool special_method_p (tree);
|
extern void maybe_rewrite_invocation (tree *, VEC(tree,gc) **, tree *, tree *);
|
extern void maybe_rewrite_invocation (tree *, VEC(tree,gc) **, tree *, tree *);
|
extern tree build_known_method_ref (tree, tree, tree, tree, VEC(tree,gc) *, tree);
|
extern tree build_known_method_ref (tree, tree, tree, tree, VEC(tree,gc) *, tree);
|
extern tree build_class_init (tree, tree);
|
extern tree build_class_init (tree, tree);
|
extern int attach_init_test_initialization_flags (void **, void *);
|
extern int attach_init_test_initialization_flags (void **, void *);
|
extern tree build_invokevirtual (tree, tree, tree);
|
extern tree build_invokevirtual (tree, tree, tree);
|
extern tree build_invokeinterface (tree, tree);
|
extern tree build_invokeinterface (tree, tree);
|
extern tree build_jni_stub (tree);
|
extern tree build_jni_stub (tree);
|
extern tree invoke_build_dtable (int, VEC(tree,gc) *);
|
extern tree invoke_build_dtable (int, VEC(tree,gc) *);
|
extern tree build_field_ref (tree, tree, tree);
|
extern tree build_field_ref (tree, tree, tree);
|
extern tree java_modify_addr_for_volatile (tree);
|
extern tree java_modify_addr_for_volatile (tree);
|
extern void pushdecl_force_head (tree);
|
extern void pushdecl_force_head (tree);
|
extern tree build_java_binop (enum tree_code, tree, tree, tree);
|
extern tree build_java_binop (enum tree_code, tree, tree, tree);
|
extern tree build_java_soft_divmod (enum tree_code, tree, tree, tree);
|
extern tree build_java_soft_divmod (enum tree_code, tree, tree, tree);
|
extern tree binary_numeric_promotion (tree, tree, tree *, tree *);
|
extern tree binary_numeric_promotion (tree, tree, tree *, tree *);
|
extern tree build_java_arrayaccess (tree, tree, tree);
|
extern tree build_java_arrayaccess (tree, tree, tree);
|
extern tree build_java_arraystore_check (tree, tree);
|
extern tree build_java_arraystore_check (tree, tree);
|
extern tree build_newarray (int, tree);
|
extern tree build_newarray (int, tree);
|
extern tree build_anewarray (tree, tree);
|
extern tree build_anewarray (tree, tree);
|
extern tree build_new_array (tree, tree);
|
extern tree build_new_array (tree, tree);
|
extern tree build_java_array_length_access (tree);
|
extern tree build_java_array_length_access (tree);
|
extern tree build_java_indirect_ref (tree, tree, int);
|
extern tree build_java_indirect_ref (tree, tree, int);
|
extern tree java_check_reference (tree, int);
|
extern tree java_check_reference (tree, int);
|
extern tree build_get_class (tree);
|
extern tree build_get_class (tree);
|
extern tree build_instanceof (tree, tree);
|
extern tree build_instanceof (tree, tree);
|
extern tree create_label_decl (tree);
|
extern tree create_label_decl (tree);
|
extern tree prepare_eh_table_type (tree);
|
extern tree prepare_eh_table_type (tree);
|
extern void java_expand_catch_classes (tree);
|
extern void java_expand_catch_classes (tree);
|
extern tree build_exception_object_ref (tree);
|
extern tree build_exception_object_ref (tree);
|
extern tree generate_name (void);
|
extern tree generate_name (void);
|
extern const char *lang_printable_name (tree, int);
|
extern const char *lang_printable_name (tree, int);
|
extern tree maybe_add_interface (tree, tree);
|
extern tree maybe_add_interface (tree, tree);
|
extern void set_super_info (int, tree, tree, int);
|
extern void set_super_info (int, tree, tree, int);
|
extern void set_class_decl_access_flags (int, tree);
|
extern void set_class_decl_access_flags (int, tree);
|
extern int get_access_flags_from_decl (tree);
|
extern int get_access_flags_from_decl (tree);
|
extern int interface_of_p (tree, tree);
|
extern int interface_of_p (tree, tree);
|
extern int inherits_from_p (tree, tree);
|
extern int inherits_from_p (tree, tree);
|
extern int common_enclosing_context_p (tree, tree);
|
extern int common_enclosing_context_p (tree, tree);
|
extern int common_enclosing_instance_p (tree, tree);
|
extern int common_enclosing_instance_p (tree, tree);
|
extern int enclosing_context_p (tree, tree);
|
extern int enclosing_context_p (tree, tree);
|
extern tree build_result_decl (tree);
|
extern tree build_result_decl (tree);
|
extern void set_method_index (tree decl, tree method_index);
|
extern void set_method_index (tree decl, tree method_index);
|
extern tree get_method_index (tree decl);
|
extern tree get_method_index (tree decl);
|
extern void make_class_data (tree);
|
extern void make_class_data (tree);
|
extern int alloc_name_constant (int, tree);
|
extern int alloc_name_constant (int, tree);
|
extern int alloc_constant_fieldref (tree, tree);
|
extern int alloc_constant_fieldref (tree, tree);
|
extern void emit_register_classes (tree *);
|
extern void emit_register_classes (tree *);
|
extern tree emit_symbol_table (tree, tree, VEC(method_entry,gc) *,
|
extern tree emit_symbol_table (tree, tree, VEC(method_entry,gc) *,
|
tree, tree, int);
|
tree, tree, int);
|
extern void lang_init_source (int);
|
extern void lang_init_source (int);
|
extern void write_classfile (tree);
|
extern void write_classfile (tree);
|
extern char *print_int_node (tree);
|
extern char *print_int_node (tree);
|
extern void finish_class (void);
|
extern void finish_class (void);
|
extern void check_for_initialization (tree, tree);
|
extern void check_for_initialization (tree, tree);
|
extern struct CPool *cpool_for_class (tree);
|
extern struct CPool *cpool_for_class (tree);
|
extern int find_class_or_string_constant (struct CPool *, int, tree);
|
extern int find_class_or_string_constant (struct CPool *, int, tree);
|
|
|
extern tree pushdecl_top_level (tree);
|
extern tree pushdecl_top_level (tree);
|
extern tree pushdecl_function_level (tree);
|
extern tree pushdecl_function_level (tree);
|
extern tree java_replace_references (tree *, int *, void *);
|
extern tree java_replace_references (tree *, int *, void *);
|
extern int alloc_class_constant (tree);
|
extern int alloc_class_constant (tree);
|
extern void init_expr_processing (void);
|
extern void init_expr_processing (void);
|
extern void push_super_field (tree, tree);
|
extern void push_super_field (tree, tree);
|
extern void init_class_processing (void);
|
extern void init_class_processing (void);
|
extern void add_type_assertion (tree, int, tree, tree);
|
extern void add_type_assertion (tree, int, tree, tree);
|
extern int can_widen_reference_to (tree, tree);
|
extern int can_widen_reference_to (tree, tree);
|
extern int class_depth (tree);
|
extern int class_depth (tree);
|
extern int verify_jvm_instructions_new (struct JCF *, const unsigned char *,
|
extern int verify_jvm_instructions_new (struct JCF *, const unsigned char *,
|
long);
|
long);
|
extern void maybe_pushlevels (int);
|
extern void maybe_pushlevels (int);
|
extern void maybe_poplevels (int);
|
extern void maybe_poplevels (int);
|
extern void force_poplevels (int);
|
extern void force_poplevels (int);
|
extern int process_jvm_instruction (int, const unsigned char *, long);
|
extern int process_jvm_instruction (int, const unsigned char *, long);
|
extern int maybe_adjust_start_pc (struct JCF *, int, int, int);
|
extern int maybe_adjust_start_pc (struct JCF *, int, int, int);
|
extern void set_local_type (int, tree);
|
extern void set_local_type (int, tree);
|
extern int merge_type_state (tree);
|
extern int merge_type_state (tree);
|
extern int push_type_0 (tree);
|
extern int push_type_0 (tree);
|
extern void push_type (tree);
|
extern void push_type (tree);
|
extern void add_interface (tree, tree);
|
extern void add_interface (tree, tree);
|
extern tree force_evaluation_order (tree);
|
extern tree force_evaluation_order (tree);
|
extern tree java_create_object (tree);
|
extern tree java_create_object (tree);
|
extern int verify_constant_pool (struct JCF *);
|
extern int verify_constant_pool (struct JCF *);
|
extern void start_java_method (tree);
|
extern void start_java_method (tree);
|
extern void end_java_method (void);
|
extern void end_java_method (void);
|
extern void give_name_to_locals (struct JCF *);
|
extern void give_name_to_locals (struct JCF *);
|
extern void note_instructions (struct JCF *, tree);
|
extern void note_instructions (struct JCF *, tree);
|
extern void expand_byte_code (struct JCF *, tree);
|
extern void expand_byte_code (struct JCF *, tree);
|
extern int open_in_zip (struct JCF *, const char *, const char *, int);
|
extern int open_in_zip (struct JCF *, const char *, const char *, int);
|
extern void set_constant_value (tree, tree);
|
extern void set_constant_value (tree, tree);
|
#ifdef jword
|
#ifdef jword
|
extern int find_constant1 (struct CPool *, int, jword);
|
extern int find_constant1 (struct CPool *, int, jword);
|
extern int find_constant2 (struct CPool *, int, jword, jword);
|
extern int find_constant2 (struct CPool *, int, jword, jword);
|
#endif
|
#endif
|
extern int find_utf8_constant (struct CPool *, tree);
|
extern int find_utf8_constant (struct CPool *, tree);
|
extern int find_string_constant (struct CPool *, tree);
|
extern int find_string_constant (struct CPool *, tree);
|
extern int find_class_constant (struct CPool *, tree);
|
extern int find_class_constant (struct CPool *, tree);
|
extern int find_fieldref_index (struct CPool *, tree);
|
extern int find_fieldref_index (struct CPool *, tree);
|
extern int find_methodref_index (struct CPool *, tree);
|
extern int find_methodref_index (struct CPool *, tree);
|
extern int find_methodref_with_class_index (struct CPool *, tree, tree);
|
extern int find_methodref_with_class_index (struct CPool *, tree, tree);
|
extern void write_constant_pool (struct CPool *, unsigned char *, int);
|
extern void write_constant_pool (struct CPool *, unsigned char *, int);
|
extern int count_constant_pool_bytes (struct CPool *);
|
extern int count_constant_pool_bytes (struct CPool *);
|
extern int encode_newarray_type (tree);
|
extern int encode_newarray_type (tree);
|
#ifdef uint64
|
#ifdef uint64
|
extern void format_int (char *, jlong, int);
|
extern void format_int (char *, jlong, int);
|
extern void format_uint (char *, uint64, int);
|
extern void format_uint (char *, uint64, int);
|
#endif
|
#endif
|
extern void jcf_trim_old_input (struct JCF *);
|
extern void jcf_trim_old_input (struct JCF *);
|
#ifdef BUFSIZ
|
#ifdef BUFSIZ
|
extern void jcf_print_utf8 (FILE *, const unsigned char *, int);
|
extern void jcf_print_utf8 (FILE *, const unsigned char *, int);
|
extern void jcf_print_char (FILE *, int);
|
extern void jcf_print_char (FILE *, int);
|
extern void jcf_print_utf8_replace (FILE *, const unsigned char *, int,
|
extern void jcf_print_utf8_replace (FILE *, const unsigned char *, int,
|
int, int);
|
int, int);
|
extern const char* open_class (const char *, struct JCF *, int, const char *);
|
extern const char* open_class (const char *, struct JCF *, int, const char *);
|
#endif
|
#endif
|
extern void java_debug_context (void);
|
extern void java_debug_context (void);
|
extern void safe_layout_class (tree);
|
extern void safe_layout_class (tree);
|
|
|
extern tree get_boehm_type_descriptor (tree);
|
extern tree get_boehm_type_descriptor (tree);
|
extern bool uses_jv_markobj_p (tree);
|
extern bool uses_jv_markobj_p (tree);
|
extern bool class_has_finalize_method (tree);
|
extern bool class_has_finalize_method (tree);
|
extern void java_check_methods (tree);
|
extern void java_check_methods (tree);
|
|
|
extern void java_mangle_decl (tree);
|
extern void java_mangle_decl (tree);
|
extern tree java_mangle_class_field (struct obstack *, tree);
|
extern tree java_mangle_class_field (struct obstack *, tree);
|
extern tree java_mangle_vtable (struct obstack *, tree);
|
extern tree java_mangle_vtable (struct obstack *, tree);
|
extern tree java_mangle_resource_name (const char *);
|
extern tree java_mangle_resource_name (const char *);
|
extern void append_gpp_mangled_name (const char *, int);
|
extern void append_gpp_mangled_name (const char *, int);
|
|
|
extern void add_predefined_file (tree);
|
extern void add_predefined_file (tree);
|
extern int predefined_filename_p (tree);
|
extern int predefined_filename_p (tree);
|
|
|
extern tree decl_constant_value (tree);
|
extern tree decl_constant_value (tree);
|
|
|
extern void java_mark_class_local (tree);
|
extern void java_mark_class_local (tree);
|
|
|
extern void java_inlining_merge_static_initializers (tree, void *);
|
extern void java_inlining_merge_static_initializers (tree, void *);
|
extern void java_inlining_map_static_initializers (tree, void *);
|
extern void java_inlining_map_static_initializers (tree, void *);
|
|
|
extern void compile_resource_data (const char *name, const char *buffer, int);
|
extern void compile_resource_data (const char *name, const char *buffer, int);
|
extern void compile_resource_file (const char *, const char *);
|
extern void compile_resource_file (const char *, const char *);
|
extern void write_resource_constructor (tree *);
|
extern void write_resource_constructor (tree *);
|
extern tree build_java_empty_stmt (void);
|
extern tree build_java_empty_stmt (void);
|
extern tree add_stmt_to_compound (tree, tree, tree);
|
extern tree add_stmt_to_compound (tree, tree, tree);
|
extern tree java_add_stmt (tree);
|
extern tree java_add_stmt (tree);
|
extern tree java_add_local_var (tree decl);
|
extern tree java_add_local_var (tree decl);
|
extern tree *get_stmts (void);
|
extern tree *get_stmts (void);
|
extern void register_exception_range(struct eh_range *, int, int);
|
extern void register_exception_range(struct eh_range *, int, int);
|
|
|
extern void finish_method (tree);
|
extern void finish_method (tree);
|
extern void java_expand_body (tree);
|
extern void java_expand_body (tree);
|
|
|
extern int get_symbol_table_index (tree, tree, VEC(method_entry,gc) **);
|
extern int get_symbol_table_index (tree, tree, VEC(method_entry,gc) **);
|
|
|
extern tree make_catch_class_record (tree, tree);
|
extern tree make_catch_class_record (tree, tree);
|
extern tree emit_catch_table (tree);
|
extern tree emit_catch_table (tree);
|
|
|
extern void gen_indirect_dispatch_tables (tree type);
|
extern void gen_indirect_dispatch_tables (tree type);
|
extern int split_qualified_name (tree *left, tree *right, tree source);
|
extern int split_qualified_name (tree *left, tree *right, tree source);
|
extern int in_same_package (tree, tree);
|
extern int in_same_package (tree, tree);
|
|
|
extern void java_read_sourcefilenames (const char *fsource_filename);
|
extern void java_read_sourcefilenames (const char *fsource_filename);
|
|
|
extern void rewrite_reflection_indexes (void *);
|
extern void rewrite_reflection_indexes (void *);
|
|
|
int cxx_keyword_p (const char *name, int length);
|
int cxx_keyword_p (const char *name, int length);
|
|
|
extern GTY(()) VEC(tree,gc) *pending_static_fields;
|
extern GTY(()) VEC(tree,gc) *pending_static_fields;
|
|
|
extern void java_write_globals (void);
|
extern void java_write_globals (void);
|
|
|
#define DECL_FINAL(DECL) DECL_LANG_FLAG_3 (DECL)
|
#define DECL_FINAL(DECL) DECL_LANG_FLAG_3 (DECL)
|
|
|
/* Access flags etc for a method (a FUNCTION_DECL): */
|
/* Access flags etc for a method (a FUNCTION_DECL): */
|
|
|
#define METHOD_DUMMY(DECL) (DECL_LANG_SPECIFIC (DECL)->u.f.dummy)
|
#define METHOD_DUMMY(DECL) (DECL_LANG_SPECIFIC (DECL)->u.f.dummy)
|
|
|
#define METHOD_PUBLIC(DECL) DECL_LANG_FLAG_1 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_PUBLIC(DECL) DECL_LANG_FLAG_1 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_PRIVATE(DECL) TREE_PRIVATE (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_PRIVATE(DECL) TREE_PRIVATE (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_PROTECTED(DECL) TREE_PROTECTED (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_PROTECTED(DECL) TREE_PROTECTED (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_STATIC(DECL) DECL_LANG_FLAG_2 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_STATIC(DECL) DECL_LANG_FLAG_2 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_FINAL(DECL) DECL_FINAL (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_FINAL(DECL) DECL_FINAL (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_SYNCHRONIZED(DECL) DECL_LANG_FLAG_4 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_SYNCHRONIZED(DECL) DECL_LANG_FLAG_4 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_NATIVE(DECL) \
|
#define METHOD_NATIVE(DECL) \
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.native)
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.native)
|
#define METHOD_ABSTRACT(DECL) DECL_LANG_FLAG_5 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_ABSTRACT(DECL) DECL_LANG_FLAG_5 (FUNCTION_DECL_CHECK (DECL))
|
#define METHOD_STRICTFP(DECL) \
|
#define METHOD_STRICTFP(DECL) \
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.strictfp)
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.strictfp)
|
#define METHOD_INVISIBLE(DECL) \
|
#define METHOD_INVISIBLE(DECL) \
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.invisible)
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.invisible)
|
#define METHOD_BRIDGE(DECL) \
|
#define METHOD_BRIDGE(DECL) \
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.bridge)
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.bridge)
|
#define METHOD_VARARGS(DECL) \
|
#define METHOD_VARARGS(DECL) \
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.varargs)
|
(DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.f.varargs)
|
|
|
#define CLASS_FILE_P(NODE) TREE_LANG_FLAG_3 (NODE)
|
#define CLASS_FILE_P(NODE) TREE_LANG_FLAG_3 (NODE)
|
|
|
/* Other predicates on method decls */
|
/* Other predicates on method decls */
|
|
|
#define DECL_CONSTRUCTOR_P(DECL) DECL_LANG_FLAG_7 (FUNCTION_DECL_CHECK (DECL))
|
#define DECL_CONSTRUCTOR_P(DECL) DECL_LANG_FLAG_7 (FUNCTION_DECL_CHECK (DECL))
|
|
|
#define DECL_INIT_P(DECL) (ID_INIT_P (DECL_NAME (DECL)))
|
#define DECL_INIT_P(DECL) (ID_INIT_P (DECL_NAME (DECL)))
|
#define DECL_CLINIT_P(DECL) (ID_CLINIT_P (DECL_NAME (DECL)))
|
#define DECL_CLINIT_P(DECL) (ID_CLINIT_P (DECL_NAME (DECL)))
|
|
|
/* Predicates on method identifiers. Kept close to other macros using
|
/* Predicates on method identifiers. Kept close to other macros using
|
them */
|
them */
|
#define ID_INIT_P(ID) ((ID) == init_identifier_node)
|
#define ID_INIT_P(ID) ((ID) == init_identifier_node)
|
#define ID_CLINIT_P(ID) ((ID) == clinit_identifier_node)
|
#define ID_CLINIT_P(ID) ((ID) == clinit_identifier_node)
|
|
|
/* Access flags etc for variable/field (FIELD_DECL, VAR_DECL, or PARM_DECL): */
|
/* Access flags etc for variable/field (FIELD_DECL, VAR_DECL, or PARM_DECL): */
|
|
|
#define FIELD_PRIVATE(DECL) TREE_PRIVATE (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_PRIVATE(DECL) TREE_PRIVATE (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_PROTECTED(DECL) TREE_PROTECTED (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_PROTECTED(DECL) TREE_PROTECTED (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_PUBLIC(DECL) DECL_LANG_FLAG_1 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_PUBLIC(DECL) DECL_LANG_FLAG_1 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_STATIC(DECL) TREE_STATIC (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_STATIC(DECL) TREE_STATIC (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_FINAL(DECL) DECL_FINAL (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_FINAL(DECL) DECL_FINAL (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_VOLATILE(DECL) DECL_LANG_FLAG_4 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_VOLATILE(DECL) DECL_LANG_FLAG_4 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_TRANSIENT(DECL) DECL_LANG_FLAG_5 (VAR_OR_FIELD_CHECK (DECL))
|
#define FIELD_TRANSIENT(DECL) DECL_LANG_FLAG_5 (VAR_OR_FIELD_CHECK (DECL))
|
|
|
/* Access flags etc for a class (a TYPE_DECL): */
|
/* Access flags etc for a class (a TYPE_DECL): */
|
|
|
#define CLASS_PUBLIC(DECL) DECL_LANG_FLAG_1 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_PUBLIC(DECL) DECL_LANG_FLAG_1 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_FINAL(DECL) DECL_FINAL (TYPE_DECL_CHECK (DECL))
|
#define CLASS_FINAL(DECL) DECL_FINAL (TYPE_DECL_CHECK (DECL))
|
#define CLASS_INTERFACE(DECL) DECL_LANG_FLAG_4 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_INTERFACE(DECL) DECL_LANG_FLAG_4 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_ABSTRACT(DECL) DECL_LANG_FLAG_5 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_ABSTRACT(DECL) DECL_LANG_FLAG_5 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_SUPER(DECL) DECL_LANG_FLAG_6 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_SUPER(DECL) DECL_LANG_FLAG_6 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_STATIC(DECL) DECL_LANG_FLAG_7 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_STATIC(DECL) DECL_LANG_FLAG_7 (TYPE_DECL_CHECK (DECL))
|
#define CLASS_PRIVATE(DECL) (TYPE_PRIVATE_INNER_CLASS (TREE_TYPE (DECL)))
|
#define CLASS_PRIVATE(DECL) (TYPE_PRIVATE_INNER_CLASS (TREE_TYPE (DECL)))
|
#define CLASS_PROTECTED(DECL) (TYPE_PROTECTED_INNER_CLASS (TREE_TYPE (DECL)))
|
#define CLASS_PROTECTED(DECL) (TYPE_PROTECTED_INNER_CLASS (TREE_TYPE (DECL)))
|
#define CLASS_STRICTFP(DECL) (TYPE_STRICTFP (TREE_TYPE (DECL)))
|
#define CLASS_STRICTFP(DECL) (TYPE_STRICTFP (TREE_TYPE (DECL)))
|
#define CLASS_ENUM(DECL) (TYPE_ENUM (TREE_TYPE (DECL)))
|
#define CLASS_ENUM(DECL) (TYPE_ENUM (TREE_TYPE (DECL)))
|
#define CLASS_USES_ASSERTIONS(DECL) (TYPE_USES_ASSERTIONS (TREE_TYPE (DECL)))
|
#define CLASS_USES_ASSERTIONS(DECL) (TYPE_USES_ASSERTIONS (TREE_TYPE (DECL)))
|
#define CLASS_SYNTHETIC(DECL) (TYPE_SYNTHETIC (TREE_TYPE (DECL)))
|
#define CLASS_SYNTHETIC(DECL) (TYPE_SYNTHETIC (TREE_TYPE (DECL)))
|
#define CLASS_ANNOTATION(DECL) (TYPE_ANNOTATION (TREE_TYPE (DECL)))
|
#define CLASS_ANNOTATION(DECL) (TYPE_ANNOTATION (TREE_TYPE (DECL)))
|
|
|
/* @deprecated marker flag on methods, fields and classes */
|
/* @deprecated marker flag on methods, fields and classes */
|
|
|
#define METHOD_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define METHOD_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define FIELD_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define FIELD_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define CLASS_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define CLASS_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define DECL_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
#define DECL_DEPRECATED(DECL) DECL_LANG_FLAG_0 (DECL)
|
|
|
/* The number of virtual methods in this class's dispatch table.
|
/* The number of virtual methods in this class's dispatch table.
|
Does not include initial two dummy entries (one points to the
|
Does not include initial two dummy entries (one points to the
|
Class object, and the other is for G++ -fvtable-thunks compatibility). */
|
Class object, and the other is for G++ -fvtable-thunks compatibility). */
|
#define TYPE_NVIRTUALS(TYPE) BINFO_VIRTUALS (TYPE_BINFO (TYPE))
|
#define TYPE_NVIRTUALS(TYPE) BINFO_VIRTUALS (TYPE_BINFO (TYPE))
|
|
|
/* A TREE_VEC (indexed by DECL_VINDEX) containing this class's
|
/* A TREE_VEC (indexed by DECL_VINDEX) containing this class's
|
virtual methods. */
|
virtual methods. */
|
#define TYPE_VTABLE(TYPE) BINFO_VTABLE(TYPE_BINFO (TYPE))
|
#define TYPE_VTABLE(TYPE) BINFO_VTABLE(TYPE_BINFO (TYPE))
|
|
|
/* Use CLASS_LOADED_P? FIXME */
|
/* Use CLASS_LOADED_P? FIXME */
|
#define CLASS_COMPLETE_P(DECL) DECL_LANG_FLAG_2 (DECL)
|
#define CLASS_COMPLETE_P(DECL) DECL_LANG_FLAG_2 (DECL)
|
|
|
/* A vector used to track type states for the current method. */
|
/* A vector used to track type states for the current method. */
|
extern VEC(tree, gc) *type_states;
|
extern VEC(tree, gc) *type_states;
|
|
|
/* This maps a bytecode offset (PC) to various flags,
|
/* This maps a bytecode offset (PC) to various flags,
|
listed below (starting with BCODE_). */
|
listed below (starting with BCODE_). */
|
extern char *instruction_bits;
|
extern char *instruction_bits;
|
|
|
/* True iff the byte is the start of an instruction. */
|
/* True iff the byte is the start of an instruction. */
|
#define BCODE_INSTRUCTION_START 1
|
#define BCODE_INSTRUCTION_START 1
|
|
|
/* True iff there is a jump or a return to this location. */
|
/* True iff there is a jump or a return to this location. */
|
#define BCODE_JUMP_TARGET 2
|
#define BCODE_JUMP_TARGET 2
|
|
|
/* True iff this is the start of an exception handler. */
|
/* True iff this is the start of an exception handler. */
|
#define BCODE_EXCEPTION_TARGET 16
|
#define BCODE_EXCEPTION_TARGET 16
|
|
|
/* True iff there is a jump to this location (and it needs a label). */
|
/* True iff there is a jump to this location (and it needs a label). */
|
#define BCODE_TARGET (BCODE_JUMP_TARGET| BCODE_EXCEPTION_TARGET)
|
#define BCODE_TARGET (BCODE_JUMP_TARGET| BCODE_EXCEPTION_TARGET)
|
|
|
/* True iff there is an entry in the linenumber table for this location. */
|
/* True iff there is an entry in the linenumber table for this location. */
|
#define BCODE_HAS_LINENUMBER 32
|
#define BCODE_HAS_LINENUMBER 32
|
|
|
/* True iff there is more than one entry in the linenumber table for
|
/* True iff there is more than one entry in the linenumber table for
|
this location. (This probably does not make much sense.) */
|
this location. (This probably does not make much sense.) */
|
#define BCODE_HAS_MULTI_LINENUMBERS 64
|
#define BCODE_HAS_MULTI_LINENUMBERS 64
|
|
|
/* True if this instruction has been verified. */
|
/* True if this instruction has been verified. */
|
#define BCODE_VERIFIED 8
|
#define BCODE_VERIFIED 8
|
|
|
/* A pointer to the line number table of the current method. */
|
/* A pointer to the line number table of the current method. */
|
extern const unsigned char *linenumber_table;
|
extern const unsigned char *linenumber_table;
|
/* The length (in items) of the line number table. */
|
/* The length (in items) of the line number table. */
|
extern int linenumber_count;
|
extern int linenumber_count;
|
|
|
/* In type_map, means the second half of a 64-bit double or long. */
|
/* In type_map, means the second half of a 64-bit double or long. */
|
#define TYPE_SECOND void_type_node
|
#define TYPE_SECOND void_type_node
|
|
|
/* In type_map, means the null type (i.e. type of a null reference). */
|
/* In type_map, means the null type (i.e. type of a null reference). */
|
#define TYPE_NULL ptr_type_node
|
#define TYPE_NULL ptr_type_node
|
|
|
/* In a type map means the type the address subroutine return address. */
|
/* In a type map means the type the address subroutine return address. */
|
#define TYPE_RETURN_ADDR return_address_type_node
|
#define TYPE_RETURN_ADDR return_address_type_node
|
|
|
/* A array mapping variable/stack slot index to the type current
|
/* A array mapping variable/stack slot index to the type current
|
in that variable/stack slot.
|
in that variable/stack slot.
|
TYPE_SECOND and TYPE_NULL are special cases. */
|
TYPE_SECOND and TYPE_NULL are special cases. */
|
extern tree *type_map;
|
extern tree *type_map;
|
|
|
/* Map a stack index to the type currently in that slot. */
|
/* Map a stack index to the type currently in that slot. */
|
#define stack_type_map (type_map + DECL_MAX_LOCALS (current_function_decl))
|
#define stack_type_map (type_map + DECL_MAX_LOCALS (current_function_decl))
|
|
|
/* True iff TYPE takes two variable/stack slots. */
|
/* True iff TYPE takes two variable/stack slots. */
|
#define TYPE_IS_WIDE(TYPE) \
|
#define TYPE_IS_WIDE(TYPE) \
|
((TYPE) == double_type_node || (TYPE) == long_type_node)
|
((TYPE) == double_type_node || (TYPE) == long_type_node)
|
|
|
/* True iff TYPE is a Java array type. */
|
/* True iff TYPE is a Java array type. */
|
#define TYPE_ARRAY_P(TYPE) TYPE_LANG_FLAG_1 (TYPE)
|
#define TYPE_ARRAY_P(TYPE) TYPE_LANG_FLAG_1 (TYPE)
|
|
|
/* True for an INDIRECT_REF created from a 'ARRAY.length' operation. */
|
/* True for an INDIRECT_REF created from a 'ARRAY.length' operation. */
|
#define IS_ARRAY_LENGTH_ACCESS(NODE) TREE_LANG_FLAG_4 (NODE)
|
#define IS_ARRAY_LENGTH_ACCESS(NODE) TREE_LANG_FLAG_4 (NODE)
|
|
|
/* If FUNCTION_TYPE or METHOD_TYPE: cache for build_java_argument_signature. */
|
/* If FUNCTION_TYPE or METHOD_TYPE: cache for build_java_argument_signature. */
|
#define TYPE_ARGUMENT_SIGNATURE(TYPE) \
|
#define TYPE_ARGUMENT_SIGNATURE(TYPE) \
|
(TYPE_MINVAL (TREE_CHECK2 (TYPE, FUNCTION_TYPE, METHOD_TYPE)))
|
(TYPE_MINVAL (TREE_CHECK2 (TYPE, FUNCTION_TYPE, METHOD_TYPE)))
|
|
|
/* Given an array type, give the type of the elements. */
|
/* Given an array type, give the type of the elements. */
|
/* FIXME this use of TREE_TYPE conflicts with something or other. */
|
/* FIXME this use of TREE_TYPE conflicts with something or other. */
|
#define TYPE_ARRAY_ELEMENT(ATYPE) TREE_TYPE (ATYPE)
|
#define TYPE_ARRAY_ELEMENT(ATYPE) TREE_TYPE (ATYPE)
|
|
|
/* True if class TYPE has been loaded (i.e. parsed plus laid out).
|
/* True if class TYPE has been loaded (i.e. parsed plus laid out).
|
(The check for CLASS_PARSED_P is needed because of Object and Class.) */
|
(The check for CLASS_PARSED_P is needed because of Object and Class.) */
|
#define CLASS_LOADED_P(TYPE) (TYPE_SIZE (TYPE) != NULL_TREE \
|
#define CLASS_LOADED_P(TYPE) (TYPE_SIZE (TYPE) != NULL_TREE \
|
&& (CLASS_PARSED_P(TYPE) || TYPE_ARRAY_P(TYPE)))
|
&& (CLASS_PARSED_P(TYPE) || TYPE_ARRAY_P(TYPE)))
|
|
|
/* True if class TYPE has been parsed (first pass). */
|
/* True if class TYPE has been parsed (first pass). */
|
#define CLASS_PARSED_P(TYPE) TYPE_LANG_FLAG_2 (TYPE)
|
#define CLASS_PARSED_P(TYPE) TYPE_LANG_FLAG_2 (TYPE)
|
|
|
/* True of a RECORD_TYPE of a class/interface type (not array type) */
|
/* True of a RECORD_TYPE of a class/interface type (not array type) */
|
#define CLASS_P(TYPE) TYPE_LANG_FLAG_4 (TYPE)
|
#define CLASS_P(TYPE) TYPE_LANG_FLAG_4 (TYPE)
|
|
|
/* True if class TYPE was requested (on command line) to be compiled.*/
|
/* True if class TYPE was requested (on command line) to be compiled.*/
|
#define CLASS_FROM_CURRENTLY_COMPILED_P(TYPE) TYPE_LANG_FLAG_5 (TYPE)
|
#define CLASS_FROM_CURRENTLY_COMPILED_P(TYPE) TYPE_LANG_FLAG_5 (TYPE)
|
|
|
/* True if class TYPE is currently being laid out. Helps in detection
|
/* True if class TYPE is currently being laid out. Helps in detection
|
of inheritance cycle occurring as a side effect of performing the
|
of inheritance cycle occurring as a side effect of performing the
|
layout of a class. */
|
layout of a class. */
|
#define CLASS_BEING_LAIDOUT(TYPE) TYPE_LANG_FLAG_6 (TYPE)
|
#define CLASS_BEING_LAIDOUT(TYPE) TYPE_LANG_FLAG_6 (TYPE)
|
|
|
/* True if ID is a qualified named (contains . or /) */
|
/* True if ID is a qualified named (contains . or /) */
|
#define QUALIFIED_P(ID) TREE_LANG_FLAG_2 (ID)
|
#define QUALIFIED_P(ID) TREE_LANG_FLAG_2 (ID)
|
|
|
/* True if ID is a command-line specified filename */
|
/* True if ID is a command-line specified filename */
|
#define IS_A_COMMAND_LINE_FILENAME_P(ID) TREE_LANG_FLAG_4 (ID)
|
#define IS_A_COMMAND_LINE_FILENAME_P(ID) TREE_LANG_FLAG_4 (ID)
|
|
|
/* True if filename ID has already been parsed */
|
/* True if filename ID has already been parsed */
|
#define HAS_BEEN_ALREADY_PARSED_P(ID) TREE_LANG_FLAG_5 (ID)
|
#define HAS_BEEN_ALREADY_PARSED_P(ID) TREE_LANG_FLAG_5 (ID)
|
|
|
/* True if TYPE (a TREE_TYPE denoting a class type) was found to
|
/* True if TYPE (a TREE_TYPE denoting a class type) was found to
|
feature a finalizer method. */
|
feature a finalizer method. */
|
#define HAS_FINALIZER_P(EXPR) TREE_LANG_FLAG_3 (EXPR)
|
#define HAS_FINALIZER_P(EXPR) TREE_LANG_FLAG_3 (EXPR)
|
|
|
/* True if NODE belongs to an inner class TYPE_DECL node.
|
/* True if NODE belongs to an inner class TYPE_DECL node.
|
Verifies that NODE as the attributes of a decl. */
|
Verifies that NODE as the attributes of a decl. */
|
#define INNER_CLASS_DECL_P(NODE) (TYPE_NAME (TREE_TYPE (NODE)) == NODE \
|
#define INNER_CLASS_DECL_P(NODE) (TYPE_NAME (TREE_TYPE (NODE)) == NODE \
|
&& DECL_CONTEXT (NODE))
|
&& DECL_CONTEXT (NODE))
|
|
|
/* True if NODE belongs to an inner class RECORD_TYPE node. Checks
|
/* True if NODE belongs to an inner class RECORD_TYPE node. Checks
|
that TYPE_NAME bears a decl. An array type wouldn't. */
|
that TYPE_NAME bears a decl. An array type wouldn't. */
|
#define INNER_CLASS_TYPE_P(NODE) (TREE_CODE (TYPE_NAME (NODE)) == TYPE_DECL \
|
#define INNER_CLASS_TYPE_P(NODE) (TREE_CODE (TYPE_NAME (NODE)) == TYPE_DECL \
|
&& DECL_CONTEXT (TYPE_NAME (NODE)))
|
&& DECL_CONTEXT (TYPE_NAME (NODE)))
|
|
|
/* True if the class type NODE was declared in an inner scope and is
|
/* True if the class type NODE was declared in an inner scope and is
|
not a toplevel class */
|
not a toplevel class */
|
#define PURE_INNER_CLASS_TYPE_P(NODE) \
|
#define PURE_INNER_CLASS_TYPE_P(NODE) \
|
(INNER_CLASS_TYPE_P (NODE) && !CLASS_STATIC (TYPE_NAME (NODE)))
|
(INNER_CLASS_TYPE_P (NODE) && !CLASS_STATIC (TYPE_NAME (NODE)))
|
|
|
/* True if NODE (a TYPE_DECL or a RECORD_TYPE) is an inner class. */
|
/* True if NODE (a TYPE_DECL or a RECORD_TYPE) is an inner class. */
|
#define INNER_CLASS_P(NODE) (TREE_CODE (NODE) == TYPE_DECL ? \
|
#define INNER_CLASS_P(NODE) (TREE_CODE (NODE) == TYPE_DECL ? \
|
INNER_CLASS_DECL_P (NODE) : \
|
INNER_CLASS_DECL_P (NODE) : \
|
(TREE_CODE (NODE) == RECORD_TYPE ? \
|
(TREE_CODE (NODE) == RECORD_TYPE ? \
|
INNER_CLASS_TYPE_P (NODE) : \
|
INNER_CLASS_TYPE_P (NODE) : \
|
(abort (), 0)))
|
(abort (), 0)))
|
|
|
/* On a TYPE_DECL, hold the list of inner classes defined within the
|
/* On a TYPE_DECL, hold the list of inner classes defined within the
|
scope of TYPE_DECL. */
|
scope of TYPE_DECL. */
|
#define DECL_INNER_CLASS_LIST(NODE) DECL_INITIAL (TYPE_DECL_CHECK (NODE))
|
#define DECL_INNER_CLASS_LIST(NODE) DECL_INITIAL (TYPE_DECL_CHECK (NODE))
|
|
|
/* Add a FIELD_DECL to RECORD_TYPE RTYPE.
|
/* Add a FIELD_DECL to RECORD_TYPE RTYPE.
|
The field has name NAME (a char*), a type FTYPE, and a location of LOC.
|
The field has name NAME (a char*), a type FTYPE, and a location of LOC.
|
Unless this is the first field, FIELD most hold the previous field.
|
Unless this is the first field, FIELD most hold the previous field.
|
FIELD is set to the newly created FIELD_DECL.
|
FIELD is set to the newly created FIELD_DECL.
|
|
|
We set DECL_ARTIFICIAL so these fields get skipped by make_class_data
|
We set DECL_ARTIFICIAL so these fields get skipped by make_class_data
|
if compiling java.lang.Object or java.lang.Class. */
|
if compiling java.lang.Object or java.lang.Class. */
|
|
|
#define PUSH_FIELD(LOC, RTYPE, FIELD, NAME, FTYPE) \
|
#define PUSH_FIELD(LOC, RTYPE, FIELD, NAME, FTYPE) \
|
{ tree _field = build_decl (LOC, FIELD_DECL, get_identifier ((NAME)), (FTYPE)); \
|
{ tree _field = build_decl (LOC, FIELD_DECL, get_identifier ((NAME)), (FTYPE)); \
|
if (TYPE_FIELDS (RTYPE) == NULL_TREE) \
|
if (TYPE_FIELDS (RTYPE) == NULL_TREE) \
|
TYPE_FIELDS (RTYPE) = _field; \
|
TYPE_FIELDS (RTYPE) = _field; \
|
else \
|
else \
|
DECL_CHAIN(FIELD) = _field; \
|
DECL_CHAIN(FIELD) = _field; \
|
DECL_CONTEXT (_field) = (RTYPE); \
|
DECL_CONTEXT (_field) = (RTYPE); \
|
DECL_ARTIFICIAL (_field) = 1; \
|
DECL_ARTIFICIAL (_field) = 1; \
|
FIELD = _field; }
|
FIELD = _field; }
|
|
|
#define FINISH_RECORD(RTYPE) layout_type (RTYPE)
|
#define FINISH_RECORD(RTYPE) layout_type (RTYPE)
|
|
|
/* Start building a RECORD_TYPE constructor's elements in V. The
|
/* Start building a RECORD_TYPE constructor's elements in V. The
|
constructor will have type CTYPE. */
|
constructor will have type CTYPE. */
|
#define START_RECORD_CONSTRUCTOR(V, CTYPE) \
|
#define START_RECORD_CONSTRUCTOR(V, CTYPE) \
|
do \
|
do \
|
{ \
|
{ \
|
V = VEC_alloc (constructor_elt, gc, 0); \
|
V = VEC_alloc (constructor_elt, gc, 0); \
|
CONSTRUCTOR_APPEND_ELT (V, TYPE_FIELDS (CTYPE), NULL); \
|
CONSTRUCTOR_APPEND_ELT (V, TYPE_FIELDS (CTYPE), NULL); \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
/* Append a field initializer to V for the dummy field for the inherited
|
/* Append a field initializer to V for the dummy field for the inherited
|
fields. The dummy field has the given VALUE, and the same type as the
|
fields. The dummy field has the given VALUE, and the same type as the
|
super-class. Must be specified before calls to PUSH_FIELD_VALUE. */
|
super-class. Must be specified before calls to PUSH_FIELD_VALUE. */
|
#define PUSH_SUPER_VALUE(V, VALUE) \
|
#define PUSH_SUPER_VALUE(V, VALUE) \
|
do \
|
do \
|
{ \
|
{ \
|
constructor_elt *_elt___ = VEC_last (constructor_elt, V); \
|
constructor_elt *_elt___ = VEC_last (constructor_elt, V); \
|
tree _next___ = DECL_CHAIN (_elt___->index); \
|
tree _next___ = DECL_CHAIN (_elt___->index); \
|
gcc_assert (!DECL_NAME (_elt___->index)); \
|
gcc_assert (!DECL_NAME (_elt___->index)); \
|
_elt___->value = VALUE; \
|
_elt___->value = VALUE; \
|
CONSTRUCTOR_APPEND_ELT (V, _next___, NULL); \
|
CONSTRUCTOR_APPEND_ELT (V, _next___, NULL); \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
/* Append a field initializer to V for a field with the given VALUE.
|
/* Append a field initializer to V for a field with the given VALUE.
|
NAME is a char* string used for error checking;
|
NAME is a char* string used for error checking;
|
the initializer must be specified in order. */
|
the initializer must be specified in order. */
|
#define PUSH_FIELD_VALUE(V, NAME, VALUE) \
|
#define PUSH_FIELD_VALUE(V, NAME, VALUE) \
|
do \
|
do \
|
{ \
|
{ \
|
constructor_elt *_elt___ = VEC_last (constructor_elt, V); \
|
constructor_elt *_elt___ = VEC_last (constructor_elt, V); \
|
tree _next___ = DECL_CHAIN (_elt___->index); \
|
tree _next___ = DECL_CHAIN (_elt___->index); \
|
gcc_assert (strcmp (IDENTIFIER_POINTER (DECL_NAME (_elt___->index)), \
|
gcc_assert (strcmp (IDENTIFIER_POINTER (DECL_NAME (_elt___->index)), \
|
NAME) == 0); \
|
NAME) == 0); \
|
_elt___->value = VALUE; \
|
_elt___->value = VALUE; \
|
CONSTRUCTOR_APPEND_ELT (V, _next___, NULL); \
|
CONSTRUCTOR_APPEND_ELT (V, _next___, NULL); \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
/* Finish creating a record CONSTRUCTOR CONS with type CTYPE and elements V. */
|
/* Finish creating a record CONSTRUCTOR CONS with type CTYPE and elements V. */
|
#define FINISH_RECORD_CONSTRUCTOR(CONS, V, CTYPE) \
|
#define FINISH_RECORD_CONSTRUCTOR(CONS, V, CTYPE) \
|
do \
|
do \
|
{ \
|
{ \
|
VEC_pop (constructor_elt, V); \
|
VEC_pop (constructor_elt, V); \
|
CONS = build_constructor (CTYPE, V); \
|
CONS = build_constructor (CTYPE, V); \
|
TREE_CONSTANT (CONS) = 0; \
|
TREE_CONSTANT (CONS) = 0; \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
#define BLOCK_EXPR_DECLS(NODE) BLOCK_VARS(NODE)
|
#define BLOCK_EXPR_DECLS(NODE) BLOCK_VARS(NODE)
|
#define BLOCK_EXPR_BODY(NODE) BLOCK_SUBBLOCKS(NODE)
|
#define BLOCK_EXPR_BODY(NODE) BLOCK_SUBBLOCKS(NODE)
|
|
|
#define BUILD_MONITOR_ENTER(WHERE, ARG) \
|
#define BUILD_MONITOR_ENTER(WHERE, ARG) \
|
{ \
|
{ \
|
(WHERE) = build_call_nary (int_type_node, \
|
(WHERE) = build_call_nary (int_type_node, \
|
build_address_of (soft_monitorenter_node), \
|
build_address_of (soft_monitorenter_node), \
|
1, (ARG)); \
|
1, (ARG)); \
|
TREE_SIDE_EFFECTS (WHERE) = 1; \
|
TREE_SIDE_EFFECTS (WHERE) = 1; \
|
}
|
}
|
|
|
#define BUILD_MONITOR_EXIT(WHERE, ARG) \
|
#define BUILD_MONITOR_EXIT(WHERE, ARG) \
|
{ \
|
{ \
|
(WHERE) = build_call_nary (int_type_node, \
|
(WHERE) = build_call_nary (int_type_node, \
|
build_address_of (soft_monitorexit_node), \
|
build_address_of (soft_monitorexit_node), \
|
1, (ARG)); \
|
1, (ARG)); \
|
TREE_SIDE_EFFECTS (WHERE) = 1; \
|
TREE_SIDE_EFFECTS (WHERE) = 1; \
|
}
|
}
|
|
|
/* True when we can perform static class initialization optimization */
|
/* True when we can perform static class initialization optimization */
|
#define STATIC_CLASS_INIT_OPT_P() \
|
#define STATIC_CLASS_INIT_OPT_P() \
|
(flag_optimize_sci && (optimize >= 2))
|
(flag_optimize_sci && (optimize >= 2))
|
|
|
/* These are the possible values for the `state' field of the class
|
/* These are the possible values for the `state' field of the class
|
structure. This must be kept in sync with libgcj. */
|
structure. This must be kept in sync with libgcj. */
|
enum
|
enum
|
{
|
{
|
JV_STATE_NOTHING = 0, /* Set by compiler. */
|
JV_STATE_NOTHING = 0, /* Set by compiler. */
|
|
|
JV_STATE_PRELOADING = 1, /* Can do _Jv_FindClass. */
|
JV_STATE_PRELOADING = 1, /* Can do _Jv_FindClass. */
|
JV_STATE_LOADING = 3, /* Has super installed. */
|
JV_STATE_LOADING = 3, /* Has super installed. */
|
JV_STATE_READ = 4, /* Has been completely defined. */
|
JV_STATE_READ = 4, /* Has been completely defined. */
|
JV_STATE_LOADED = 5, /* Has Miranda methods defined. */
|
JV_STATE_LOADED = 5, /* Has Miranda methods defined. */
|
|
|
JV_STATE_COMPILED = 6, /* This was a compiled class. */
|
JV_STATE_COMPILED = 6, /* This was a compiled class. */
|
|
|
JV_STATE_PREPARED = 7, /* Layout & static init done. */
|
JV_STATE_PREPARED = 7, /* Layout & static init done. */
|
JV_STATE_LINKED = 9, /* Strings interned. */
|
JV_STATE_LINKED = 9, /* Strings interned. */
|
|
|
JV_STATE_IN_PROGRESS = 10, /* <Clinit> running. */
|
JV_STATE_IN_PROGRESS = 10, /* <Clinit> running. */
|
JV_STATE_ERROR = 12,
|
JV_STATE_ERROR = 12,
|
|
|
JV_STATE_DONE = 14 /* Must be last. */
|
JV_STATE_DONE = 14 /* Must be last. */
|
};
|
};
|
|
|
#undef DEBUG_JAVA_BINDING_LEVELS
|
#undef DEBUG_JAVA_BINDING_LEVELS
|
|
|
extern void java_genericize (tree);
|
extern void java_genericize (tree);
|
extern int java_gimplify_expr (tree *, gimple_seq *, gimple_seq *);
|
extern int java_gimplify_expr (tree *, gimple_seq *, gimple_seq *);
|
|
|
extern FILE *finput;
|
extern FILE *finput;
|
|
|
#endif /* ! GCC_JAVA_TREE_H */
|
#endif /* ! GCC_JAVA_TREE_H */
|
|
|
