stage4/generate_cc/search_constant_type.cc
changeset 33 4507beb2aac6
parent 32 289256ec66f1
equal deleted inserted replaced
32:289256ec66f1 33:4507beb2aac6
    41 /**********************/
    41 /**********************/
    42 /***********************************/
    42 /***********************************/
    43 /* B 1.3.1 - Elementary Data Types */
    43 /* B 1.3.1 - Elementary Data Types */
    44 /***********************************/
    44 /***********************************/
    45   static real_type_name_c     real_type_name;
    45   static real_type_name_c     real_type_name;
    46   static int_type_name_c      int_type_name;
    46   static sint_type_name_c     sint_type_name;
    47   static string_type_name_c   string_type_name;
    47   static lint_type_name_c     lint_type_name;
    48   static wstring_type_name_c  wstring_type_name;
    48   static dint_type_name_c     dint_type_name;
       
    49   static date_type_name_c     date_type_name;
       
    50   static dword_type_name_c     dword_type_name;
       
    51   static dt_type_name_c     dt_type_name;
       
    52   static tod_type_name_c     tod_type_name;
       
    53   static udint_type_name_c     udint_type_name;
       
    54   static word_type_name_c     word_type_name;
       
    55   static wstring_type_name_c     wstring_type_name;
       
    56   static string_type_name_c     string_type_name;
       
    57   static lword_type_name_c     lword_type_name;
       
    58   static uint_type_name_c     uint_type_name;
       
    59   static lreal_type_name_c     lreal_type_name;
       
    60   static byte_type_name_c     byte_type_name;
       
    61   static usint_type_name_c     usint_type_name;
       
    62   static ulint_type_name_c     ulint_type_name;
       
    63   static bool_type_name_c     bool_type_name;
    49   static time_type_name_c     time_type_name;
    64   static time_type_name_c     time_type_name;
    50   static date_type_name_c     date_type_name;
    65   static int_type_name_c     int_type_name;
    51   static dt_type_name_c       dt_type_name;
       
    52   static tod_type_name_c      tod_type_name;
       
    53 
    66 
    54   static constant_real_type_name_c     constant_real_type_name;
    67   static constant_real_type_name_c     constant_real_type_name;
    55   static constant_int_type_name_c      constant_int_type_name;
    68   static constant_int_type_name_c      constant_int_type_name;
    56 
    69 
    57   public:
    70   public:
   113     void *visit(date_c *symbol) {return (void *)&date_type_name;}
   126     void *visit(date_c *symbol) {return (void *)&date_type_name;}
   114     void *visit(date_literal_c *symbol) {ERROR; return NULL;}  /* this member function should never be called. */
   127     void *visit(date_literal_c *symbol) {ERROR; return NULL;}  /* this member function should never be called. */
   115     void *visit(date_and_time_c *symbol) {return (void *)&dt_type_name;}
   128     void *visit(date_and_time_c *symbol) {return (void *)&dt_type_name;}
   116 };
   129 };
   117 
   130 
       
   131 
   118 real_type_name_c     search_constant_type_c::real_type_name;
   132 real_type_name_c     search_constant_type_c::real_type_name;
   119 int_type_name_c      search_constant_type_c::int_type_name;
   133 sint_type_name_c     search_constant_type_c::sint_type_name;
   120 string_type_name_c   search_constant_type_c::string_type_name;
   134 lint_type_name_c     search_constant_type_c::lint_type_name;
   121 wstring_type_name_c  search_constant_type_c::wstring_type_name;
   135 dint_type_name_c     search_constant_type_c::dint_type_name;
       
   136 date_type_name_c     search_constant_type_c::date_type_name;
       
   137 dword_type_name_c     search_constant_type_c::dword_type_name;
       
   138 dt_type_name_c     search_constant_type_c::dt_type_name;
       
   139 tod_type_name_c     search_constant_type_c::tod_type_name;
       
   140 udint_type_name_c     search_constant_type_c::udint_type_name;
       
   141 word_type_name_c     search_constant_type_c::word_type_name;
       
   142 wstring_type_name_c     search_constant_type_c::wstring_type_name;
       
   143 string_type_name_c     search_constant_type_c::string_type_name;
       
   144 lword_type_name_c     search_constant_type_c::lword_type_name;
       
   145 uint_type_name_c     search_constant_type_c::uint_type_name;
       
   146 lreal_type_name_c     search_constant_type_c::lreal_type_name;
       
   147 byte_type_name_c     search_constant_type_c::byte_type_name;
       
   148 usint_type_name_c     search_constant_type_c::usint_type_name;
       
   149 ulint_type_name_c     search_constant_type_c::ulint_type_name;
       
   150 bool_type_name_c     search_constant_type_c::bool_type_name;
   122 time_type_name_c     search_constant_type_c::time_type_name;
   151 time_type_name_c     search_constant_type_c::time_type_name;
   123 date_type_name_c     search_constant_type_c::date_type_name;
   152 int_type_name_c     search_constant_type_c::int_type_name;
   124 dt_type_name_c       search_constant_type_c::dt_type_name;
       
   125 tod_type_name_c      search_constant_type_c::tod_type_name;
       
   126 
   153 
   127 constant_real_type_name_c     search_constant_type_c::constant_real_type_name;
   154 constant_real_type_name_c     search_constant_type_c::constant_real_type_name;
   128 constant_int_type_name_c      search_constant_type_c::constant_int_type_name;
   155 constant_int_type_name_c      search_constant_type_c::constant_int_type_name;
   129 
   156 
   130 
   157