1 /* 2 3 This file is part of the Maude 2 interpreter. 4 5 Copyright 1997-2003 SRI International, Menlo Park, CA 94025, USA. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 2 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the Free Software 19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. 20 21 */ 22 23 // 24 // Class for symbols for built in loop operation. 25 // 26 #ifndef _loopSymbol_hh_ 27 #define _loopSymbol_hh_ 28 #include "freeSymbol.hh" 29 30 class LoopSymbol : public FreeSymbol 31 { 32 public: 33 LoopSymbol(int id); 34 35 bool attachData(const Vector<Sort*>& opDeclaration, 36 const char* purpose, 37 const Vector<const char*>& data); 38 bool attachSymbol(const char* purpose, Symbol* symbol); 39 void copyAttachments(Symbol* original, SymbolMap* map); 40 void getDataAttachments(const Vector<Sort*>& opDeclaration, 41 Vector<const char*>& purposes, 42 Vector<Vector<const char*> >& data); 43 void getSymbolAttachments(Vector<const char*>& purposes, 44 Vector<Symbol*>& symbols); 45 46 bool extractOutput(DagNode* loopNode, Vector<int>& bubble); 47 DagNode* injectInput(DagNode* loopNode, const Vector<Token>& bubble); 48 49 private: 50 NO_COPYING(LoopSymbol); 51 52 DagNode* createQidList(const Vector<Token>& ids); 53 bool extractQid(DagNode* metaQid, int& id); 54 bool extractQidList(DagNode* metaQidList, Vector<int>& ids); 55 56 static const Vector<int> eagerStrategy; 57 58 QuotedIdentifierSymbol* qidSymbol; 59 Symbol* nilQidListSymbol; 60 AU_Symbol* qidListSymbol; 61 }; 62 63 #endif 64