absyntax_utils/type_initial_value.cc
changeset 625 c0bda77b37a0
parent 547 dab341e80664
child 762 a3d917474ae4
equal deleted inserted replaced
412:aad38592bdde 625:c0bda77b37a0
    82    * as our default value!!
    82    * as our default value!!
    83    */
    83    */
    84     date_literal_0 =  new date_literal_c(integer_1, integer_1, integer_1);
    84     date_literal_0 =  new date_literal_c(integer_1, integer_1, integer_1);
    85   date_literal_0 =  new date_literal_c(new integer_c("1970"), integer_1, integer_1);
    85   date_literal_0 =  new date_literal_c(new integer_c("1970"), integer_1, integer_1);
    86   daytime_literal_0 = new daytime_c(integer_0, integer_0, real_0);
    86   daytime_literal_0 = new daytime_c(integer_0, integer_0, real_0);
    87   time_0 = new duration_c(new time_type_name_c(), NULL, new seconds_c(integer_0, NULL));  // T#0S
    87   time_0 = new duration_c(new time_type_name_c(), NULL, new interval_c(NULL, NULL, NULL, integer_0, NULL));  // T#0s
    88   date_0 = new date_c(new date_type_name_c(), date_literal_0);  //  D#0001-01-01
    88   date_0 = new date_c(new date_type_name_c(), date_literal_0);  //  D#0001-01-01
    89   tod_0 = new time_of_day_c(new tod_type_name_c(), daytime_literal_0);  //  TOD#00:00:00
    89   tod_0 = new time_of_day_c(new tod_type_name_c(), daytime_literal_0);  //  TOD#00:00:00
    90   dt_0 = new date_and_time_c(new dt_type_name_c(), date_literal_0, daytime_literal_0);  //  DT#0001-01-01-00:00:00
    90   dt_0 = new date_and_time_c(new dt_type_name_c(), date_literal_0, daytime_literal_0);  //  DT#0001-01-01-00:00:00
    91   string_0  = new single_byte_character_string_c("''");
    91   string_0  = new single_byte_character_string_c("''");
    92   wstring_0 = new double_byte_character_string_c("\"\"");
    92   wstring_0 = new double_byte_character_string_c("\"\"");
   364  * that the above declaration gets stored in a
   364  * that the above declaration gets stored in a
   365  * simple_type_declaration_c, and not in a string_type_declaration_c
   365  * simple_type_declaration_c, and not in a string_type_declaration_c
   366  * as would be expected!
   366  * as would be expected!
   367  */
   367  */
   368 /*  string_type_name ':' elementary_string_type_name string_type_declaration_size string_type_declaration_init */
   368 /*  string_type_name ':' elementary_string_type_name string_type_declaration_size string_type_declaration_init */
   369 #if 0
   369 // SYM_REF4(string_type_declaration_c,	string_type_name,
   370 SYM_REF4(string_type_declaration_c,	string_type_name,
   370 // 					elementary_string_type_name,
   371 					elementary_string_type_name,
   371 // 					string_type_declaration_size,
   372 					string_type_declaration_size,
   372 // 					string_type_declaration_init) /* may be == NULL! */
   373 					string_type_declaration_init) /* may be == NULL! */
   373 void *type_initial_value_c::visit(string_type_declaration_c *symbol)	{
   374 #endif
   374   return handle_type_spec(symbol->elementary_string_type_name, symbol->string_type_declaration_init);
   375 void *type_initial_value_c::visit(string_type_declaration_c *symbol)	{return NULL;}
   375 }
   376 
   376 
   377 
   377 
   378 type_initial_value_c	*type_initial_value_c::_instance = NULL;
   378 type_initial_value_c	*type_initial_value_c::_instance = NULL;
   379 real_c			*type_initial_value_c::real_0 = NULL;
   379 real_c			*type_initial_value_c::real_0 = NULL;
   380 integer_c		*type_initial_value_c::integer_0 = NULL;
   380 integer_c		*type_initial_value_c::integer_0 = NULL;