00001 /* 00002 The lestes compiler suite 00003 Copyright (C) 2002, 2003, 2004, 2005 Miroslav Tichy 00004 Copyright (C) 2002, 2003, 2004, 2005 Petr Zika 00005 Copyright (C) 2002, 2003, 2004, 2005 Vojtech Hala 00006 Copyright (C) 2002, 2003, 2004, 2005 Jiri Kosina 00007 Copyright (C) 2002, 2003, 2004, 2005 Pavel Sanda 00008 Copyright (C) 2002, 2003, 2004, 2005 Jan Zouhar 00009 Copyright (C) 2002, 2003, 2004, 2005 Rudolf Thomas 00010 00011 This program is free software; you can redistribute it and/or modify 00012 it under the terms of the GNU General Public License as published by 00013 the Free Software Foundation; version 2 of the License. 00014 00015 This program is distributed in the hope that it will be useful, 00016 but WITHOUT ANY WARRANTY; without even the implied warranty of 00017 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00018 GNU General Public License for more details. 00019 00020 See the full text of the GNU General Public License version 2, and 00021 the limitations in the file doc/LICENSE. 00022 00023 By accepting the license the licensee waives any and all claims 00024 against the copyright holder(s) related in whole or in part to the 00025 work, its use, and/or the inability to use it. 00026 00027 */ 00028 #include <lestes/std/action.g.hh> 00029 00030 package(lestes); 00031 package(std); 00032 00033 /* 00034 * Field 'running' is used to prevent infinite recursion. 00035 */ 00036 void multi_action::run() 00037 { 00038 lassert( !running ); 00039 00040 running = true; 00041 typedef list< srp<action> > al_type; 00042 ptr<al_type> al = action_list_get(); 00043 for ( al_type::const_iterator it = al->begin(); it != al->end(); ++it ) 00044 (*it)->run(); 00045 running = false; 00046 } 00047 00048 void multi_action::trigger() 00049 { 00050 run(); 00051 } 00052 00053 void multi_action::attach( ptr<action> a ) 00054 { 00055 lassert2( a, "Tried to attach a NULL action." ); 00056 action_list_get()->push_back( a ); 00057 } 00058 00059 void multi_action::detach( ptr<action> ) 00060 { 00061 lassert2( false, "Not implemented yet. Will anyone ever need this?" ); 00062 } 00063 00064 end_package(std); 00065 end_package(lestes);
1.5.1-20070107