74 * as our default value!! |
74 * as our default value!! |
75 */ |
75 */ |
76 date_literal_0 = new date_literal_c(integer_1, integer_1, integer_1); |
76 date_literal_0 = new date_literal_c(integer_1, integer_1, integer_1); |
77 date_literal_0 = new date_literal_c(new integer_c("1970"), integer_1, integer_1); |
77 date_literal_0 = new date_literal_c(new integer_c("1970"), integer_1, integer_1); |
78 daytime_literal_0 = new daytime_c(integer_0, integer_0, real_0); |
78 daytime_literal_0 = new daytime_c(integer_0, integer_0, real_0); |
79 time_0 = new duration_c(NULL, new seconds_c(integer_0, NULL)); // T#0S |
79 time_0 = new duration_c(new time_type_name_c(), NULL, new seconds_c(integer_0, NULL)); // T#0S |
80 date_0 = new date_c(date_literal_0); // D#0001-01-01 |
80 date_0 = new date_c(new date_type_name_c(), date_literal_0); // D#0001-01-01 |
81 tod_0 = new time_of_day_c(daytime_literal_0); // TOD#00:00:00 |
81 tod_0 = new time_of_day_c(new tod_type_name_c(), daytime_literal_0); // TOD#00:00:00 |
82 dt_0 = new date_and_time_c(date_literal_0, daytime_literal_0); // DT#0001-01-01-00:00:00 |
82 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 |
83 string_0 = new single_byte_character_string_c("''"); |
83 string_0 = new single_byte_character_string_c("''"); |
84 wstring_0 = new double_byte_character_string_c("\"\""); |
84 wstring_0 = new double_byte_character_string_c("\"\""); |
85 |
85 |
86 return _instance; |
86 return _instance; |
87 } |
87 } |
126 } |
126 } |
127 |
127 |
128 /***********************************/ |
128 /***********************************/ |
129 /* B 1.3.1 - Elementary Data Types */ |
129 /* B 1.3.1 - Elementary Data Types */ |
130 /***********************************/ |
130 /***********************************/ |
131 void *type_initial_value_c::visit(time_type_name_c *symbol) {return (void *)time_0;} |
131 void *type_initial_value_c::visit(time_type_name_c *symbol) {return (void *)time_0;} |
132 void *type_initial_value_c::visit(bool_type_name_c *symbol) {return (void *)bool_0;} |
132 void *type_initial_value_c::visit(bool_type_name_c *symbol) {return (void *)bool_0;} |
133 void *type_initial_value_c::visit(sint_type_name_c *symbol) {return (void *)integer_0;} |
133 void *type_initial_value_c::visit(sint_type_name_c *symbol) {return (void *)integer_0;} |
134 void *type_initial_value_c::visit(int_type_name_c *symbol) {return (void *)integer_0;} |
134 void *type_initial_value_c::visit(int_type_name_c *symbol) {return (void *)integer_0;} |
135 void *type_initial_value_c::visit(dint_type_name_c *symbol) {return (void *)integer_0;} |
135 void *type_initial_value_c::visit(dint_type_name_c *symbol) {return (void *)integer_0;} |
136 void *type_initial_value_c::visit(lint_type_name_c *symbol) {return (void *)integer_0;} |
136 void *type_initial_value_c::visit(lint_type_name_c *symbol) {return (void *)integer_0;} |
137 void *type_initial_value_c::visit(usint_type_name_c *symbol) {return (void *)integer_0;} |
137 void *type_initial_value_c::visit(usint_type_name_c *symbol) {return (void *)integer_0;} |
138 void *type_initial_value_c::visit(uint_type_name_c *symbol) {return (void *)integer_0;} |
138 void *type_initial_value_c::visit(uint_type_name_c *symbol) {return (void *)integer_0;} |
139 void *type_initial_value_c::visit(udint_type_name_c *symbol) {return (void *)integer_0;} |
139 void *type_initial_value_c::visit(udint_type_name_c *symbol) {return (void *)integer_0;} |
140 void *type_initial_value_c::visit(ulint_type_name_c *symbol) {return (void *)integer_0;} |
140 void *type_initial_value_c::visit(ulint_type_name_c *symbol) {return (void *)integer_0;} |
141 void *type_initial_value_c::visit(real_type_name_c *symbol) {return (void *)real_0;} |
141 void *type_initial_value_c::visit(real_type_name_c *symbol) {return (void *)real_0;} |
142 void *type_initial_value_c::visit(lreal_type_name_c *symbol) {return (void *)real_0;} |
142 void *type_initial_value_c::visit(lreal_type_name_c *symbol) {return (void *)real_0;} |
143 void *type_initial_value_c::visit(date_type_name_c *symbol) {return (void *)date_0;} |
143 void *type_initial_value_c::visit(date_type_name_c *symbol) {return (void *)date_0;} |
144 void *type_initial_value_c::visit(tod_type_name_c *symbol) {return (void *)tod_0;} |
144 void *type_initial_value_c::visit(tod_type_name_c *symbol) {return (void *)tod_0;} |
145 void *type_initial_value_c::visit(dt_type_name_c *symbol) {return (void *)dt_0;} |
145 void *type_initial_value_c::visit(dt_type_name_c *symbol) {return (void *)dt_0;} |
146 void *type_initial_value_c::visit(byte_type_name_c *symbol) {return (void *)integer_0;} |
146 void *type_initial_value_c::visit(byte_type_name_c *symbol) {return (void *)integer_0;} |
147 void *type_initial_value_c::visit(word_type_name_c *symbol) {return (void *)integer_0;} |
147 void *type_initial_value_c::visit(word_type_name_c *symbol) {return (void *)integer_0;} |
148 void *type_initial_value_c::visit(dword_type_name_c *symbol) {return (void *)integer_0;} |
148 void *type_initial_value_c::visit(dword_type_name_c *symbol) {return (void *)integer_0;} |
149 void *type_initial_value_c::visit(lword_type_name_c *symbol) {return (void *)integer_0;} |
149 void *type_initial_value_c::visit(lword_type_name_c *symbol) {return (void *)integer_0;} |
150 void *type_initial_value_c::visit(string_type_name_c *symbol) {return (void *)string_0;} |
150 void *type_initial_value_c::visit(string_type_name_c *symbol) {return (void *)string_0;} |
151 void *type_initial_value_c::visit(wstring_type_name_c *symbol) {return (void *)wstring_0;} |
151 void *type_initial_value_c::visit(wstring_type_name_c *symbol) {return (void *)wstring_0;} |
|
152 |
|
153 void *type_initial_value_c::visit(safetime_type_name_c *symbol) {return (void *)time_0;} |
|
154 void *type_initial_value_c::visit(safebool_type_name_c *symbol) {return (void *)bool_0;} |
|
155 void *type_initial_value_c::visit(safesint_type_name_c *symbol) {return (void *)integer_0;} |
|
156 void *type_initial_value_c::visit(safeint_type_name_c *symbol) {return (void *)integer_0;} |
|
157 void *type_initial_value_c::visit(safedint_type_name_c *symbol) {return (void *)integer_0;} |
|
158 void *type_initial_value_c::visit(safelint_type_name_c *symbol) {return (void *)integer_0;} |
|
159 void *type_initial_value_c::visit(safeusint_type_name_c *symbol) {return (void *)integer_0;} |
|
160 void *type_initial_value_c::visit(safeuint_type_name_c *symbol) {return (void *)integer_0;} |
|
161 void *type_initial_value_c::visit(safeudint_type_name_c *symbol) {return (void *)integer_0;} |
|
162 void *type_initial_value_c::visit(safeulint_type_name_c *symbol) {return (void *)integer_0;} |
|
163 void *type_initial_value_c::visit(safereal_type_name_c *symbol) {return (void *)real_0;} |
|
164 void *type_initial_value_c::visit(safelreal_type_name_c *symbol) {return (void *)real_0;} |
|
165 void *type_initial_value_c::visit(safedate_type_name_c *symbol) {return (void *)date_0;} |
|
166 void *type_initial_value_c::visit(safetod_type_name_c *symbol) {return (void *)tod_0;} |
|
167 void *type_initial_value_c::visit(safedt_type_name_c *symbol) {return (void *)dt_0;} |
|
168 void *type_initial_value_c::visit(safebyte_type_name_c *symbol) {return (void *)integer_0;} |
|
169 void *type_initial_value_c::visit(safeword_type_name_c *symbol) {return (void *)integer_0;} |
|
170 void *type_initial_value_c::visit(safedword_type_name_c *symbol) {return (void *)integer_0;} |
|
171 void *type_initial_value_c::visit(safelword_type_name_c *symbol) {return (void *)integer_0;} |
|
172 void *type_initial_value_c::visit(safestring_type_name_c *symbol) {return (void *)string_0;} |
|
173 void *type_initial_value_c::visit(safewstring_type_name_c *symbol) {return (void *)wstring_0;} |
152 |
174 |
153 /********************************/ |
175 /********************************/ |
154 /* B 1.3.3 - Derived data types */ |
176 /* B 1.3.3 - Derived data types */ |
155 /********************************/ |
177 /********************************/ |
156 /* simple_type_name ':' simple_spec_init */ |
178 /* simple_type_name ':' simple_spec_init */ |