mirrors/yosys
3
0
Fork 0
mirror of https://github.com/YosysHQ/yosys synced 2025-04-27 19:05:52 +00:00
Code Activity

Implemented TCL support (only via -c option at the moment)

Browse source
This commit is contained in:
Clifford Wolf 2013-03-28 12:26:17 +01:00
parent b9870a364e
commit 73fba5164f
5 changed files with 83 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

30
kernel/register.cc
View file

@ -27,6 +27,11 @@
using namespace REGISTER_INTERN;
#define MAX_REG_COUNT 1000
#ifdef YOSYS_ENABLE_TCL
Tcl_Interp *yosys_tcl = NULL;
RTLIL::Design *yosys_tcl_design = NULL;
#endif
namespace REGISTER_INTERN
{
int raw_register_count = 0;
@ -51,6 +56,8 @@ void Pass::run_register()
{
assert(pass_register.count(pass_name) == 0);
pass_register[pass_name] = this;
register_tcl();
}
void Pass::init_register()
@ -70,6 +77,25 @@ void Pass::done_register()
raw_register_done = false;
}
#ifdef YOSYS_ENABLE_TCL
static int tcl_pass(ClientData that_vp, Tcl_Interp*, int argc, const char *argv[])
{
Pass *that = (Pass*)that_vp;
std::vector<std::string> args;
for (int i = 0; i < argc; i++)
args.push_back(argv[i]);
that->call(yosys_tcl_design, args);
return TCL_OK;
}
#endif
void Pass::register_tcl()
{
#ifdef YOSYS_ENABLE_TCL
Tcl_CreateCommand(yosys_tcl, pass_name.c_str(), tcl_pass, (ClientData)this, NULL);
#endif
}
Pass::~Pass()
{
}
@ -189,6 +215,8 @@ void Frontend::run_register()
assert(frontend_register.count(frontend_name) == 0);
frontend_register[frontend_name] = this;
register_tcl();
}
Frontend::~Frontend()
@ -281,6 +309,8 @@ void Backend::run_register()
assert(backend_register.count(backend_name) == 0);
backend_register[backend_name] = this;
register_tcl();
}
Backend::~Backend()