1 /********************************************************************/ 2 /* */ 3 /* s7 Seed7 interpreter */ 4 /* Copyright (C) 1990 - 2000 Thomas Mertes */ 5 /* */ 6 /* This program is free software; you can redistribute it and/or */ 7 /* modify it under the terms of the GNU General Public License as */ 8 /* published by the Free Software Foundation; either version 2 of */ 9 /* the License, or (at your option) any later version. */ 10 /* */ 11 /* This program is distributed in the hope that it will be useful, */ 12 /* but WITHOUT ANY WARRANTY; without even the implied warranty of */ 13 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ 14 /* GNU General Public License for more details. */ 15 /* */ 16 /* You should have received a copy of the GNU General Public */ 17 /* License along with this program; if not, write to the */ 18 /* Free Software Foundation, Inc., 51 Franklin Street, */ 19 /* Fifth Floor, Boston, MA 02110-1301, USA. */ 20 /* */ 21 /* Module: Analyzer */ 22 /* File: seed7/src/name.h */ 23 /* Changes: 1994 Thomas Mertes */ 24 /* Content: Enter an object in a specified declaration level. */ 25 /* */ 26 /********************************************************************/ 27 28 void disconnect_param_entities (const const_objectType objWithParams); 29 void init_stack (progType currentProg, errInfoType *err_info); 30 void close_stack (progType currentProg); 31 void grow_stack (errInfoType *err_info); 32 void shrink_stack (void); 33 void push_stack (void); 34 void pop_stack (void); 35 listType *get_local_object_insert_place (void); 36 objectType entername (nodeType declaration_base, objectType object_name, 37 errInfoType *err_info); 38 objectType find_name (nodeType declaration_base, const_objectType object_name, 39 errInfoType *err_info); 40 objectType search_name (const_nodeType declaration_base, 41 const_objectType object_name, errInfoType *err_info); 42 objectType dollar_entername (nodeType declaration_base, objectType object_name, 43 errInfoType *err_info); 44