/* * Copyright (c) 2011 Stephen Williams (steve@icarus.com) * * This source code is free software; you can redistribute it * and/or modify it in source code form under the terms of the GNU * General Public License as published by the Free Software * Foundation; either version 2 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. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA */ # include "package.h" # include "entity.h" Package::Package(perm_string n, const ScopeBase&ref) : Scope(ref), name_(n) { } Package::~Package() { ScopeBase::cleanup(); } void Package::write_to_stream(ostream&fd) const { fd << "package " << name_ << " is" << endl; for (map::const_iterator cur = old_components_.begin() ; cur != old_components_.end() ; ++cur) { cur->second->write_to_stream(fd); } for (map::const_iterator cur = new_components_.begin() ; cur != new_components_.end() ; ++cur) { cur->second->write_to_stream(fd); } fd << "end package " << name_ << ";" << endl; }