1998-11-04 00:28:49 +01:00
|
|
|
/*
|
|
|
|
|
* Copyright (c) 1998 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
|
|
|
|
|
*/
|
|
|
|
|
#if !defined(WINNT)
|
1999-05-01 04:57:52 +02:00
|
|
|
#ident "$Id: target.cc,v 1.8 1999/05/01 02:57:53 steve Exp $"
|
1998-11-04 00:28:49 +01:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
# include "target.h"
|
|
|
|
|
# include <typeinfo>
|
|
|
|
|
|
|
|
|
|
target_t::~target_t()
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::start_design(ostream&os, const Design*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::signal(ostream&os, const NetNet*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-19 03:59:36 +02:00
|
|
|
void target_t::memory(ostream&os, const NetMemory*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled memory." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
void target_t::logic(ostream&os, const NetLogic*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::bufz(ostream&os, const NetBUFZ*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled continuous assign (BUFZ)." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-12-01 01:42:13 +01:00
|
|
|
void target_t::udp(ostream&os, const NetUDP*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled UDP." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
void target_t::net_assign(ostream&os, const NetAssign*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-09 19:55:33 +01:00
|
|
|
void target_t::net_const(ostream&os, const NetConst*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled CONSTANT node." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1999-02-08 03:49:56 +01:00
|
|
|
void target_t::net_esignal(ostream&os, const NetESignal*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled Expression Signal node." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-01 04:57:52 +02:00
|
|
|
void target_t::net_event(ostream&os, const NetNEvent*)
|
1998-11-04 00:28:49 +01:00
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
1999-05-01 04:57:52 +02:00
|
|
|
"Unhandled EVENT net node." << endl;
|
1998-11-04 00:28:49 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::start_process(ostream&os, const NetProcTop*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::proc_assign(ostream&os, const NetAssign*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::proc_block(ostream&os, const NetBlock*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
1999-02-08 03:49:56 +01:00
|
|
|
void target_t::proc_case(ostream&os, const NetCase*cur)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled case:" << endl;
|
|
|
|
|
cur->dump(cerr, 6);
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-07 18:05:05 +01:00
|
|
|
void target_t::proc_condit(ostream&os, const NetCondit*condit)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled conditional:" << endl;
|
|
|
|
|
condit->dump(cerr, 6);
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
void target_t::proc_delay(ostream&os, const NetPDelay*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled proc_delay." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::proc_event(ostream&os, const NetPEvent*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled proc_event." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::proc_task(ostream&os, const NetTask*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-09 19:55:33 +01:00
|
|
|
void target_t::proc_while(ostream&os, const NetWhile*net)
|
|
|
|
|
{
|
|
|
|
|
cerr << "target (" << typeid(*this).name() << "): "
|
|
|
|
|
"Unhandled while:" << endl;
|
|
|
|
|
net->dump(cerr, 6);
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
void target_t::end_process(ostream&os, const NetProcTop*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void target_t::end_design(ostream&os, const Design*)
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
expr_scan_t::~expr_scan_t()
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void expr_scan_t::expr_const(const NetEConst*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_const." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void expr_scan_t::expr_ident(const NetEIdent*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_ident." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-19 03:59:36 +02:00
|
|
|
void expr_scan_t::expr_memory(const NetEMemory*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_memory." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-07 18:05:05 +01:00
|
|
|
void expr_scan_t::expr_signal(const NetESignal*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_signal." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-25 02:44:10 +02:00
|
|
|
void expr_scan_t::expr_subsignal(const NetESubSignal*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_subsignal." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
void expr_scan_t::expr_unary(const NetEUnary*)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_unary." << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-07 18:05:05 +01:00
|
|
|
void expr_scan_t::expr_binary(const NetEBinary*ex)
|
|
|
|
|
{
|
|
|
|
|
cerr << "expr_scan_t (" << typeid(*this).name() << "): "
|
|
|
|
|
"unhandled expr_binary: " <<*ex << endl;
|
|
|
|
|
}
|
|
|
|
|
|
1998-11-04 00:28:49 +01:00
|
|
|
/*
|
|
|
|
|
* $Log: target.cc,v $
|
1999-05-01 04:57:52 +02:00
|
|
|
* Revision 1.8 1999/05/01 02:57:53 steve
|
|
|
|
|
* Handle much more complex event expressions.
|
|
|
|
|
*
|
1999-04-25 02:44:10 +02:00
|
|
|
* Revision 1.7 1999/04/25 00:44:10 steve
|
|
|
|
|
* Core handles subsignal expressions.
|
|
|
|
|
*
|
1999-04-19 03:59:36 +02:00
|
|
|
* Revision 1.6 1999/04/19 01:59:37 steve
|
|
|
|
|
* Add memories to the parse and elaboration phases.
|
|
|
|
|
*
|
1999-02-08 03:49:56 +01:00
|
|
|
* Revision 1.5 1999/02/08 02:49:56 steve
|
|
|
|
|
* Turn the NetESignal into a NetNode so
|
|
|
|
|
* that it can connect to the netlist.
|
|
|
|
|
* Implement the case statement.
|
|
|
|
|
* Convince t-vvm to output code for
|
|
|
|
|
* the case statement.
|
|
|
|
|
*
|
1998-12-01 01:42:13 +01:00
|
|
|
* Revision 1.4 1998/12/01 00:42:15 steve
|
|
|
|
|
* Elaborate UDP devices,
|
|
|
|
|
* Support UDP type attributes, and
|
|
|
|
|
* pass those attributes to nodes that
|
|
|
|
|
* are instantiated by elaboration,
|
|
|
|
|
* Put modules into a map instead of
|
|
|
|
|
* a simple list.
|
|
|
|
|
*
|
1998-11-09 19:55:33 +01:00
|
|
|
* Revision 1.3 1998/11/09 18:55:34 steve
|
|
|
|
|
* Add procedural while loops,
|
|
|
|
|
* Parse procedural for loops,
|
|
|
|
|
* Add procedural wait statements,
|
|
|
|
|
* Add constant nodes,
|
|
|
|
|
* Add XNOR logic gate,
|
|
|
|
|
* Make vvm output look a bit prettier.
|
|
|
|
|
*
|
1998-11-07 18:05:05 +01:00
|
|
|
* Revision 1.2 1998/11/07 17:05:06 steve
|
|
|
|
|
* Handle procedural conditional, and some
|
|
|
|
|
* of the conditional expressions.
|
|
|
|
|
*
|
|
|
|
|
* Elaborate signals and identifiers differently,
|
|
|
|
|
* allowing the netlist to hold signal information.
|
|
|
|
|
*
|
1998-11-04 00:28:49 +01:00
|
|
|
* Revision 1.1 1998/11/03 23:29:06 steve
|
|
|
|
|
* Introduce verilog to CVS.
|
|
|
|
|
*
|
|
|
|
|
*/
|
|
|
|
|
|