|
|
|
|
|
00001 // This file has been modified on-the-fly with an input filter 00002 // to change it from Perl syntax to C++ strictly for the purposes 00003 // of faking out Doxygen. Modifications include: 00004 00005 // - changing local() definitions to C++ #define statements. 00006 // - commenting out undef statements. 00007 // - changing $globe'... variable names to $globe_... 00008 // - changing sub statements to look like C++ functions. 00009 // - changing # comments to C++ comments. 00010 // - ... 00011 00012 // If you see other strangeness in the HTML version of the Perl file, 00013 // it comes from getting it to look more C++ like. 00014 00015 00016 /////////////////////////////////////////////////////////////// 00017 //! @file 00018 //! @brief Defines the data structures used to convert an 00019 //! xml file into another format. 00020 //! 00021 //! This is defined in C++ for easy incorporation into other 00022 //! applications (e.g., diagMenu). However, it is used 00023 //! by perl. 00024 //! 00025 //! The intent is to have the definition in one place so 00026 //! that changes to our in-house xml files can be understood 00027 //! quickly by all applicable programs. 00028 //! 00029 // $Id: $ 00030 // 00031 // Revision Information: 00032 // 00033 // $Log: $ 00034 /////////////////////////////////////////////////////////////// 00035 00036 00037 00038 /////////////////////////////////////////////////////////////// 00039 //! The xml tags look similar to: 00040 //! <diagmenu item="/IMOD" audience="manufacturing"> 00041 //! </diagmenu item="/IMOD" audience="manufacturing"> 00042 //! 00043 //! The internal modifiers (e.g., item, audience) can be in 00044 //! any order with any amount of white space in between. 00045 //! There can also be any amount of white space on either side 00046 //! of equals sign (=). 00047 //! 00048 //! The opening and closing tags (diagmenu) and modifiers 00049 //! (item, audience) _are_ case sensitive. 00050 //! The contents of the (item) modifier _is_ case sensitive. 00051 //! The contents of the (audience) modifier is _not_ case 00052 //! sensitive. 00053 //! 00054 /////////////////////////////////////////////////////////////// 00055 00056 /////////////////////////////////////////////////////////////// 00057 //! @brief Specifies the starting and ending characters for 00058 //! all xml tags. 00059 //! %perl% @xmlTagDelimiter = ("<", ">", "</", ">") 00060 //! $xmlTagDelimiter{start} = 00061 /////////////////////////////////////////////////////////////// 00062 const char *xmlTagDelimiter[4] = {"<", ">", "</", ">"}; 00063 00064 /////////////////////////////////////////////////////////////// 00065 //! @brief Specifies the valid xml tags. 00066 //! %perl% @xmlTags = ("diagmenu", "xhelp"); 00067 /////////////////////////////////////////////////////////////// 00068 const char *xmlTags[] = {"diagmenu", "xhelp"}; 00069 00070 /////////////////////////////////////////////////////////////// 00071 //! @brief Specifies the allowable modifiers for a particular 00072 //! xml tag. 00073 //! %perl% @{$xmlTags{diagmenu}{modifier}} = ("item", "audience"); 00074 //! $xmlTags{diagmenu}{modifier}[0] = "item" 00075 //! $xmlTags{diagmenu}{modifier}[1] = "audience" 00076 /////////////////////////////////////////////////////////////// 00077 const char *diagmenu[] = {"item", "audience"}; 00078 const char *xhelp[] = {"item", "audience"}; 00079 00080 /////////////////////////////////////////////////////////////// 00081 //! @brief Specifies the allowable values for a particular 00082 //! xml tag modifier. 00083 //! %perl% @{$xmlTags{diagmenu}{audience}} = ("customer", "manufacturing", "engineering"); 00084 //! $xmlTags{diagmenu}{audience}[0] = "customer"; 00085 //! $xmlTags{diagmenu}{audience}[1] = "manufacturing"; 00086 //! $xmlTags{diagmenu}{audience}[2] = "engineering"; 00087 /////////////////////////////////////////////////////////////// 00088 const char *audience[] = {"customer", "manufacturing", "engineering"}; 00089 00090
|
|
|
Open-Source tools compliments of Voyant Technologies, Inc. and Glenn C. Maxey.
01/13/2003
TP Tools v2-00-0a
# tpt-perl-hcr-02