struct demangle_component;
/* This struct is designed to store data from using directives. It
- says that names from namespace IMPORT_SRC should be visible within
- namespace IMPORT_DEST. IMPORT_DEST should always be a strict initial
- substring of IMPORT_SRC. These form a linked list; NEXT is the next element
- of the list. */
+ says that names from namespace IMPORT_SRC should be visible within namespace
+ IMPORT_DEST. These form a linked list; NEXT is the next element of the
+ list. If the imported namespace or declaration has been aliased within the
+ IMPORT_DEST namespace, ALIAS is set to a string representing the alias.
+ Otherwise, ALIAS is NULL. DECLARATION is the name of the imported
+ declaration, if this import statement represents one. Otherwise DECLARATION
+ is NULL and this import statement represents a namespace.
+
+ C++: using namespace A;
+ Fortran: use A
+ import_src = "A"
+ import_dest = local scope of the import statement even such as ""
+ alias = NULL
+ declaration = NULL
+
+ C++: using A::x;
+ Fortran: use A, only: x
+ import_src = "A"
+ import_dest = local scope of the import statement even such as ""
+ alias = NULL
+ declaration = "x"
+ The declaration will get imported as import_dest::x.
+
+ C++: namespace LOCALNS = A;
+ Fortran has no way to address non-local namespace/module.
+ import_src = "A"
+ import_dest = local scope of the import statement even such as ""
+ alias = "LOCALNS"
+ declaration = NULL
+ The namespace will get imported as the import_dest::LOCALNS namespace.
+
+ C++ cannot express it, it would be something like: using localname = A::x;
+ Fortran: use A, only localname => x
+ import_src = "A"
+ import_dest = local scope of the import statement even such as ""
+ alias = "localname"
+ declaration = "x"
+ The declaration will get imported as localname or `import_dest`localname. */
struct using_direct
{
char *import_src;
char *import_dest;
+
+ char *alias;
+ char *declaration;
+
struct using_direct *next;
+
+ /* Used during import search to temporarily mark this node as searched. */
+ int searched;
};
extern struct symbol **make_symbol_overload_list (const char *,
const char *);
+extern struct symbol **make_symbol_overload_list_adl (struct type **arg_types,
+ int nargs,
+ const char *func_name);
+
extern struct type *cp_lookup_rtti_type (const char *name,
struct block *block);
extern int cp_is_anonymous (const char *namespace);
extern void cp_add_using_directive (const char *dest,
- const char *src);
-
-extern struct using_direct *cp_add_using (const char *dest,
- const char *src,
- struct using_direct *next);
+ const char *src,
+ const char *alias,
+ const char *declaration,
+ struct obstack *obstack);
extern void cp_initialize_namespace (void);
extern void cp_scan_for_anonymous_namespaces (const struct symbol *symbol);
extern struct symbol *cp_lookup_symbol_nonlocal (const char *name,
- const char *linkage_name,
const struct block *block,
const domain_enum domain);
extern struct symbol *cp_lookup_symbol_namespace (const char *namespace,
const char *name,
- const char *linkage_name,
const struct block *block,
const domain_enum domain);
+extern struct symbol *cp_lookup_symbol_imports (const char *scope,
+ const char *name,
+ const struct block *block,
+ const domain_enum domain,
+ const int declaration_only,
+ const int search_parents);
+
extern struct type *cp_lookup_nested_type (struct type *parent_type,
const char *nested_name,
const struct block *block);