------------------------------------------------------------------------------
-- --
-- AVATOX COMPONENTS --
-- --
-- VATOX (Via Asis To Xml) --st
-- --
-- --
-- Copyright (c) 2007, McKae Technologies. --
-- --
-- Avatox is free software; you can redistribute it and/or modify it --
-- under terms of the GNU General Public License as published by the Free --
-- Software Foundation; either version 2, or (at your option) any later --
-- version. Avatox is distributed in the hope that it will be useful, --
-- but WITHOUT ANY WARRANTY; without even the implied warranty of MER- --
-- CHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General --
-- Public License for more details. You should have received a copy of the --
-- GNU General Public License distributed with GNAT; see file COPYING. If --
-- not, write to the Free Software Foundation, 59 Temple Place Suite 330, --
-- Boston, MA 02111-1307, USA. --
-- --
-- Avatox is now maintained by McKae Technologies (http://www.mckae.com) -- --
------------------------------------------------------------------------------
with Ada.Strings.Wide_Unbounded;
package Vatox.Axf_Points.References is
----------------------------------------------------------------------------
-- Scope/nesting information about identifiers is added to aid determining
-- whether multiple appearances of the same identifer name refer to the
-- same or different entities.
--
-- The structure of the scope name ID is a list of scope/namespace names,
-- from highest to lowest, delimited by blanks. The reason blanks are used
-- is because no programming language of any reasonably widespread usage
-- allows blanks as part of identifier names.
Axf_Scope_ID_Attr : constant String := "axfScope";
-- The individual declaration enclosing scopes are output as axfPoint
-- elements so that the scope ID string doesn't have to be parsed to get
-- at the individual scope levels.
Axf_Scope_Name_Attr : constant String := "axfScopeName";
Axf_Scope_Level_Attr : constant String := "axfScopeLevel";
-- Cross-references of identifiers, operator symbols, and enumeration and
-- character literals are handle analogously to the scope enclosures.
Axf_Xref_ID_Attr : constant String := "axfXref";
Axf_Xref_Name_Attr : constant String := "axfXrefName";
Axf_Xref_Level_Attr : constant String := "axfXrefLevel";
-- Structure for returning a list of scope names
type Ref_List is array (Positive range <>)
of Ada.Strings.Wide_Unbounded.Unbounded_Wide_String;
end Vatox.Axf_Points.References;