URL
https://opencores.org/ocsvn/w11/w11/trunk
Subversion Repositories w11
[/] [w11/] [tags/] [w11a_V0.6/] [tools/] [src/] [librwxxtpp/] [RtclRw11UnitPC11.cpp] - Rev 31
Go to most recent revision | Compare with Previous | Blame | View Log
// $Id: RtclRw11UnitPC11.cpp 515 2013-05-04 17:28:59Z mueller $ // // Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de> // // This program is free software; you may redistribute and/or modify it under // the terms of the GNU General Public License as published by the Free // Software Foundation, either version 2, 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 complete details. // // Revision History: // Date Rev Version Comment // 2013-05-03 515 1.0 Initial version // --------------------------------------------------------------------------- /*! \file \version $Id: RtclRw11UnitPC11.cpp 515 2013-05-04 17:28:59Z mueller $ \brief Implemenation of RtclRw11UnitPC11. */ #include "RtclRw11UnitPC11.hpp" using namespace std; /*! \class Retro::RtclRw11UnitPC11 \brief FIXME_docs */ // all method definitions in namespace Retro namespace Retro { //------------------------------------------+----------------------------------- //! Constructor RtclRw11UnitPC11::RtclRw11UnitPC11(Tcl_Interp* interp, const std::string& unitcmd, const boost::shared_ptr<Rw11UnitPC11>& spunit) : RtclRw11UnitBase<Rw11UnitPC11>("Rw11UnitPC11", spunit), RtclRw11UnitStream(this, spunit.get()) { // create default unit command CreateObjectCmd(interp, unitcmd.c_str()); // for 1st PC11, create also alias // cpuxpca0 -> cpuxpr // cpuxpca1 -> cpuxpp if (unitcmd.length() == 8) { size_t ind = spunit->Index(); if (unitcmd.length() == 8 && unitcmd.substr(4,3) == "pca") { string alias = unitcmd.substr(0,4); alias += (ind==Rw11CntlPC11::kUnit_PR) ? "pr" : "pp"; Tcl_CreateAlias(interp, alias.c_str(), interp, unitcmd.c_str(), 0, NULL); } } } //------------------------------------------+----------------------------------- //! Destructor RtclRw11UnitPC11::~RtclRw11UnitPC11() {} } // end namespace Retro
Go to most recent revision | Compare with Previous | Blame | View Log