etisserant@33: etisserant@33: /**** etisserant@33: * IEC 61131-3 standard function lib etisserant@33: * generated code, do not edit by hand etisserant@33: */ etisserant@33: function_type_t get_function_type(identifier_c *function_name) { etisserant@33: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_LREAL")) etisserant@38: return function_real_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_SINT")) etisserant@38: return function_real_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_INT")) etisserant@38: return function_real_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_DINT")) etisserant@38: return function_real_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_LINT")) etisserant@38: return function_real_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_USINT")) etisserant@38: return function_real_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_UINT")) etisserant@38: return function_real_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_UDINT")) etisserant@38: return function_real_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_ULINT")) etisserant@38: return function_real_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_TIME")) etisserant@38: return function_real_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_BOOL")) etisserant@38: return function_real_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_BYTE")) etisserant@38: return function_real_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_WORD")) etisserant@38: return function_real_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_DWORD")) etisserant@38: return function_real_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_LWORD")) etisserant@38: return function_real_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_STRING")) etisserant@38: return function_real_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_DATE")) etisserant@38: return function_real_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_TOD")) etisserant@38: return function_real_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REAL_TO_DT")) etisserant@38: return function_real_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_REAL")) etisserant@38: return function_lreal_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_SINT")) etisserant@38: return function_lreal_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_INT")) etisserant@38: return function_lreal_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_DINT")) etisserant@38: return function_lreal_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_LINT")) etisserant@38: return function_lreal_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_USINT")) etisserant@38: return function_lreal_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_UINT")) etisserant@38: return function_lreal_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_UDINT")) etisserant@38: return function_lreal_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_ULINT")) etisserant@38: return function_lreal_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_TIME")) etisserant@38: return function_lreal_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_BOOL")) etisserant@38: return function_lreal_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_BYTE")) etisserant@38: return function_lreal_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_WORD")) etisserant@38: return function_lreal_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_DWORD")) etisserant@38: return function_lreal_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_LWORD")) etisserant@38: return function_lreal_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_STRING")) etisserant@38: return function_lreal_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_DATE")) etisserant@38: return function_lreal_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_TOD")) etisserant@38: return function_lreal_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LREAL_TO_DT")) etisserant@38: return function_lreal_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_REAL")) etisserant@38: return function_sint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_LREAL")) etisserant@38: return function_sint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_INT")) etisserant@38: return function_sint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_DINT")) etisserant@38: return function_sint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_LINT")) etisserant@38: return function_sint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_USINT")) etisserant@38: return function_sint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_UINT")) etisserant@38: return function_sint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_UDINT")) etisserant@38: return function_sint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_ULINT")) etisserant@38: return function_sint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_TIME")) etisserant@38: return function_sint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_BOOL")) etisserant@38: return function_sint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_BYTE")) etisserant@38: return function_sint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_WORD")) etisserant@38: return function_sint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_DWORD")) etisserant@38: return function_sint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_LWORD")) etisserant@38: return function_sint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_STRING")) etisserant@38: return function_sint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_DATE")) etisserant@38: return function_sint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_TOD")) etisserant@38: return function_sint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SINT_TO_DT")) etisserant@38: return function_sint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_REAL")) etisserant@38: return function_int_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_LREAL")) etisserant@38: return function_int_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_SINT")) etisserant@38: return function_int_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_DINT")) etisserant@38: return function_int_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_LINT")) etisserant@38: return function_int_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_USINT")) etisserant@38: return function_int_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_UINT")) etisserant@38: return function_int_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_UDINT")) etisserant@38: return function_int_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_ULINT")) etisserant@38: return function_int_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_TIME")) etisserant@38: return function_int_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_BOOL")) etisserant@38: return function_int_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_BYTE")) etisserant@38: return function_int_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_WORD")) etisserant@38: return function_int_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_DWORD")) etisserant@38: return function_int_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_LWORD")) etisserant@38: return function_int_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_STRING")) etisserant@38: return function_int_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_DATE")) etisserant@38: return function_int_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_TOD")) etisserant@38: return function_int_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INT_TO_DT")) etisserant@38: return function_int_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_REAL")) etisserant@38: return function_dint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_LREAL")) etisserant@38: return function_dint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_SINT")) etisserant@38: return function_dint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_INT")) etisserant@38: return function_dint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_LINT")) etisserant@38: return function_dint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_USINT")) etisserant@38: return function_dint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_UINT")) etisserant@38: return function_dint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_UDINT")) etisserant@38: return function_dint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_ULINT")) etisserant@38: return function_dint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_TIME")) etisserant@38: return function_dint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_BOOL")) etisserant@38: return function_dint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_BYTE")) etisserant@38: return function_dint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_WORD")) etisserant@38: return function_dint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_DWORD")) etisserant@38: return function_dint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_LWORD")) etisserant@38: return function_dint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_STRING")) etisserant@38: return function_dint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_DATE")) etisserant@38: return function_dint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_TOD")) etisserant@38: return function_dint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DINT_TO_DT")) etisserant@38: return function_dint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_REAL")) etisserant@38: return function_lint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_LREAL")) etisserant@38: return function_lint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_SINT")) etisserant@38: return function_lint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_INT")) etisserant@38: return function_lint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_DINT")) etisserant@38: return function_lint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_USINT")) etisserant@38: return function_lint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_UINT")) etisserant@38: return function_lint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_UDINT")) etisserant@38: return function_lint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_ULINT")) etisserant@38: return function_lint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_TIME")) etisserant@38: return function_lint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_BOOL")) etisserant@38: return function_lint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_BYTE")) etisserant@38: return function_lint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_WORD")) etisserant@38: return function_lint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_DWORD")) etisserant@38: return function_lint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_LWORD")) etisserant@38: return function_lint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_STRING")) etisserant@38: return function_lint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_DATE")) etisserant@38: return function_lint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_TOD")) etisserant@38: return function_lint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LINT_TO_DT")) etisserant@38: return function_lint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_REAL")) etisserant@38: return function_usint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_LREAL")) etisserant@38: return function_usint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_SINT")) etisserant@38: return function_usint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_INT")) etisserant@38: return function_usint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_DINT")) etisserant@38: return function_usint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_LINT")) etisserant@38: return function_usint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_UINT")) etisserant@38: return function_usint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_UDINT")) etisserant@38: return function_usint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_ULINT")) etisserant@38: return function_usint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_TIME")) etisserant@38: return function_usint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_BOOL")) etisserant@38: return function_usint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_BYTE")) etisserant@38: return function_usint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_WORD")) etisserant@38: return function_usint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_DWORD")) etisserant@38: return function_usint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_LWORD")) etisserant@38: return function_usint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_STRING")) etisserant@38: return function_usint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_DATE")) etisserant@38: return function_usint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_TOD")) etisserant@38: return function_usint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_DT")) etisserant@38: return function_usint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_REAL")) etisserant@38: return function_uint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_LREAL")) etisserant@38: return function_uint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_SINT")) etisserant@38: return function_uint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_INT")) etisserant@38: return function_uint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_DINT")) etisserant@38: return function_uint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_LINT")) etisserant@38: return function_uint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_USINT")) etisserant@38: return function_uint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_UDINT")) etisserant@38: return function_uint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_ULINT")) etisserant@38: return function_uint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_TIME")) etisserant@38: return function_uint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_BOOL")) etisserant@38: return function_uint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_BYTE")) etisserant@38: return function_uint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_WORD")) etisserant@38: return function_uint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_DWORD")) etisserant@38: return function_uint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_LWORD")) etisserant@38: return function_uint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_STRING")) etisserant@38: return function_uint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_DATE")) etisserant@38: return function_uint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_TOD")) etisserant@38: return function_uint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_DT")) etisserant@38: return function_uint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_REAL")) etisserant@38: return function_udint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_LREAL")) etisserant@38: return function_udint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_SINT")) etisserant@38: return function_udint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_INT")) etisserant@38: return function_udint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_DINT")) etisserant@38: return function_udint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_LINT")) etisserant@38: return function_udint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_USINT")) etisserant@38: return function_udint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_UINT")) etisserant@38: return function_udint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_ULINT")) etisserant@38: return function_udint_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_TIME")) etisserant@38: return function_udint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_BOOL")) etisserant@38: return function_udint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_BYTE")) etisserant@38: return function_udint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_WORD")) etisserant@38: return function_udint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_DWORD")) etisserant@38: return function_udint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_LWORD")) etisserant@38: return function_udint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_STRING")) etisserant@38: return function_udint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_DATE")) etisserant@38: return function_udint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_TOD")) etisserant@38: return function_udint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_DT")) etisserant@38: return function_udint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_REAL")) etisserant@38: return function_ulint_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_LREAL")) etisserant@38: return function_ulint_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_SINT")) etisserant@38: return function_ulint_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_INT")) etisserant@38: return function_ulint_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_DINT")) etisserant@38: return function_ulint_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_LINT")) etisserant@38: return function_ulint_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_USINT")) etisserant@38: return function_ulint_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_UINT")) etisserant@38: return function_ulint_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_UDINT")) etisserant@38: return function_ulint_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_TIME")) etisserant@38: return function_ulint_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_BOOL")) etisserant@38: return function_ulint_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_BYTE")) etisserant@38: return function_ulint_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_WORD")) etisserant@38: return function_ulint_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_DWORD")) etisserant@38: return function_ulint_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_LWORD")) etisserant@38: return function_ulint_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_STRING")) etisserant@38: return function_ulint_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_DATE")) etisserant@38: return function_ulint_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_TOD")) etisserant@38: return function_ulint_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_DT")) etisserant@38: return function_ulint_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_REAL")) etisserant@38: return function_time_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_LREAL")) etisserant@38: return function_time_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_SINT")) etisserant@38: return function_time_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_INT")) etisserant@38: return function_time_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_DINT")) etisserant@38: return function_time_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_LINT")) etisserant@38: return function_time_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_USINT")) etisserant@38: return function_time_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_UINT")) etisserant@38: return function_time_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_UDINT")) etisserant@38: return function_time_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_ULINT")) etisserant@38: return function_time_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_BOOL")) etisserant@38: return function_time_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_BYTE")) etisserant@38: return function_time_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_WORD")) etisserant@38: return function_time_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_DWORD")) etisserant@38: return function_time_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_LWORD")) etisserant@38: return function_time_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TIME_TO_STRING")) etisserant@38: return function_time_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_REAL")) etisserant@38: return function_bool_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_LREAL")) etisserant@38: return function_bool_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_SINT")) etisserant@38: return function_bool_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_INT")) etisserant@38: return function_bool_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_DINT")) etisserant@38: return function_bool_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_LINT")) etisserant@38: return function_bool_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_USINT")) etisserant@38: return function_bool_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_UINT")) etisserant@38: return function_bool_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_UDINT")) etisserant@38: return function_bool_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_ULINT")) etisserant@38: return function_bool_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_TIME")) etisserant@38: return function_bool_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_BYTE")) etisserant@38: return function_bool_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_WORD")) etisserant@38: return function_bool_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_DWORD")) etisserant@38: return function_bool_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_LWORD")) etisserant@38: return function_bool_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_STRING")) etisserant@38: return function_bool_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_DATE")) etisserant@38: return function_bool_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_TOD")) etisserant@38: return function_bool_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BOOL_TO_DT")) etisserant@38: return function_bool_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_REAL")) etisserant@38: return function_byte_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_LREAL")) etisserant@38: return function_byte_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_SINT")) etisserant@38: return function_byte_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_INT")) etisserant@38: return function_byte_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_DINT")) etisserant@38: return function_byte_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_LINT")) etisserant@38: return function_byte_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_USINT")) etisserant@38: return function_byte_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_UINT")) etisserant@38: return function_byte_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_UDINT")) etisserant@38: return function_byte_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_ULINT")) etisserant@38: return function_byte_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_TIME")) etisserant@38: return function_byte_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_BOOL")) etisserant@38: return function_byte_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_WORD")) etisserant@38: return function_byte_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_DWORD")) etisserant@38: return function_byte_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_LWORD")) etisserant@38: return function_byte_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_STRING")) etisserant@38: return function_byte_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_DATE")) etisserant@38: return function_byte_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_TOD")) etisserant@38: return function_byte_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BYTE_TO_DT")) etisserant@38: return function_byte_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_REAL")) etisserant@38: return function_word_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_LREAL")) etisserant@38: return function_word_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_SINT")) etisserant@38: return function_word_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_INT")) etisserant@38: return function_word_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_DINT")) etisserant@38: return function_word_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_LINT")) etisserant@38: return function_word_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_USINT")) etisserant@38: return function_word_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_UINT")) etisserant@38: return function_word_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_UDINT")) etisserant@38: return function_word_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_ULINT")) etisserant@38: return function_word_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_TIME")) etisserant@38: return function_word_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_BOOL")) etisserant@38: return function_word_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_BYTE")) etisserant@38: return function_word_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_DWORD")) etisserant@38: return function_word_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_LWORD")) etisserant@38: return function_word_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_STRING")) etisserant@38: return function_word_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_DATE")) etisserant@38: return function_word_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_TOD")) etisserant@38: return function_word_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "WORD_TO_DT")) etisserant@38: return function_word_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_REAL")) etisserant@38: return function_dword_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_LREAL")) etisserant@38: return function_dword_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_SINT")) etisserant@38: return function_dword_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_INT")) etisserant@38: return function_dword_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_DINT")) etisserant@38: return function_dword_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_LINT")) etisserant@38: return function_dword_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_USINT")) etisserant@38: return function_dword_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_UINT")) etisserant@38: return function_dword_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_UDINT")) etisserant@38: return function_dword_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_ULINT")) etisserant@38: return function_dword_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_TIME")) etisserant@38: return function_dword_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_BOOL")) etisserant@38: return function_dword_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_BYTE")) etisserant@38: return function_dword_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_WORD")) etisserant@38: return function_dword_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_LWORD")) etisserant@38: return function_dword_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_STRING")) etisserant@38: return function_dword_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_DATE")) etisserant@38: return function_dword_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_TOD")) etisserant@38: return function_dword_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DWORD_TO_DT")) etisserant@38: return function_dword_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_REAL")) etisserant@38: return function_lword_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_LREAL")) etisserant@38: return function_lword_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_SINT")) etisserant@38: return function_lword_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_INT")) etisserant@38: return function_lword_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_DINT")) etisserant@38: return function_lword_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_LINT")) etisserant@38: return function_lword_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_USINT")) etisserant@38: return function_lword_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_UINT")) etisserant@38: return function_lword_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_UDINT")) etisserant@38: return function_lword_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_ULINT")) etisserant@38: return function_lword_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_TIME")) etisserant@38: return function_lword_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_BOOL")) etisserant@38: return function_lword_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_BYTE")) etisserant@38: return function_lword_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_WORD")) etisserant@38: return function_lword_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_DWORD")) etisserant@38: return function_lword_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_STRING")) etisserant@38: return function_lword_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_DATE")) etisserant@38: return function_lword_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_TOD")) etisserant@38: return function_lword_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LWORD_TO_DT")) etisserant@38: return function_lword_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_REAL")) etisserant@38: return function_string_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_LREAL")) etisserant@38: return function_string_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_SINT")) etisserant@38: return function_string_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_INT")) etisserant@38: return function_string_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_DINT")) etisserant@38: return function_string_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_LINT")) etisserant@38: return function_string_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_USINT")) etisserant@38: return function_string_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_UINT")) etisserant@38: return function_string_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_UDINT")) etisserant@38: return function_string_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_ULINT")) etisserant@38: return function_string_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_TIME")) etisserant@38: return function_string_to_time; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_BOOL")) etisserant@38: return function_string_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_BYTE")) etisserant@38: return function_string_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_WORD")) etisserant@38: return function_string_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_DWORD")) etisserant@38: return function_string_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_LWORD")) etisserant@38: return function_string_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_DATE")) etisserant@38: return function_string_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_TOD")) etisserant@38: return function_string_to_tod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "STRING_TO_DT")) etisserant@38: return function_string_to_dt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_REAL")) etisserant@38: return function_date_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_LREAL")) etisserant@38: return function_date_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_SINT")) etisserant@38: return function_date_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_INT")) etisserant@38: return function_date_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_DINT")) etisserant@38: return function_date_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_LINT")) etisserant@38: return function_date_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_USINT")) etisserant@38: return function_date_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_UINT")) etisserant@38: return function_date_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_UDINT")) etisserant@38: return function_date_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_ULINT")) etisserant@38: return function_date_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_BOOL")) etisserant@38: return function_date_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_BYTE")) etisserant@38: return function_date_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_WORD")) etisserant@38: return function_date_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_DWORD")) etisserant@38: return function_date_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_LWORD")) etisserant@38: return function_date_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_TO_STRING")) etisserant@38: return function_date_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_REAL")) etisserant@38: return function_tod_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_LREAL")) etisserant@38: return function_tod_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_SINT")) etisserant@38: return function_tod_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_INT")) etisserant@38: return function_tod_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_DINT")) etisserant@38: return function_tod_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_LINT")) etisserant@38: return function_tod_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_USINT")) etisserant@38: return function_tod_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_UINT")) etisserant@38: return function_tod_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_UDINT")) etisserant@38: return function_tod_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_ULINT")) etisserant@38: return function_tod_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_BOOL")) etisserant@38: return function_tod_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_BYTE")) etisserant@38: return function_tod_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_WORD")) etisserant@38: return function_tod_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_DWORD")) etisserant@38: return function_tod_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_LWORD")) etisserant@38: return function_tod_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TOD_TO_STRING")) etisserant@38: return function_tod_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_REAL")) etisserant@38: return function_dt_to_real; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_LREAL")) etisserant@38: return function_dt_to_lreal; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_SINT")) etisserant@38: return function_dt_to_sint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_INT")) etisserant@38: return function_dt_to_int; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_DINT")) etisserant@38: return function_dt_to_dint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_LINT")) etisserant@38: return function_dt_to_lint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_USINT")) etisserant@38: return function_dt_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_UINT")) etisserant@38: return function_dt_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_UDINT")) etisserant@38: return function_dt_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_ULINT")) etisserant@38: return function_dt_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_BOOL")) etisserant@38: return function_dt_to_bool; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_BYTE")) etisserant@38: return function_dt_to_byte; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_WORD")) etisserant@38: return function_dt_to_word; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_DWORD")) etisserant@38: return function_dt_to_dword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_LWORD")) etisserant@38: return function_dt_to_lword; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DT_TO_STRING")) etisserant@38: return function_dt_to_string; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TRUNC")) etisserant@38: return function_trunc; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BCD_TO_USINT")) etisserant@38: return function_bcd_to_usint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BCD_TO_UINT")) etisserant@38: return function_bcd_to_uint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BCD_TO_UDINT")) etisserant@38: return function_bcd_to_udint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "BCD_TO_ULINT")) etisserant@38: return function_bcd_to_ulint; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "USINT_TO_BCD")) etisserant@38: return function_usint_to_bcd; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UINT_TO_BCD")) etisserant@38: return function_uint_to_bcd; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "UDINT_TO_BCD")) etisserant@38: return function_udint_to_bcd; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ULINT_TO_BCD")) etisserant@38: return function_ulint_to_bcd; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_AND_TIME_TO_TIME_OF_DAY")) etisserant@38: return function_date_and_time_to_time_of_day; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DATE_AND_TIME_TO_DATE")) etisserant@38: return function_date_and_time_to_date; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ABS")) etisserant@38: return function_abs; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SQRT")) etisserant@38: return function_sqrt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LN")) etisserant@38: return function_ln; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LOG")) etisserant@38: return function_log; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "EXP")) etisserant@38: return function_exp; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SIN")) etisserant@38: return function_sin; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "COS")) etisserant@38: return function_cos; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "TAN")) etisserant@38: return function_tan; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ASIN")) etisserant@38: return function_asin; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ACOS")) etisserant@38: return function_acos; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ATAN")) etisserant@38: return function_atan; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ADD")) etisserant@38: return function_add; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MUL")) etisserant@38: return function_mul; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SUB")) etisserant@38: return function_sub; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DIV")) etisserant@38: return function_div; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MOD")) etisserant@38: return function_mod; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "EXPT")) etisserant@38: return function_expt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MOVE")) etisserant@38: return function_move; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SHL")) etisserant@38: return function_shl; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SHR")) etisserant@38: return function_shr; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ROR")) etisserant@38: return function_ror; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "ROL")) etisserant@38: return function_rol; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "AND")) etisserant@38: return function_and; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "OR")) etisserant@38: return function_or; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "XOR")) etisserant@38: return function_xor; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "NOT")) etisserant@38: return function_not; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "SEL")) etisserant@38: return function_sel; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MAX")) etisserant@38: return function_max; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MIN")) etisserant@38: return function_min; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LIMIT")) etisserant@38: return function_limit; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MUX")) etisserant@38: return function_mux; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "GT")) etisserant@38: return function_gt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "GE")) etisserant@38: return function_ge; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "EQ")) etisserant@38: return function_eq; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LT")) etisserant@38: return function_lt; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LE")) etisserant@38: return function_le; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "NE")) etisserant@38: return function_ne; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LEN")) etisserant@38: return function_len; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "LEFT")) etisserant@38: return function_left; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "RIGHT")) etisserant@38: return function_right; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "MID")) etisserant@38: return function_mid; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "CONCAT")) etisserant@38: return function_concat; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "INSERT")) etisserant@38: return function_insert; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "DELETE")) etisserant@38: return function_delete; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "REPLACE")) etisserant@38: return function_replace; etisserant@38: etisserant@38: if (!strcasecmp(function_name->value, "FIND")) etisserant@38: return function_find; lbessard@35: lbessard@35: else return function_none; etisserant@33: } etisserant@33: