diff -r 050d31dd7c74 -r c0453b7f99df absyntax_utils/get_function_type_decl.c --- a/absyntax_utils/get_function_type_decl.c Mon Apr 04 19:18:22 2011 +0200 +++ b/absyntax_utils/get_function_type_decl.c Tue Apr 05 15:14:19 2011 +0200 @@ -1,32 +1,20 @@ /* - * matiec - a compiler for the programming languages defined in IEC 61131-3 + * Copyright (C) 2007-2011: Edouard TISSERANT and Laurent BESSARD * - * Copyright (C) 2008 Edouard TISSERANT + * See COPYING and COPYING.LESSER files for copyright details. * - * This program is free software: you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation, either version 3 of the License, or - * (at your option) any later version. + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see . - * - * - * This code is made available on the understanding that it will not be - * used in safety-critical situations without a full and competent review. - */ - - -/* - * An IEC 61131-3 IL and ST compiler. - * - * Based on the - * FINAL DRAFT - IEC 61131-3, 2nd Ed. (2001-12-10) + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . * */ @@ -1199,15 +1187,45 @@ if (!strcasecmp(function_name->value, "ADD")) return function_add; +if (!strcasecmp(function_name->value, "ADD_TIME")) + return function_add_time; + +if (!strcasecmp(function_name->value, "ADD_TOD_TIME")) + return function_add_tod_time; + +if (!strcasecmp(function_name->value, "ADD_DT_TIME")) + return function_add_dt_time; + if (!strcasecmp(function_name->value, "MUL")) return function_mul; +if (!strcasecmp(function_name->value, "MULTIME")) + return function_multime; + if (!strcasecmp(function_name->value, "SUB")) return function_sub; +if (!strcasecmp(function_name->value, "SUB_TIME")) + return function_sub_time; + +if (!strcasecmp(function_name->value, "SUB_DATE_DATE")) + return function_sub_date_date; + +if (!strcasecmp(function_name->value, "SUB_TOD_TIME")) + return function_sub_tod_time; + +if (!strcasecmp(function_name->value, "SUB_TOD_TOD")) + return function_sub_tod_tod; + +if (!strcasecmp(function_name->value, "SUB_DT_TIME")) + return function_sub_dt_time; + if (!strcasecmp(function_name->value, "DIV")) return function_div; +if (!strcasecmp(function_name->value, "DIVTIME")) + return function_divtime; + if (!strcasecmp(function_name->value, "MOD")) return function_mod; @@ -1289,6 +1307,9 @@ if (!strcasecmp(function_name->value, "CONCAT")) return function_concat; +if (!strcasecmp(function_name->value, "CONCAT_DAT_TOD")) + return function_concat_dat_tod; + if (!strcasecmp(function_name->value, "INSERT")) return function_insert;