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