stage4/generate_cc/get_function_type_decl.c
changeset 33 4507beb2aac6
child 35 9f3d6c089533
equal deleted inserted replaced
32:289256ec66f1 33:4507beb2aac6
       
     1 
       
     2 /****
       
     3  * IEC 61131-3 standard function lib
       
     4  * generated code, do not edit by hand
       
     5  */
       
     6 function_type_t get_function_type(identifier_c *function_name) {
       
     7 
       
     8 	if (!strcasecmp(function_name->value, "REAL_TO_REAL"))
       
     9 		return function_real_to_real;
       
    10 
       
    11 	if (!strcasecmp(function_name->value, "REAL_TO_SINT"))
       
    12 		return function_real_to_sint;
       
    13 
       
    14 	if (!strcasecmp(function_name->value, "REAL_TO_LINT"))
       
    15 		return function_real_to_lint;
       
    16 
       
    17 	if (!strcasecmp(function_name->value, "REAL_TO_DINT"))
       
    18 		return function_real_to_dint;
       
    19 
       
    20 	if (!strcasecmp(function_name->value, "REAL_TO_DATE"))
       
    21 		return function_real_to_date;
       
    22 
       
    23 	if (!strcasecmp(function_name->value, "REAL_TO_DWORD"))
       
    24 		return function_real_to_dword;
       
    25 
       
    26 	if (!strcasecmp(function_name->value, "REAL_TO_DT"))
       
    27 		return function_real_to_dt;
       
    28 
       
    29 	if (!strcasecmp(function_name->value, "REAL_TO_TOD"))
       
    30 		return function_real_to_tod;
       
    31 
       
    32 	if (!strcasecmp(function_name->value, "REAL_TO_UDINT"))
       
    33 		return function_real_to_udint;
       
    34 
       
    35 	if (!strcasecmp(function_name->value, "REAL_TO_WORD"))
       
    36 		return function_real_to_word;
       
    37 
       
    38 	if (!strcasecmp(function_name->value, "REAL_TO_WSTRING"))
       
    39 		return function_real_to_wstring;
       
    40 
       
    41 	if (!strcasecmp(function_name->value, "REAL_TO_STRING"))
       
    42 		return function_real_to_string;
       
    43 
       
    44 	if (!strcasecmp(function_name->value, "REAL_TO_LWORD"))
       
    45 		return function_real_to_lword;
       
    46 
       
    47 	if (!strcasecmp(function_name->value, "REAL_TO_UINT"))
       
    48 		return function_real_to_uint;
       
    49 
       
    50 	if (!strcasecmp(function_name->value, "REAL_TO_LREAL"))
       
    51 		return function_real_to_lreal;
       
    52 
       
    53 	if (!strcasecmp(function_name->value, "REAL_TO_BYTE"))
       
    54 		return function_real_to_byte;
       
    55 
       
    56 	if (!strcasecmp(function_name->value, "REAL_TO_USINT"))
       
    57 		return function_real_to_usint;
       
    58 
       
    59 	if (!strcasecmp(function_name->value, "REAL_TO_ULINT"))
       
    60 		return function_real_to_ulint;
       
    61 
       
    62 	if (!strcasecmp(function_name->value, "REAL_TO_BOOL"))
       
    63 		return function_real_to_bool;
       
    64 
       
    65 	if (!strcasecmp(function_name->value, "REAL_TO_TIME"))
       
    66 		return function_real_to_time;
       
    67 
       
    68 	if (!strcasecmp(function_name->value, "REAL_TO_INT"))
       
    69 		return function_real_to_int;
       
    70 
       
    71 	if (!strcasecmp(function_name->value, "SINT_TO_REAL"))
       
    72 		return function_sint_to_real;
       
    73 
       
    74 	if (!strcasecmp(function_name->value, "SINT_TO_SINT"))
       
    75 		return function_sint_to_sint;
       
    76 
       
    77 	if (!strcasecmp(function_name->value, "SINT_TO_LINT"))
       
    78 		return function_sint_to_lint;
       
    79 
       
    80 	if (!strcasecmp(function_name->value, "SINT_TO_DINT"))
       
    81 		return function_sint_to_dint;
       
    82 
       
    83 	if (!strcasecmp(function_name->value, "SINT_TO_DATE"))
       
    84 		return function_sint_to_date;
       
    85 
       
    86 	if (!strcasecmp(function_name->value, "SINT_TO_DWORD"))
       
    87 		return function_sint_to_dword;
       
    88 
       
    89 	if (!strcasecmp(function_name->value, "SINT_TO_DT"))
       
    90 		return function_sint_to_dt;
       
    91 
       
    92 	if (!strcasecmp(function_name->value, "SINT_TO_TOD"))
       
    93 		return function_sint_to_tod;
       
    94 
       
    95 	if (!strcasecmp(function_name->value, "SINT_TO_UDINT"))
       
    96 		return function_sint_to_udint;
       
    97 
       
    98 	if (!strcasecmp(function_name->value, "SINT_TO_WORD"))
       
    99 		return function_sint_to_word;
       
   100 
       
   101 	if (!strcasecmp(function_name->value, "SINT_TO_WSTRING"))
       
   102 		return function_sint_to_wstring;
       
   103 
       
   104 	if (!strcasecmp(function_name->value, "SINT_TO_STRING"))
       
   105 		return function_sint_to_string;
       
   106 
       
   107 	if (!strcasecmp(function_name->value, "SINT_TO_LWORD"))
       
   108 		return function_sint_to_lword;
       
   109 
       
   110 	if (!strcasecmp(function_name->value, "SINT_TO_UINT"))
       
   111 		return function_sint_to_uint;
       
   112 
       
   113 	if (!strcasecmp(function_name->value, "SINT_TO_LREAL"))
       
   114 		return function_sint_to_lreal;
       
   115 
       
   116 	if (!strcasecmp(function_name->value, "SINT_TO_BYTE"))
       
   117 		return function_sint_to_byte;
       
   118 
       
   119 	if (!strcasecmp(function_name->value, "SINT_TO_USINT"))
       
   120 		return function_sint_to_usint;
       
   121 
       
   122 	if (!strcasecmp(function_name->value, "SINT_TO_ULINT"))
       
   123 		return function_sint_to_ulint;
       
   124 
       
   125 	if (!strcasecmp(function_name->value, "SINT_TO_BOOL"))
       
   126 		return function_sint_to_bool;
       
   127 
       
   128 	if (!strcasecmp(function_name->value, "SINT_TO_TIME"))
       
   129 		return function_sint_to_time;
       
   130 
       
   131 	if (!strcasecmp(function_name->value, "SINT_TO_INT"))
       
   132 		return function_sint_to_int;
       
   133 
       
   134 	if (!strcasecmp(function_name->value, "LINT_TO_REAL"))
       
   135 		return function_lint_to_real;
       
   136 
       
   137 	if (!strcasecmp(function_name->value, "LINT_TO_SINT"))
       
   138 		return function_lint_to_sint;
       
   139 
       
   140 	if (!strcasecmp(function_name->value, "LINT_TO_LINT"))
       
   141 		return function_lint_to_lint;
       
   142 
       
   143 	if (!strcasecmp(function_name->value, "LINT_TO_DINT"))
       
   144 		return function_lint_to_dint;
       
   145 
       
   146 	if (!strcasecmp(function_name->value, "LINT_TO_DATE"))
       
   147 		return function_lint_to_date;
       
   148 
       
   149 	if (!strcasecmp(function_name->value, "LINT_TO_DWORD"))
       
   150 		return function_lint_to_dword;
       
   151 
       
   152 	if (!strcasecmp(function_name->value, "LINT_TO_DT"))
       
   153 		return function_lint_to_dt;
       
   154 
       
   155 	if (!strcasecmp(function_name->value, "LINT_TO_TOD"))
       
   156 		return function_lint_to_tod;
       
   157 
       
   158 	if (!strcasecmp(function_name->value, "LINT_TO_UDINT"))
       
   159 		return function_lint_to_udint;
       
   160 
       
   161 	if (!strcasecmp(function_name->value, "LINT_TO_WORD"))
       
   162 		return function_lint_to_word;
       
   163 
       
   164 	if (!strcasecmp(function_name->value, "LINT_TO_WSTRING"))
       
   165 		return function_lint_to_wstring;
       
   166 
       
   167 	if (!strcasecmp(function_name->value, "LINT_TO_STRING"))
       
   168 		return function_lint_to_string;
       
   169 
       
   170 	if (!strcasecmp(function_name->value, "LINT_TO_LWORD"))
       
   171 		return function_lint_to_lword;
       
   172 
       
   173 	if (!strcasecmp(function_name->value, "LINT_TO_UINT"))
       
   174 		return function_lint_to_uint;
       
   175 
       
   176 	if (!strcasecmp(function_name->value, "LINT_TO_LREAL"))
       
   177 		return function_lint_to_lreal;
       
   178 
       
   179 	if (!strcasecmp(function_name->value, "LINT_TO_BYTE"))
       
   180 		return function_lint_to_byte;
       
   181 
       
   182 	if (!strcasecmp(function_name->value, "LINT_TO_USINT"))
       
   183 		return function_lint_to_usint;
       
   184 
       
   185 	if (!strcasecmp(function_name->value, "LINT_TO_ULINT"))
       
   186 		return function_lint_to_ulint;
       
   187 
       
   188 	if (!strcasecmp(function_name->value, "LINT_TO_BOOL"))
       
   189 		return function_lint_to_bool;
       
   190 
       
   191 	if (!strcasecmp(function_name->value, "LINT_TO_TIME"))
       
   192 		return function_lint_to_time;
       
   193 
       
   194 	if (!strcasecmp(function_name->value, "LINT_TO_INT"))
       
   195 		return function_lint_to_int;
       
   196 
       
   197 	if (!strcasecmp(function_name->value, "DINT_TO_REAL"))
       
   198 		return function_dint_to_real;
       
   199 
       
   200 	if (!strcasecmp(function_name->value, "DINT_TO_SINT"))
       
   201 		return function_dint_to_sint;
       
   202 
       
   203 	if (!strcasecmp(function_name->value, "DINT_TO_LINT"))
       
   204 		return function_dint_to_lint;
       
   205 
       
   206 	if (!strcasecmp(function_name->value, "DINT_TO_DINT"))
       
   207 		return function_dint_to_dint;
       
   208 
       
   209 	if (!strcasecmp(function_name->value, "DINT_TO_DATE"))
       
   210 		return function_dint_to_date;
       
   211 
       
   212 	if (!strcasecmp(function_name->value, "DINT_TO_DWORD"))
       
   213 		return function_dint_to_dword;
       
   214 
       
   215 	if (!strcasecmp(function_name->value, "DINT_TO_DT"))
       
   216 		return function_dint_to_dt;
       
   217 
       
   218 	if (!strcasecmp(function_name->value, "DINT_TO_TOD"))
       
   219 		return function_dint_to_tod;
       
   220 
       
   221 	if (!strcasecmp(function_name->value, "DINT_TO_UDINT"))
       
   222 		return function_dint_to_udint;
       
   223 
       
   224 	if (!strcasecmp(function_name->value, "DINT_TO_WORD"))
       
   225 		return function_dint_to_word;
       
   226 
       
   227 	if (!strcasecmp(function_name->value, "DINT_TO_WSTRING"))
       
   228 		return function_dint_to_wstring;
       
   229 
       
   230 	if (!strcasecmp(function_name->value, "DINT_TO_STRING"))
       
   231 		return function_dint_to_string;
       
   232 
       
   233 	if (!strcasecmp(function_name->value, "DINT_TO_LWORD"))
       
   234 		return function_dint_to_lword;
       
   235 
       
   236 	if (!strcasecmp(function_name->value, "DINT_TO_UINT"))
       
   237 		return function_dint_to_uint;
       
   238 
       
   239 	if (!strcasecmp(function_name->value, "DINT_TO_LREAL"))
       
   240 		return function_dint_to_lreal;
       
   241 
       
   242 	if (!strcasecmp(function_name->value, "DINT_TO_BYTE"))
       
   243 		return function_dint_to_byte;
       
   244 
       
   245 	if (!strcasecmp(function_name->value, "DINT_TO_USINT"))
       
   246 		return function_dint_to_usint;
       
   247 
       
   248 	if (!strcasecmp(function_name->value, "DINT_TO_ULINT"))
       
   249 		return function_dint_to_ulint;
       
   250 
       
   251 	if (!strcasecmp(function_name->value, "DINT_TO_BOOL"))
       
   252 		return function_dint_to_bool;
       
   253 
       
   254 	if (!strcasecmp(function_name->value, "DINT_TO_TIME"))
       
   255 		return function_dint_to_time;
       
   256 
       
   257 	if (!strcasecmp(function_name->value, "DINT_TO_INT"))
       
   258 		return function_dint_to_int;
       
   259 
       
   260 	if (!strcasecmp(function_name->value, "DATE_TO_REAL"))
       
   261 		return function_date_to_real;
       
   262 
       
   263 	if (!strcasecmp(function_name->value, "DATE_TO_SINT"))
       
   264 		return function_date_to_sint;
       
   265 
       
   266 	if (!strcasecmp(function_name->value, "DATE_TO_LINT"))
       
   267 		return function_date_to_lint;
       
   268 
       
   269 	if (!strcasecmp(function_name->value, "DATE_TO_DINT"))
       
   270 		return function_date_to_dint;
       
   271 
       
   272 	if (!strcasecmp(function_name->value, "DATE_TO_DATE"))
       
   273 		return function_date_to_date;
       
   274 
       
   275 	if (!strcasecmp(function_name->value, "DATE_TO_DWORD"))
       
   276 		return function_date_to_dword;
       
   277 
       
   278 	if (!strcasecmp(function_name->value, "DATE_TO_DT"))
       
   279 		return function_date_to_dt;
       
   280 
       
   281 	if (!strcasecmp(function_name->value, "DATE_TO_TOD"))
       
   282 		return function_date_to_tod;
       
   283 
       
   284 	if (!strcasecmp(function_name->value, "DATE_TO_UDINT"))
       
   285 		return function_date_to_udint;
       
   286 
       
   287 	if (!strcasecmp(function_name->value, "DATE_TO_WORD"))
       
   288 		return function_date_to_word;
       
   289 
       
   290 	if (!strcasecmp(function_name->value, "DATE_TO_WSTRING"))
       
   291 		return function_date_to_wstring;
       
   292 
       
   293 	if (!strcasecmp(function_name->value, "DATE_TO_STRING"))
       
   294 		return function_date_to_string;
       
   295 
       
   296 	if (!strcasecmp(function_name->value, "DATE_TO_LWORD"))
       
   297 		return function_date_to_lword;
       
   298 
       
   299 	if (!strcasecmp(function_name->value, "DATE_TO_UINT"))
       
   300 		return function_date_to_uint;
       
   301 
       
   302 	if (!strcasecmp(function_name->value, "DATE_TO_LREAL"))
       
   303 		return function_date_to_lreal;
       
   304 
       
   305 	if (!strcasecmp(function_name->value, "DATE_TO_BYTE"))
       
   306 		return function_date_to_byte;
       
   307 
       
   308 	if (!strcasecmp(function_name->value, "DATE_TO_USINT"))
       
   309 		return function_date_to_usint;
       
   310 
       
   311 	if (!strcasecmp(function_name->value, "DATE_TO_ULINT"))
       
   312 		return function_date_to_ulint;
       
   313 
       
   314 	if (!strcasecmp(function_name->value, "DATE_TO_BOOL"))
       
   315 		return function_date_to_bool;
       
   316 
       
   317 	if (!strcasecmp(function_name->value, "DATE_TO_TIME"))
       
   318 		return function_date_to_time;
       
   319 
       
   320 	if (!strcasecmp(function_name->value, "DATE_TO_INT"))
       
   321 		return function_date_to_int;
       
   322 
       
   323 	if (!strcasecmp(function_name->value, "DWORD_TO_REAL"))
       
   324 		return function_dword_to_real;
       
   325 
       
   326 	if (!strcasecmp(function_name->value, "DWORD_TO_SINT"))
       
   327 		return function_dword_to_sint;
       
   328 
       
   329 	if (!strcasecmp(function_name->value, "DWORD_TO_LINT"))
       
   330 		return function_dword_to_lint;
       
   331 
       
   332 	if (!strcasecmp(function_name->value, "DWORD_TO_DINT"))
       
   333 		return function_dword_to_dint;
       
   334 
       
   335 	if (!strcasecmp(function_name->value, "DWORD_TO_DATE"))
       
   336 		return function_dword_to_date;
       
   337 
       
   338 	if (!strcasecmp(function_name->value, "DWORD_TO_DWORD"))
       
   339 		return function_dword_to_dword;
       
   340 
       
   341 	if (!strcasecmp(function_name->value, "DWORD_TO_DT"))
       
   342 		return function_dword_to_dt;
       
   343 
       
   344 	if (!strcasecmp(function_name->value, "DWORD_TO_TOD"))
       
   345 		return function_dword_to_tod;
       
   346 
       
   347 	if (!strcasecmp(function_name->value, "DWORD_TO_UDINT"))
       
   348 		return function_dword_to_udint;
       
   349 
       
   350 	if (!strcasecmp(function_name->value, "DWORD_TO_WORD"))
       
   351 		return function_dword_to_word;
       
   352 
       
   353 	if (!strcasecmp(function_name->value, "DWORD_TO_WSTRING"))
       
   354 		return function_dword_to_wstring;
       
   355 
       
   356 	if (!strcasecmp(function_name->value, "DWORD_TO_STRING"))
       
   357 		return function_dword_to_string;
       
   358 
       
   359 	if (!strcasecmp(function_name->value, "DWORD_TO_LWORD"))
       
   360 		return function_dword_to_lword;
       
   361 
       
   362 	if (!strcasecmp(function_name->value, "DWORD_TO_UINT"))
       
   363 		return function_dword_to_uint;
       
   364 
       
   365 	if (!strcasecmp(function_name->value, "DWORD_TO_LREAL"))
       
   366 		return function_dword_to_lreal;
       
   367 
       
   368 	if (!strcasecmp(function_name->value, "DWORD_TO_BYTE"))
       
   369 		return function_dword_to_byte;
       
   370 
       
   371 	if (!strcasecmp(function_name->value, "DWORD_TO_USINT"))
       
   372 		return function_dword_to_usint;
       
   373 
       
   374 	if (!strcasecmp(function_name->value, "DWORD_TO_ULINT"))
       
   375 		return function_dword_to_ulint;
       
   376 
       
   377 	if (!strcasecmp(function_name->value, "DWORD_TO_BOOL"))
       
   378 		return function_dword_to_bool;
       
   379 
       
   380 	if (!strcasecmp(function_name->value, "DWORD_TO_TIME"))
       
   381 		return function_dword_to_time;
       
   382 
       
   383 	if (!strcasecmp(function_name->value, "DWORD_TO_INT"))
       
   384 		return function_dword_to_int;
       
   385 
       
   386 	if (!strcasecmp(function_name->value, "DT_TO_REAL"))
       
   387 		return function_dt_to_real;
       
   388 
       
   389 	if (!strcasecmp(function_name->value, "DT_TO_SINT"))
       
   390 		return function_dt_to_sint;
       
   391 
       
   392 	if (!strcasecmp(function_name->value, "DT_TO_LINT"))
       
   393 		return function_dt_to_lint;
       
   394 
       
   395 	if (!strcasecmp(function_name->value, "DT_TO_DINT"))
       
   396 		return function_dt_to_dint;
       
   397 
       
   398 	if (!strcasecmp(function_name->value, "DT_TO_DATE"))
       
   399 		return function_dt_to_date;
       
   400 
       
   401 	if (!strcasecmp(function_name->value, "DT_TO_DWORD"))
       
   402 		return function_dt_to_dword;
       
   403 
       
   404 	if (!strcasecmp(function_name->value, "DT_TO_DT"))
       
   405 		return function_dt_to_dt;
       
   406 
       
   407 	if (!strcasecmp(function_name->value, "DT_TO_TOD"))
       
   408 		return function_dt_to_tod;
       
   409 
       
   410 	if (!strcasecmp(function_name->value, "DT_TO_UDINT"))
       
   411 		return function_dt_to_udint;
       
   412 
       
   413 	if (!strcasecmp(function_name->value, "DT_TO_WORD"))
       
   414 		return function_dt_to_word;
       
   415 
       
   416 	if (!strcasecmp(function_name->value, "DT_TO_WSTRING"))
       
   417 		return function_dt_to_wstring;
       
   418 
       
   419 	if (!strcasecmp(function_name->value, "DT_TO_STRING"))
       
   420 		return function_dt_to_string;
       
   421 
       
   422 	if (!strcasecmp(function_name->value, "DT_TO_LWORD"))
       
   423 		return function_dt_to_lword;
       
   424 
       
   425 	if (!strcasecmp(function_name->value, "DT_TO_UINT"))
       
   426 		return function_dt_to_uint;
       
   427 
       
   428 	if (!strcasecmp(function_name->value, "DT_TO_LREAL"))
       
   429 		return function_dt_to_lreal;
       
   430 
       
   431 	if (!strcasecmp(function_name->value, "DT_TO_BYTE"))
       
   432 		return function_dt_to_byte;
       
   433 
       
   434 	if (!strcasecmp(function_name->value, "DT_TO_USINT"))
       
   435 		return function_dt_to_usint;
       
   436 
       
   437 	if (!strcasecmp(function_name->value, "DT_TO_ULINT"))
       
   438 		return function_dt_to_ulint;
       
   439 
       
   440 	if (!strcasecmp(function_name->value, "DT_TO_BOOL"))
       
   441 		return function_dt_to_bool;
       
   442 
       
   443 	if (!strcasecmp(function_name->value, "DT_TO_TIME"))
       
   444 		return function_dt_to_time;
       
   445 
       
   446 	if (!strcasecmp(function_name->value, "DT_TO_INT"))
       
   447 		return function_dt_to_int;
       
   448 
       
   449 	if (!strcasecmp(function_name->value, "TOD_TO_REAL"))
       
   450 		return function_tod_to_real;
       
   451 
       
   452 	if (!strcasecmp(function_name->value, "TOD_TO_SINT"))
       
   453 		return function_tod_to_sint;
       
   454 
       
   455 	if (!strcasecmp(function_name->value, "TOD_TO_LINT"))
       
   456 		return function_tod_to_lint;
       
   457 
       
   458 	if (!strcasecmp(function_name->value, "TOD_TO_DINT"))
       
   459 		return function_tod_to_dint;
       
   460 
       
   461 	if (!strcasecmp(function_name->value, "TOD_TO_DATE"))
       
   462 		return function_tod_to_date;
       
   463 
       
   464 	if (!strcasecmp(function_name->value, "TOD_TO_DWORD"))
       
   465 		return function_tod_to_dword;
       
   466 
       
   467 	if (!strcasecmp(function_name->value, "TOD_TO_DT"))
       
   468 		return function_tod_to_dt;
       
   469 
       
   470 	if (!strcasecmp(function_name->value, "TOD_TO_TOD"))
       
   471 		return function_tod_to_tod;
       
   472 
       
   473 	if (!strcasecmp(function_name->value, "TOD_TO_UDINT"))
       
   474 		return function_tod_to_udint;
       
   475 
       
   476 	if (!strcasecmp(function_name->value, "TOD_TO_WORD"))
       
   477 		return function_tod_to_word;
       
   478 
       
   479 	if (!strcasecmp(function_name->value, "TOD_TO_WSTRING"))
       
   480 		return function_tod_to_wstring;
       
   481 
       
   482 	if (!strcasecmp(function_name->value, "TOD_TO_STRING"))
       
   483 		return function_tod_to_string;
       
   484 
       
   485 	if (!strcasecmp(function_name->value, "TOD_TO_LWORD"))
       
   486 		return function_tod_to_lword;
       
   487 
       
   488 	if (!strcasecmp(function_name->value, "TOD_TO_UINT"))
       
   489 		return function_tod_to_uint;
       
   490 
       
   491 	if (!strcasecmp(function_name->value, "TOD_TO_LREAL"))
       
   492 		return function_tod_to_lreal;
       
   493 
       
   494 	if (!strcasecmp(function_name->value, "TOD_TO_BYTE"))
       
   495 		return function_tod_to_byte;
       
   496 
       
   497 	if (!strcasecmp(function_name->value, "TOD_TO_USINT"))
       
   498 		return function_tod_to_usint;
       
   499 
       
   500 	if (!strcasecmp(function_name->value, "TOD_TO_ULINT"))
       
   501 		return function_tod_to_ulint;
       
   502 
       
   503 	if (!strcasecmp(function_name->value, "TOD_TO_BOOL"))
       
   504 		return function_tod_to_bool;
       
   505 
       
   506 	if (!strcasecmp(function_name->value, "TOD_TO_TIME"))
       
   507 		return function_tod_to_time;
       
   508 
       
   509 	if (!strcasecmp(function_name->value, "TOD_TO_INT"))
       
   510 		return function_tod_to_int;
       
   511 
       
   512 	if (!strcasecmp(function_name->value, "UDINT_TO_REAL"))
       
   513 		return function_udint_to_real;
       
   514 
       
   515 	if (!strcasecmp(function_name->value, "UDINT_TO_SINT"))
       
   516 		return function_udint_to_sint;
       
   517 
       
   518 	if (!strcasecmp(function_name->value, "UDINT_TO_LINT"))
       
   519 		return function_udint_to_lint;
       
   520 
       
   521 	if (!strcasecmp(function_name->value, "UDINT_TO_DINT"))
       
   522 		return function_udint_to_dint;
       
   523 
       
   524 	if (!strcasecmp(function_name->value, "UDINT_TO_DATE"))
       
   525 		return function_udint_to_date;
       
   526 
       
   527 	if (!strcasecmp(function_name->value, "UDINT_TO_DWORD"))
       
   528 		return function_udint_to_dword;
       
   529 
       
   530 	if (!strcasecmp(function_name->value, "UDINT_TO_DT"))
       
   531 		return function_udint_to_dt;
       
   532 
       
   533 	if (!strcasecmp(function_name->value, "UDINT_TO_TOD"))
       
   534 		return function_udint_to_tod;
       
   535 
       
   536 	if (!strcasecmp(function_name->value, "UDINT_TO_UDINT"))
       
   537 		return function_udint_to_udint;
       
   538 
       
   539 	if (!strcasecmp(function_name->value, "UDINT_TO_WORD"))
       
   540 		return function_udint_to_word;
       
   541 
       
   542 	if (!strcasecmp(function_name->value, "UDINT_TO_WSTRING"))
       
   543 		return function_udint_to_wstring;
       
   544 
       
   545 	if (!strcasecmp(function_name->value, "UDINT_TO_STRING"))
       
   546 		return function_udint_to_string;
       
   547 
       
   548 	if (!strcasecmp(function_name->value, "UDINT_TO_LWORD"))
       
   549 		return function_udint_to_lword;
       
   550 
       
   551 	if (!strcasecmp(function_name->value, "UDINT_TO_UINT"))
       
   552 		return function_udint_to_uint;
       
   553 
       
   554 	if (!strcasecmp(function_name->value, "UDINT_TO_LREAL"))
       
   555 		return function_udint_to_lreal;
       
   556 
       
   557 	if (!strcasecmp(function_name->value, "UDINT_TO_BYTE"))
       
   558 		return function_udint_to_byte;
       
   559 
       
   560 	if (!strcasecmp(function_name->value, "UDINT_TO_USINT"))
       
   561 		return function_udint_to_usint;
       
   562 
       
   563 	if (!strcasecmp(function_name->value, "UDINT_TO_ULINT"))
       
   564 		return function_udint_to_ulint;
       
   565 
       
   566 	if (!strcasecmp(function_name->value, "UDINT_TO_BOOL"))
       
   567 		return function_udint_to_bool;
       
   568 
       
   569 	if (!strcasecmp(function_name->value, "UDINT_TO_TIME"))
       
   570 		return function_udint_to_time;
       
   571 
       
   572 	if (!strcasecmp(function_name->value, "UDINT_TO_INT"))
       
   573 		return function_udint_to_int;
       
   574 
       
   575 	if (!strcasecmp(function_name->value, "WORD_TO_REAL"))
       
   576 		return function_word_to_real;
       
   577 
       
   578 	if (!strcasecmp(function_name->value, "WORD_TO_SINT"))
       
   579 		return function_word_to_sint;
       
   580 
       
   581 	if (!strcasecmp(function_name->value, "WORD_TO_LINT"))
       
   582 		return function_word_to_lint;
       
   583 
       
   584 	if (!strcasecmp(function_name->value, "WORD_TO_DINT"))
       
   585 		return function_word_to_dint;
       
   586 
       
   587 	if (!strcasecmp(function_name->value, "WORD_TO_DATE"))
       
   588 		return function_word_to_date;
       
   589 
       
   590 	if (!strcasecmp(function_name->value, "WORD_TO_DWORD"))
       
   591 		return function_word_to_dword;
       
   592 
       
   593 	if (!strcasecmp(function_name->value, "WORD_TO_DT"))
       
   594 		return function_word_to_dt;
       
   595 
       
   596 	if (!strcasecmp(function_name->value, "WORD_TO_TOD"))
       
   597 		return function_word_to_tod;
       
   598 
       
   599 	if (!strcasecmp(function_name->value, "WORD_TO_UDINT"))
       
   600 		return function_word_to_udint;
       
   601 
       
   602 	if (!strcasecmp(function_name->value, "WORD_TO_WORD"))
       
   603 		return function_word_to_word;
       
   604 
       
   605 	if (!strcasecmp(function_name->value, "WORD_TO_WSTRING"))
       
   606 		return function_word_to_wstring;
       
   607 
       
   608 	if (!strcasecmp(function_name->value, "WORD_TO_STRING"))
       
   609 		return function_word_to_string;
       
   610 
       
   611 	if (!strcasecmp(function_name->value, "WORD_TO_LWORD"))
       
   612 		return function_word_to_lword;
       
   613 
       
   614 	if (!strcasecmp(function_name->value, "WORD_TO_UINT"))
       
   615 		return function_word_to_uint;
       
   616 
       
   617 	if (!strcasecmp(function_name->value, "WORD_TO_LREAL"))
       
   618 		return function_word_to_lreal;
       
   619 
       
   620 	if (!strcasecmp(function_name->value, "WORD_TO_BYTE"))
       
   621 		return function_word_to_byte;
       
   622 
       
   623 	if (!strcasecmp(function_name->value, "WORD_TO_USINT"))
       
   624 		return function_word_to_usint;
       
   625 
       
   626 	if (!strcasecmp(function_name->value, "WORD_TO_ULINT"))
       
   627 		return function_word_to_ulint;
       
   628 
       
   629 	if (!strcasecmp(function_name->value, "WORD_TO_BOOL"))
       
   630 		return function_word_to_bool;
       
   631 
       
   632 	if (!strcasecmp(function_name->value, "WORD_TO_TIME"))
       
   633 		return function_word_to_time;
       
   634 
       
   635 	if (!strcasecmp(function_name->value, "WORD_TO_INT"))
       
   636 		return function_word_to_int;
       
   637 
       
   638 	if (!strcasecmp(function_name->value, "WSTRING_TO_REAL"))
       
   639 		return function_wstring_to_real;
       
   640 
       
   641 	if (!strcasecmp(function_name->value, "WSTRING_TO_SINT"))
       
   642 		return function_wstring_to_sint;
       
   643 
       
   644 	if (!strcasecmp(function_name->value, "WSTRING_TO_LINT"))
       
   645 		return function_wstring_to_lint;
       
   646 
       
   647 	if (!strcasecmp(function_name->value, "WSTRING_TO_DINT"))
       
   648 		return function_wstring_to_dint;
       
   649 
       
   650 	if (!strcasecmp(function_name->value, "WSTRING_TO_DATE"))
       
   651 		return function_wstring_to_date;
       
   652 
       
   653 	if (!strcasecmp(function_name->value, "WSTRING_TO_DWORD"))
       
   654 		return function_wstring_to_dword;
       
   655 
       
   656 	if (!strcasecmp(function_name->value, "WSTRING_TO_DT"))
       
   657 		return function_wstring_to_dt;
       
   658 
       
   659 	if (!strcasecmp(function_name->value, "WSTRING_TO_TOD"))
       
   660 		return function_wstring_to_tod;
       
   661 
       
   662 	if (!strcasecmp(function_name->value, "WSTRING_TO_UDINT"))
       
   663 		return function_wstring_to_udint;
       
   664 
       
   665 	if (!strcasecmp(function_name->value, "WSTRING_TO_WORD"))
       
   666 		return function_wstring_to_word;
       
   667 
       
   668 	if (!strcasecmp(function_name->value, "WSTRING_TO_WSTRING"))
       
   669 		return function_wstring_to_wstring;
       
   670 
       
   671 	if (!strcasecmp(function_name->value, "WSTRING_TO_STRING"))
       
   672 		return function_wstring_to_string;
       
   673 
       
   674 	if (!strcasecmp(function_name->value, "WSTRING_TO_LWORD"))
       
   675 		return function_wstring_to_lword;
       
   676 
       
   677 	if (!strcasecmp(function_name->value, "WSTRING_TO_UINT"))
       
   678 		return function_wstring_to_uint;
       
   679 
       
   680 	if (!strcasecmp(function_name->value, "WSTRING_TO_LREAL"))
       
   681 		return function_wstring_to_lreal;
       
   682 
       
   683 	if (!strcasecmp(function_name->value, "WSTRING_TO_BYTE"))
       
   684 		return function_wstring_to_byte;
       
   685 
       
   686 	if (!strcasecmp(function_name->value, "WSTRING_TO_USINT"))
       
   687 		return function_wstring_to_usint;
       
   688 
       
   689 	if (!strcasecmp(function_name->value, "WSTRING_TO_ULINT"))
       
   690 		return function_wstring_to_ulint;
       
   691 
       
   692 	if (!strcasecmp(function_name->value, "WSTRING_TO_BOOL"))
       
   693 		return function_wstring_to_bool;
       
   694 
       
   695 	if (!strcasecmp(function_name->value, "WSTRING_TO_TIME"))
       
   696 		return function_wstring_to_time;
       
   697 
       
   698 	if (!strcasecmp(function_name->value, "WSTRING_TO_INT"))
       
   699 		return function_wstring_to_int;
       
   700 
       
   701 	if (!strcasecmp(function_name->value, "STRING_TO_REAL"))
       
   702 		return function_string_to_real;
       
   703 
       
   704 	if (!strcasecmp(function_name->value, "STRING_TO_SINT"))
       
   705 		return function_string_to_sint;
       
   706 
       
   707 	if (!strcasecmp(function_name->value, "STRING_TO_LINT"))
       
   708 		return function_string_to_lint;
       
   709 
       
   710 	if (!strcasecmp(function_name->value, "STRING_TO_DINT"))
       
   711 		return function_string_to_dint;
       
   712 
       
   713 	if (!strcasecmp(function_name->value, "STRING_TO_DATE"))
       
   714 		return function_string_to_date;
       
   715 
       
   716 	if (!strcasecmp(function_name->value, "STRING_TO_DWORD"))
       
   717 		return function_string_to_dword;
       
   718 
       
   719 	if (!strcasecmp(function_name->value, "STRING_TO_DT"))
       
   720 		return function_string_to_dt;
       
   721 
       
   722 	if (!strcasecmp(function_name->value, "STRING_TO_TOD"))
       
   723 		return function_string_to_tod;
       
   724 
       
   725 	if (!strcasecmp(function_name->value, "STRING_TO_UDINT"))
       
   726 		return function_string_to_udint;
       
   727 
       
   728 	if (!strcasecmp(function_name->value, "STRING_TO_WORD"))
       
   729 		return function_string_to_word;
       
   730 
       
   731 	if (!strcasecmp(function_name->value, "STRING_TO_WSTRING"))
       
   732 		return function_string_to_wstring;
       
   733 
       
   734 	if (!strcasecmp(function_name->value, "STRING_TO_STRING"))
       
   735 		return function_string_to_string;
       
   736 
       
   737 	if (!strcasecmp(function_name->value, "STRING_TO_LWORD"))
       
   738 		return function_string_to_lword;
       
   739 
       
   740 	if (!strcasecmp(function_name->value, "STRING_TO_UINT"))
       
   741 		return function_string_to_uint;
       
   742 
       
   743 	if (!strcasecmp(function_name->value, "STRING_TO_LREAL"))
       
   744 		return function_string_to_lreal;
       
   745 
       
   746 	if (!strcasecmp(function_name->value, "STRING_TO_BYTE"))
       
   747 		return function_string_to_byte;
       
   748 
       
   749 	if (!strcasecmp(function_name->value, "STRING_TO_USINT"))
       
   750 		return function_string_to_usint;
       
   751 
       
   752 	if (!strcasecmp(function_name->value, "STRING_TO_ULINT"))
       
   753 		return function_string_to_ulint;
       
   754 
       
   755 	if (!strcasecmp(function_name->value, "STRING_TO_BOOL"))
       
   756 		return function_string_to_bool;
       
   757 
       
   758 	if (!strcasecmp(function_name->value, "STRING_TO_TIME"))
       
   759 		return function_string_to_time;
       
   760 
       
   761 	if (!strcasecmp(function_name->value, "STRING_TO_INT"))
       
   762 		return function_string_to_int;
       
   763 
       
   764 	if (!strcasecmp(function_name->value, "LWORD_TO_REAL"))
       
   765 		return function_lword_to_real;
       
   766 
       
   767 	if (!strcasecmp(function_name->value, "LWORD_TO_SINT"))
       
   768 		return function_lword_to_sint;
       
   769 
       
   770 	if (!strcasecmp(function_name->value, "LWORD_TO_LINT"))
       
   771 		return function_lword_to_lint;
       
   772 
       
   773 	if (!strcasecmp(function_name->value, "LWORD_TO_DINT"))
       
   774 		return function_lword_to_dint;
       
   775 
       
   776 	if (!strcasecmp(function_name->value, "LWORD_TO_DATE"))
       
   777 		return function_lword_to_date;
       
   778 
       
   779 	if (!strcasecmp(function_name->value, "LWORD_TO_DWORD"))
       
   780 		return function_lword_to_dword;
       
   781 
       
   782 	if (!strcasecmp(function_name->value, "LWORD_TO_DT"))
       
   783 		return function_lword_to_dt;
       
   784 
       
   785 	if (!strcasecmp(function_name->value, "LWORD_TO_TOD"))
       
   786 		return function_lword_to_tod;
       
   787 
       
   788 	if (!strcasecmp(function_name->value, "LWORD_TO_UDINT"))
       
   789 		return function_lword_to_udint;
       
   790 
       
   791 	if (!strcasecmp(function_name->value, "LWORD_TO_WORD"))
       
   792 		return function_lword_to_word;
       
   793 
       
   794 	if (!strcasecmp(function_name->value, "LWORD_TO_WSTRING"))
       
   795 		return function_lword_to_wstring;
       
   796 
       
   797 	if (!strcasecmp(function_name->value, "LWORD_TO_STRING"))
       
   798 		return function_lword_to_string;
       
   799 
       
   800 	if (!strcasecmp(function_name->value, "LWORD_TO_LWORD"))
       
   801 		return function_lword_to_lword;
       
   802 
       
   803 	if (!strcasecmp(function_name->value, "LWORD_TO_UINT"))
       
   804 		return function_lword_to_uint;
       
   805 
       
   806 	if (!strcasecmp(function_name->value, "LWORD_TO_LREAL"))
       
   807 		return function_lword_to_lreal;
       
   808 
       
   809 	if (!strcasecmp(function_name->value, "LWORD_TO_BYTE"))
       
   810 		return function_lword_to_byte;
       
   811 
       
   812 	if (!strcasecmp(function_name->value, "LWORD_TO_USINT"))
       
   813 		return function_lword_to_usint;
       
   814 
       
   815 	if (!strcasecmp(function_name->value, "LWORD_TO_ULINT"))
       
   816 		return function_lword_to_ulint;
       
   817 
       
   818 	if (!strcasecmp(function_name->value, "LWORD_TO_BOOL"))
       
   819 		return function_lword_to_bool;
       
   820 
       
   821 	if (!strcasecmp(function_name->value, "LWORD_TO_TIME"))
       
   822 		return function_lword_to_time;
       
   823 
       
   824 	if (!strcasecmp(function_name->value, "LWORD_TO_INT"))
       
   825 		return function_lword_to_int;
       
   826 
       
   827 	if (!strcasecmp(function_name->value, "UINT_TO_REAL"))
       
   828 		return function_uint_to_real;
       
   829 
       
   830 	if (!strcasecmp(function_name->value, "UINT_TO_SINT"))
       
   831 		return function_uint_to_sint;
       
   832 
       
   833 	if (!strcasecmp(function_name->value, "UINT_TO_LINT"))
       
   834 		return function_uint_to_lint;
       
   835 
       
   836 	if (!strcasecmp(function_name->value, "UINT_TO_DINT"))
       
   837 		return function_uint_to_dint;
       
   838 
       
   839 	if (!strcasecmp(function_name->value, "UINT_TO_DATE"))
       
   840 		return function_uint_to_date;
       
   841 
       
   842 	if (!strcasecmp(function_name->value, "UINT_TO_DWORD"))
       
   843 		return function_uint_to_dword;
       
   844 
       
   845 	if (!strcasecmp(function_name->value, "UINT_TO_DT"))
       
   846 		return function_uint_to_dt;
       
   847 
       
   848 	if (!strcasecmp(function_name->value, "UINT_TO_TOD"))
       
   849 		return function_uint_to_tod;
       
   850 
       
   851 	if (!strcasecmp(function_name->value, "UINT_TO_UDINT"))
       
   852 		return function_uint_to_udint;
       
   853 
       
   854 	if (!strcasecmp(function_name->value, "UINT_TO_WORD"))
       
   855 		return function_uint_to_word;
       
   856 
       
   857 	if (!strcasecmp(function_name->value, "UINT_TO_WSTRING"))
       
   858 		return function_uint_to_wstring;
       
   859 
       
   860 	if (!strcasecmp(function_name->value, "UINT_TO_STRING"))
       
   861 		return function_uint_to_string;
       
   862 
       
   863 	if (!strcasecmp(function_name->value, "UINT_TO_LWORD"))
       
   864 		return function_uint_to_lword;
       
   865 
       
   866 	if (!strcasecmp(function_name->value, "UINT_TO_UINT"))
       
   867 		return function_uint_to_uint;
       
   868 
       
   869 	if (!strcasecmp(function_name->value, "UINT_TO_LREAL"))
       
   870 		return function_uint_to_lreal;
       
   871 
       
   872 	if (!strcasecmp(function_name->value, "UINT_TO_BYTE"))
       
   873 		return function_uint_to_byte;
       
   874 
       
   875 	if (!strcasecmp(function_name->value, "UINT_TO_USINT"))
       
   876 		return function_uint_to_usint;
       
   877 
       
   878 	if (!strcasecmp(function_name->value, "UINT_TO_ULINT"))
       
   879 		return function_uint_to_ulint;
       
   880 
       
   881 	if (!strcasecmp(function_name->value, "UINT_TO_BOOL"))
       
   882 		return function_uint_to_bool;
       
   883 
       
   884 	if (!strcasecmp(function_name->value, "UINT_TO_TIME"))
       
   885 		return function_uint_to_time;
       
   886 
       
   887 	if (!strcasecmp(function_name->value, "UINT_TO_INT"))
       
   888 		return function_uint_to_int;
       
   889 
       
   890 	if (!strcasecmp(function_name->value, "LREAL_TO_REAL"))
       
   891 		return function_lreal_to_real;
       
   892 
       
   893 	if (!strcasecmp(function_name->value, "LREAL_TO_SINT"))
       
   894 		return function_lreal_to_sint;
       
   895 
       
   896 	if (!strcasecmp(function_name->value, "LREAL_TO_LINT"))
       
   897 		return function_lreal_to_lint;
       
   898 
       
   899 	if (!strcasecmp(function_name->value, "LREAL_TO_DINT"))
       
   900 		return function_lreal_to_dint;
       
   901 
       
   902 	if (!strcasecmp(function_name->value, "LREAL_TO_DATE"))
       
   903 		return function_lreal_to_date;
       
   904 
       
   905 	if (!strcasecmp(function_name->value, "LREAL_TO_DWORD"))
       
   906 		return function_lreal_to_dword;
       
   907 
       
   908 	if (!strcasecmp(function_name->value, "LREAL_TO_DT"))
       
   909 		return function_lreal_to_dt;
       
   910 
       
   911 	if (!strcasecmp(function_name->value, "LREAL_TO_TOD"))
       
   912 		return function_lreal_to_tod;
       
   913 
       
   914 	if (!strcasecmp(function_name->value, "LREAL_TO_UDINT"))
       
   915 		return function_lreal_to_udint;
       
   916 
       
   917 	if (!strcasecmp(function_name->value, "LREAL_TO_WORD"))
       
   918 		return function_lreal_to_word;
       
   919 
       
   920 	if (!strcasecmp(function_name->value, "LREAL_TO_WSTRING"))
       
   921 		return function_lreal_to_wstring;
       
   922 
       
   923 	if (!strcasecmp(function_name->value, "LREAL_TO_STRING"))
       
   924 		return function_lreal_to_string;
       
   925 
       
   926 	if (!strcasecmp(function_name->value, "LREAL_TO_LWORD"))
       
   927 		return function_lreal_to_lword;
       
   928 
       
   929 	if (!strcasecmp(function_name->value, "LREAL_TO_UINT"))
       
   930 		return function_lreal_to_uint;
       
   931 
       
   932 	if (!strcasecmp(function_name->value, "LREAL_TO_LREAL"))
       
   933 		return function_lreal_to_lreal;
       
   934 
       
   935 	if (!strcasecmp(function_name->value, "LREAL_TO_BYTE"))
       
   936 		return function_lreal_to_byte;
       
   937 
       
   938 	if (!strcasecmp(function_name->value, "LREAL_TO_USINT"))
       
   939 		return function_lreal_to_usint;
       
   940 
       
   941 	if (!strcasecmp(function_name->value, "LREAL_TO_ULINT"))
       
   942 		return function_lreal_to_ulint;
       
   943 
       
   944 	if (!strcasecmp(function_name->value, "LREAL_TO_BOOL"))
       
   945 		return function_lreal_to_bool;
       
   946 
       
   947 	if (!strcasecmp(function_name->value, "LREAL_TO_TIME"))
       
   948 		return function_lreal_to_time;
       
   949 
       
   950 	if (!strcasecmp(function_name->value, "LREAL_TO_INT"))
       
   951 		return function_lreal_to_int;
       
   952 
       
   953 	if (!strcasecmp(function_name->value, "BYTE_TO_REAL"))
       
   954 		return function_byte_to_real;
       
   955 
       
   956 	if (!strcasecmp(function_name->value, "BYTE_TO_SINT"))
       
   957 		return function_byte_to_sint;
       
   958 
       
   959 	if (!strcasecmp(function_name->value, "BYTE_TO_LINT"))
       
   960 		return function_byte_to_lint;
       
   961 
       
   962 	if (!strcasecmp(function_name->value, "BYTE_TO_DINT"))
       
   963 		return function_byte_to_dint;
       
   964 
       
   965 	if (!strcasecmp(function_name->value, "BYTE_TO_DATE"))
       
   966 		return function_byte_to_date;
       
   967 
       
   968 	if (!strcasecmp(function_name->value, "BYTE_TO_DWORD"))
       
   969 		return function_byte_to_dword;
       
   970 
       
   971 	if (!strcasecmp(function_name->value, "BYTE_TO_DT"))
       
   972 		return function_byte_to_dt;
       
   973 
       
   974 	if (!strcasecmp(function_name->value, "BYTE_TO_TOD"))
       
   975 		return function_byte_to_tod;
       
   976 
       
   977 	if (!strcasecmp(function_name->value, "BYTE_TO_UDINT"))
       
   978 		return function_byte_to_udint;
       
   979 
       
   980 	if (!strcasecmp(function_name->value, "BYTE_TO_WORD"))
       
   981 		return function_byte_to_word;
       
   982 
       
   983 	if (!strcasecmp(function_name->value, "BYTE_TO_WSTRING"))
       
   984 		return function_byte_to_wstring;
       
   985 
       
   986 	if (!strcasecmp(function_name->value, "BYTE_TO_STRING"))
       
   987 		return function_byte_to_string;
       
   988 
       
   989 	if (!strcasecmp(function_name->value, "BYTE_TO_LWORD"))
       
   990 		return function_byte_to_lword;
       
   991 
       
   992 	if (!strcasecmp(function_name->value, "BYTE_TO_UINT"))
       
   993 		return function_byte_to_uint;
       
   994 
       
   995 	if (!strcasecmp(function_name->value, "BYTE_TO_LREAL"))
       
   996 		return function_byte_to_lreal;
       
   997 
       
   998 	if (!strcasecmp(function_name->value, "BYTE_TO_BYTE"))
       
   999 		return function_byte_to_byte;
       
  1000 
       
  1001 	if (!strcasecmp(function_name->value, "BYTE_TO_USINT"))
       
  1002 		return function_byte_to_usint;
       
  1003 
       
  1004 	if (!strcasecmp(function_name->value, "BYTE_TO_ULINT"))
       
  1005 		return function_byte_to_ulint;
       
  1006 
       
  1007 	if (!strcasecmp(function_name->value, "BYTE_TO_BOOL"))
       
  1008 		return function_byte_to_bool;
       
  1009 
       
  1010 	if (!strcasecmp(function_name->value, "BYTE_TO_TIME"))
       
  1011 		return function_byte_to_time;
       
  1012 
       
  1013 	if (!strcasecmp(function_name->value, "BYTE_TO_INT"))
       
  1014 		return function_byte_to_int;
       
  1015 
       
  1016 	if (!strcasecmp(function_name->value, "USINT_TO_REAL"))
       
  1017 		return function_usint_to_real;
       
  1018 
       
  1019 	if (!strcasecmp(function_name->value, "USINT_TO_SINT"))
       
  1020 		return function_usint_to_sint;
       
  1021 
       
  1022 	if (!strcasecmp(function_name->value, "USINT_TO_LINT"))
       
  1023 		return function_usint_to_lint;
       
  1024 
       
  1025 	if (!strcasecmp(function_name->value, "USINT_TO_DINT"))
       
  1026 		return function_usint_to_dint;
       
  1027 
       
  1028 	if (!strcasecmp(function_name->value, "USINT_TO_DATE"))
       
  1029 		return function_usint_to_date;
       
  1030 
       
  1031 	if (!strcasecmp(function_name->value, "USINT_TO_DWORD"))
       
  1032 		return function_usint_to_dword;
       
  1033 
       
  1034 	if (!strcasecmp(function_name->value, "USINT_TO_DT"))
       
  1035 		return function_usint_to_dt;
       
  1036 
       
  1037 	if (!strcasecmp(function_name->value, "USINT_TO_TOD"))
       
  1038 		return function_usint_to_tod;
       
  1039 
       
  1040 	if (!strcasecmp(function_name->value, "USINT_TO_UDINT"))
       
  1041 		return function_usint_to_udint;
       
  1042 
       
  1043 	if (!strcasecmp(function_name->value, "USINT_TO_WORD"))
       
  1044 		return function_usint_to_word;
       
  1045 
       
  1046 	if (!strcasecmp(function_name->value, "USINT_TO_WSTRING"))
       
  1047 		return function_usint_to_wstring;
       
  1048 
       
  1049 	if (!strcasecmp(function_name->value, "USINT_TO_STRING"))
       
  1050 		return function_usint_to_string;
       
  1051 
       
  1052 	if (!strcasecmp(function_name->value, "USINT_TO_LWORD"))
       
  1053 		return function_usint_to_lword;
       
  1054 
       
  1055 	if (!strcasecmp(function_name->value, "USINT_TO_UINT"))
       
  1056 		return function_usint_to_uint;
       
  1057 
       
  1058 	if (!strcasecmp(function_name->value, "USINT_TO_LREAL"))
       
  1059 		return function_usint_to_lreal;
       
  1060 
       
  1061 	if (!strcasecmp(function_name->value, "USINT_TO_BYTE"))
       
  1062 		return function_usint_to_byte;
       
  1063 
       
  1064 	if (!strcasecmp(function_name->value, "USINT_TO_USINT"))
       
  1065 		return function_usint_to_usint;
       
  1066 
       
  1067 	if (!strcasecmp(function_name->value, "USINT_TO_ULINT"))
       
  1068 		return function_usint_to_ulint;
       
  1069 
       
  1070 	if (!strcasecmp(function_name->value, "USINT_TO_BOOL"))
       
  1071 		return function_usint_to_bool;
       
  1072 
       
  1073 	if (!strcasecmp(function_name->value, "USINT_TO_TIME"))
       
  1074 		return function_usint_to_time;
       
  1075 
       
  1076 	if (!strcasecmp(function_name->value, "USINT_TO_INT"))
       
  1077 		return function_usint_to_int;
       
  1078 
       
  1079 	if (!strcasecmp(function_name->value, "ULINT_TO_REAL"))
       
  1080 		return function_ulint_to_real;
       
  1081 
       
  1082 	if (!strcasecmp(function_name->value, "ULINT_TO_SINT"))
       
  1083 		return function_ulint_to_sint;
       
  1084 
       
  1085 	if (!strcasecmp(function_name->value, "ULINT_TO_LINT"))
       
  1086 		return function_ulint_to_lint;
       
  1087 
       
  1088 	if (!strcasecmp(function_name->value, "ULINT_TO_DINT"))
       
  1089 		return function_ulint_to_dint;
       
  1090 
       
  1091 	if (!strcasecmp(function_name->value, "ULINT_TO_DATE"))
       
  1092 		return function_ulint_to_date;
       
  1093 
       
  1094 	if (!strcasecmp(function_name->value, "ULINT_TO_DWORD"))
       
  1095 		return function_ulint_to_dword;
       
  1096 
       
  1097 	if (!strcasecmp(function_name->value, "ULINT_TO_DT"))
       
  1098 		return function_ulint_to_dt;
       
  1099 
       
  1100 	if (!strcasecmp(function_name->value, "ULINT_TO_TOD"))
       
  1101 		return function_ulint_to_tod;
       
  1102 
       
  1103 	if (!strcasecmp(function_name->value, "ULINT_TO_UDINT"))
       
  1104 		return function_ulint_to_udint;
       
  1105 
       
  1106 	if (!strcasecmp(function_name->value, "ULINT_TO_WORD"))
       
  1107 		return function_ulint_to_word;
       
  1108 
       
  1109 	if (!strcasecmp(function_name->value, "ULINT_TO_WSTRING"))
       
  1110 		return function_ulint_to_wstring;
       
  1111 
       
  1112 	if (!strcasecmp(function_name->value, "ULINT_TO_STRING"))
       
  1113 		return function_ulint_to_string;
       
  1114 
       
  1115 	if (!strcasecmp(function_name->value, "ULINT_TO_LWORD"))
       
  1116 		return function_ulint_to_lword;
       
  1117 
       
  1118 	if (!strcasecmp(function_name->value, "ULINT_TO_UINT"))
       
  1119 		return function_ulint_to_uint;
       
  1120 
       
  1121 	if (!strcasecmp(function_name->value, "ULINT_TO_LREAL"))
       
  1122 		return function_ulint_to_lreal;
       
  1123 
       
  1124 	if (!strcasecmp(function_name->value, "ULINT_TO_BYTE"))
       
  1125 		return function_ulint_to_byte;
       
  1126 
       
  1127 	if (!strcasecmp(function_name->value, "ULINT_TO_USINT"))
       
  1128 		return function_ulint_to_usint;
       
  1129 
       
  1130 	if (!strcasecmp(function_name->value, "ULINT_TO_ULINT"))
       
  1131 		return function_ulint_to_ulint;
       
  1132 
       
  1133 	if (!strcasecmp(function_name->value, "ULINT_TO_BOOL"))
       
  1134 		return function_ulint_to_bool;
       
  1135 
       
  1136 	if (!strcasecmp(function_name->value, "ULINT_TO_TIME"))
       
  1137 		return function_ulint_to_time;
       
  1138 
       
  1139 	if (!strcasecmp(function_name->value, "ULINT_TO_INT"))
       
  1140 		return function_ulint_to_int;
       
  1141 
       
  1142 	if (!strcasecmp(function_name->value, "BOOL_TO_REAL"))
       
  1143 		return function_bool_to_real;
       
  1144 
       
  1145 	if (!strcasecmp(function_name->value, "BOOL_TO_SINT"))
       
  1146 		return function_bool_to_sint;
       
  1147 
       
  1148 	if (!strcasecmp(function_name->value, "BOOL_TO_LINT"))
       
  1149 		return function_bool_to_lint;
       
  1150 
       
  1151 	if (!strcasecmp(function_name->value, "BOOL_TO_DINT"))
       
  1152 		return function_bool_to_dint;
       
  1153 
       
  1154 	if (!strcasecmp(function_name->value, "BOOL_TO_DATE"))
       
  1155 		return function_bool_to_date;
       
  1156 
       
  1157 	if (!strcasecmp(function_name->value, "BOOL_TO_DWORD"))
       
  1158 		return function_bool_to_dword;
       
  1159 
       
  1160 	if (!strcasecmp(function_name->value, "BOOL_TO_DT"))
       
  1161 		return function_bool_to_dt;
       
  1162 
       
  1163 	if (!strcasecmp(function_name->value, "BOOL_TO_TOD"))
       
  1164 		return function_bool_to_tod;
       
  1165 
       
  1166 	if (!strcasecmp(function_name->value, "BOOL_TO_UDINT"))
       
  1167 		return function_bool_to_udint;
       
  1168 
       
  1169 	if (!strcasecmp(function_name->value, "BOOL_TO_WORD"))
       
  1170 		return function_bool_to_word;
       
  1171 
       
  1172 	if (!strcasecmp(function_name->value, "BOOL_TO_WSTRING"))
       
  1173 		return function_bool_to_wstring;
       
  1174 
       
  1175 	if (!strcasecmp(function_name->value, "BOOL_TO_STRING"))
       
  1176 		return function_bool_to_string;
       
  1177 
       
  1178 	if (!strcasecmp(function_name->value, "BOOL_TO_LWORD"))
       
  1179 		return function_bool_to_lword;
       
  1180 
       
  1181 	if (!strcasecmp(function_name->value, "BOOL_TO_UINT"))
       
  1182 		return function_bool_to_uint;
       
  1183 
       
  1184 	if (!strcasecmp(function_name->value, "BOOL_TO_LREAL"))
       
  1185 		return function_bool_to_lreal;
       
  1186 
       
  1187 	if (!strcasecmp(function_name->value, "BOOL_TO_BYTE"))
       
  1188 		return function_bool_to_byte;
       
  1189 
       
  1190 	if (!strcasecmp(function_name->value, "BOOL_TO_USINT"))
       
  1191 		return function_bool_to_usint;
       
  1192 
       
  1193 	if (!strcasecmp(function_name->value, "BOOL_TO_ULINT"))
       
  1194 		return function_bool_to_ulint;
       
  1195 
       
  1196 	if (!strcasecmp(function_name->value, "BOOL_TO_BOOL"))
       
  1197 		return function_bool_to_bool;
       
  1198 
       
  1199 	if (!strcasecmp(function_name->value, "BOOL_TO_TIME"))
       
  1200 		return function_bool_to_time;
       
  1201 
       
  1202 	if (!strcasecmp(function_name->value, "BOOL_TO_INT"))
       
  1203 		return function_bool_to_int;
       
  1204 
       
  1205 	if (!strcasecmp(function_name->value, "TIME_TO_REAL"))
       
  1206 		return function_time_to_real;
       
  1207 
       
  1208 	if (!strcasecmp(function_name->value, "TIME_TO_SINT"))
       
  1209 		return function_time_to_sint;
       
  1210 
       
  1211 	if (!strcasecmp(function_name->value, "TIME_TO_LINT"))
       
  1212 		return function_time_to_lint;
       
  1213 
       
  1214 	if (!strcasecmp(function_name->value, "TIME_TO_DINT"))
       
  1215 		return function_time_to_dint;
       
  1216 
       
  1217 	if (!strcasecmp(function_name->value, "TIME_TO_DATE"))
       
  1218 		return function_time_to_date;
       
  1219 
       
  1220 	if (!strcasecmp(function_name->value, "TIME_TO_DWORD"))
       
  1221 		return function_time_to_dword;
       
  1222 
       
  1223 	if (!strcasecmp(function_name->value, "TIME_TO_DT"))
       
  1224 		return function_time_to_dt;
       
  1225 
       
  1226 	if (!strcasecmp(function_name->value, "TIME_TO_TOD"))
       
  1227 		return function_time_to_tod;
       
  1228 
       
  1229 	if (!strcasecmp(function_name->value, "TIME_TO_UDINT"))
       
  1230 		return function_time_to_udint;
       
  1231 
       
  1232 	if (!strcasecmp(function_name->value, "TIME_TO_WORD"))
       
  1233 		return function_time_to_word;
       
  1234 
       
  1235 	if (!strcasecmp(function_name->value, "TIME_TO_WSTRING"))
       
  1236 		return function_time_to_wstring;
       
  1237 
       
  1238 	if (!strcasecmp(function_name->value, "TIME_TO_STRING"))
       
  1239 		return function_time_to_string;
       
  1240 
       
  1241 	if (!strcasecmp(function_name->value, "TIME_TO_LWORD"))
       
  1242 		return function_time_to_lword;
       
  1243 
       
  1244 	if (!strcasecmp(function_name->value, "TIME_TO_UINT"))
       
  1245 		return function_time_to_uint;
       
  1246 
       
  1247 	if (!strcasecmp(function_name->value, "TIME_TO_LREAL"))
       
  1248 		return function_time_to_lreal;
       
  1249 
       
  1250 	if (!strcasecmp(function_name->value, "TIME_TO_BYTE"))
       
  1251 		return function_time_to_byte;
       
  1252 
       
  1253 	if (!strcasecmp(function_name->value, "TIME_TO_USINT"))
       
  1254 		return function_time_to_usint;
       
  1255 
       
  1256 	if (!strcasecmp(function_name->value, "TIME_TO_ULINT"))
       
  1257 		return function_time_to_ulint;
       
  1258 
       
  1259 	if (!strcasecmp(function_name->value, "TIME_TO_BOOL"))
       
  1260 		return function_time_to_bool;
       
  1261 
       
  1262 	if (!strcasecmp(function_name->value, "TIME_TO_TIME"))
       
  1263 		return function_time_to_time;
       
  1264 
       
  1265 	if (!strcasecmp(function_name->value, "TIME_TO_INT"))
       
  1266 		return function_time_to_int;
       
  1267 
       
  1268 	if (!strcasecmp(function_name->value, "INT_TO_REAL"))
       
  1269 		return function_int_to_real;
       
  1270 
       
  1271 	if (!strcasecmp(function_name->value, "INT_TO_SINT"))
       
  1272 		return function_int_to_sint;
       
  1273 
       
  1274 	if (!strcasecmp(function_name->value, "INT_TO_LINT"))
       
  1275 		return function_int_to_lint;
       
  1276 
       
  1277 	if (!strcasecmp(function_name->value, "INT_TO_DINT"))
       
  1278 		return function_int_to_dint;
       
  1279 
       
  1280 	if (!strcasecmp(function_name->value, "INT_TO_DATE"))
       
  1281 		return function_int_to_date;
       
  1282 
       
  1283 	if (!strcasecmp(function_name->value, "INT_TO_DWORD"))
       
  1284 		return function_int_to_dword;
       
  1285 
       
  1286 	if (!strcasecmp(function_name->value, "INT_TO_DT"))
       
  1287 		return function_int_to_dt;
       
  1288 
       
  1289 	if (!strcasecmp(function_name->value, "INT_TO_TOD"))
       
  1290 		return function_int_to_tod;
       
  1291 
       
  1292 	if (!strcasecmp(function_name->value, "INT_TO_UDINT"))
       
  1293 		return function_int_to_udint;
       
  1294 
       
  1295 	if (!strcasecmp(function_name->value, "INT_TO_WORD"))
       
  1296 		return function_int_to_word;
       
  1297 
       
  1298 	if (!strcasecmp(function_name->value, "INT_TO_WSTRING"))
       
  1299 		return function_int_to_wstring;
       
  1300 
       
  1301 	if (!strcasecmp(function_name->value, "INT_TO_STRING"))
       
  1302 		return function_int_to_string;
       
  1303 
       
  1304 	if (!strcasecmp(function_name->value, "INT_TO_LWORD"))
       
  1305 		return function_int_to_lword;
       
  1306 
       
  1307 	if (!strcasecmp(function_name->value, "INT_TO_UINT"))
       
  1308 		return function_int_to_uint;
       
  1309 
       
  1310 	if (!strcasecmp(function_name->value, "INT_TO_LREAL"))
       
  1311 		return function_int_to_lreal;
       
  1312 
       
  1313 	if (!strcasecmp(function_name->value, "INT_TO_BYTE"))
       
  1314 		return function_int_to_byte;
       
  1315 
       
  1316 	if (!strcasecmp(function_name->value, "INT_TO_USINT"))
       
  1317 		return function_int_to_usint;
       
  1318 
       
  1319 	if (!strcasecmp(function_name->value, "INT_TO_ULINT"))
       
  1320 		return function_int_to_ulint;
       
  1321 
       
  1322 	if (!strcasecmp(function_name->value, "INT_TO_BOOL"))
       
  1323 		return function_int_to_bool;
       
  1324 
       
  1325 	if (!strcasecmp(function_name->value, "INT_TO_TIME"))
       
  1326 		return function_int_to_time;
       
  1327 
       
  1328 	if (!strcasecmp(function_name->value, "INT_TO_INT"))
       
  1329 		return function_int_to_int;
       
  1330 
       
  1331 	if (!strcasecmp(function_name->value, "TRUNC"))
       
  1332 		return function_trunc;
       
  1333 
       
  1334 	if (!strcasecmp(function_name->value, "BCD_TO_SINT"))
       
  1335 		return function_bcd_to_sint;
       
  1336 
       
  1337 	if (!strcasecmp(function_name->value, "BCD_TO_LINT"))
       
  1338 		return function_bcd_to_lint;
       
  1339 
       
  1340 	if (!strcasecmp(function_name->value, "BCD_TO_DINT"))
       
  1341 		return function_bcd_to_dint;
       
  1342 
       
  1343 	if (!strcasecmp(function_name->value, "BCD_TO_UDINT"))
       
  1344 		return function_bcd_to_udint;
       
  1345 
       
  1346 	if (!strcasecmp(function_name->value, "BCD_TO_UINT"))
       
  1347 		return function_bcd_to_uint;
       
  1348 
       
  1349 	if (!strcasecmp(function_name->value, "BCD_TO_USINT"))
       
  1350 		return function_bcd_to_usint;
       
  1351 
       
  1352 	if (!strcasecmp(function_name->value, "BCD_TO_ULINT"))
       
  1353 		return function_bcd_to_ulint;
       
  1354 
       
  1355 	if (!strcasecmp(function_name->value, "BCD_TO_INT"))
       
  1356 		return function_bcd_to_int;
       
  1357 
       
  1358 	if (!strcasecmp(function_name->value, "SINT_TO_BCD"))
       
  1359 		return function_sint_to_bcd;
       
  1360 
       
  1361 	if (!strcasecmp(function_name->value, "LINT_TO_BCD"))
       
  1362 		return function_lint_to_bcd;
       
  1363 
       
  1364 	if (!strcasecmp(function_name->value, "DINT_TO_BCD"))
       
  1365 		return function_dint_to_bcd;
       
  1366 
       
  1367 	if (!strcasecmp(function_name->value, "UDINT_TO_BCD"))
       
  1368 		return function_udint_to_bcd;
       
  1369 
       
  1370 	if (!strcasecmp(function_name->value, "UINT_TO_BCD"))
       
  1371 		return function_uint_to_bcd;
       
  1372 
       
  1373 	if (!strcasecmp(function_name->value, "USINT_TO_BCD"))
       
  1374 		return function_usint_to_bcd;
       
  1375 
       
  1376 	if (!strcasecmp(function_name->value, "ULINT_TO_BCD"))
       
  1377 		return function_ulint_to_bcd;
       
  1378 
       
  1379 	if (!strcasecmp(function_name->value, "INT_TO_BCD"))
       
  1380 		return function_int_to_bcd;
       
  1381 
       
  1382 	if (!strcasecmp(function_name->value, "DATE_AND_TIME_TO_TIME_OF_DAY"))
       
  1383 		return function_date_and_time_to_time_of_day;
       
  1384 
       
  1385 	if (!strcasecmp(function_name->value, "DATE_AND_TIME_TO_DATE"))
       
  1386 		return function_date_and_time_to_date;
       
  1387 
       
  1388 	if (!strcasecmp(function_name->value, "ABS"))
       
  1389 		return function_abs;
       
  1390 
       
  1391 	if (!strcasecmp(function_name->value, "SQRT"))
       
  1392 		return function_sqrt;
       
  1393 
       
  1394 	if (!strcasecmp(function_name->value, "LN"))
       
  1395 		return function_ln;
       
  1396 
       
  1397 	if (!strcasecmp(function_name->value, "LOG"))
       
  1398 		return function_log;
       
  1399 
       
  1400 	if (!strcasecmp(function_name->value, "EXP"))
       
  1401 		return function_exp;
       
  1402 
       
  1403 	if (!strcasecmp(function_name->value, "SIN"))
       
  1404 		return function_sin;
       
  1405 
       
  1406 	if (!strcasecmp(function_name->value, "COS"))
       
  1407 		return function_cos;
       
  1408 
       
  1409 	if (!strcasecmp(function_name->value, "TAN"))
       
  1410 		return function_tan;
       
  1411 
       
  1412 	if (!strcasecmp(function_name->value, "ASIN"))
       
  1413 		return function_asin;
       
  1414 
       
  1415 	if (!strcasecmp(function_name->value, "ACOS"))
       
  1416 		return function_acos;
       
  1417 
       
  1418 	if (!strcasecmp(function_name->value, "ATAN"))
       
  1419 		return function_atan;
       
  1420 
       
  1421 	if (!strcasecmp(function_name->value, "ADD"))
       
  1422 		return function_add;
       
  1423 
       
  1424 	if (!strcasecmp(function_name->value, "MUL"))
       
  1425 		return function_mul;
       
  1426 
       
  1427 	if (!strcasecmp(function_name->value, "SUB"))
       
  1428 		return function_sub;
       
  1429 
       
  1430 	if (!strcasecmp(function_name->value, "DIV"))
       
  1431 		return function_div;
       
  1432 
       
  1433 	if (!strcasecmp(function_name->value, "MOD"))
       
  1434 		return function_mod;
       
  1435 
       
  1436 	if (!strcasecmp(function_name->value, "EXPT"))
       
  1437 		return function_expt;
       
  1438 
       
  1439 	if (!strcasecmp(function_name->value, "MOVE"))
       
  1440 		return function_move;
       
  1441 
       
  1442 	if (!strcasecmp(function_name->value, "SHL"))
       
  1443 		return function_shl;
       
  1444 
       
  1445 	if (!strcasecmp(function_name->value, "SHR"))
       
  1446 		return function_shr;
       
  1447 
       
  1448 	if (!strcasecmp(function_name->value, "ROR"))
       
  1449 		return function_ror;
       
  1450 
       
  1451 	if (!strcasecmp(function_name->value, "ROL"))
       
  1452 		return function_rol;
       
  1453 
       
  1454 	if (!strcasecmp(function_name->value, "AND"))
       
  1455 		return function_and;
       
  1456 
       
  1457 	if (!strcasecmp(function_name->value, "OR"))
       
  1458 		return function_or;
       
  1459 
       
  1460 	if (!strcasecmp(function_name->value, "XOR"))
       
  1461 		return function_xor;
       
  1462 
       
  1463 	if (!strcasecmp(function_name->value, "NOT"))
       
  1464 		return function_not;
       
  1465 
       
  1466 	if (!strcasecmp(function_name->value, "SEL"))
       
  1467 		return function_sel;
       
  1468 
       
  1469 	if (!strcasecmp(function_name->value, "MAX"))
       
  1470 		return function_max;
       
  1471 
       
  1472 	if (!strcasecmp(function_name->value, "MIN"))
       
  1473 		return function_min;
       
  1474 
       
  1475 	if (!strcasecmp(function_name->value, "LIMIT"))
       
  1476 		return function_limit;
       
  1477 
       
  1478 	if (!strcasecmp(function_name->value, "MUX"))
       
  1479 		return function_mux;
       
  1480 
       
  1481 	if (!strcasecmp(function_name->value, "GT"))
       
  1482 		return function_gt;
       
  1483 
       
  1484 	if (!strcasecmp(function_name->value, "GE"))
       
  1485 		return function_ge;
       
  1486 
       
  1487 	if (!strcasecmp(function_name->value, "EQ"))
       
  1488 		return function_eq;
       
  1489 
       
  1490 	if (!strcasecmp(function_name->value, "LT"))
       
  1491 		return function_lt;
       
  1492 
       
  1493 	if (!strcasecmp(function_name->value, "LE"))
       
  1494 		return function_le;
       
  1495 
       
  1496 	if (!strcasecmp(function_name->value, "NE"))
       
  1497 		return function_ne;
       
  1498 
       
  1499 	if (!strcasecmp(function_name->value, "LEN"))
       
  1500 		return function_len;
       
  1501 
       
  1502 	if (!strcasecmp(function_name->value, "LEFT"))
       
  1503 		return function_left;
       
  1504 
       
  1505 	if (!strcasecmp(function_name->value, "RIGHT"))
       
  1506 		return function_right;
       
  1507 
       
  1508 	if (!strcasecmp(function_name->value, "MID"))
       
  1509 		return function_mid;
       
  1510 
       
  1511 	if (!strcasecmp(function_name->value, "CONCAT"))
       
  1512 		return function_concat;
       
  1513 
       
  1514 	if (!strcasecmp(function_name->value, "INSERT"))
       
  1515 		return function_insert;
       
  1516 
       
  1517 	if (!strcasecmp(function_name->value, "DELETE"))
       
  1518 		return function_delete;
       
  1519 
       
  1520 	if (!strcasecmp(function_name->value, "REPLACE"))
       
  1521 		return function_replace;
       
  1522 
       
  1523 	if (!strcasecmp(function_name->value, "FIND"))
       
  1524 		return function_find;
       
  1525 
       
  1526 	else return function_none;
       
  1527 }
       
  1528