mirror of
https://github.com/holub/mame
synced 2025-10-05 00:38:58 +03:00
404e589cff
Object model optimisation.
Merge remote-tracking branch 'origin/master' into netlist_dev
Fix a merge issue.
#if ==> #elif. Ouch.
Default PHAS_PMF_INTERNAL=0 for 32bit windows mingw.
Change UINT8 to uint_[fast|least|8_t.
Move state_var so it can be used by base devices as well.
Remove last traces of ATTR_ALIGN.
Refactored netlist_time into a template.
Removed implicit double assignment to netlist. Doomed to produce
bugs.
Instead, use netlist_time::from_double.
Switch to using proper (i.e. bool type) param_logic_t.
Formally differentiate between logic inputs (e.g. switches) and int
inputs (e.g. resistor ladders or selection switches).
Added parameter USE_DEACTIVATE to truthtable devices.
Added more constexpr to netlist_time.
Fixed some ifdef code paths.
- More c++.
- Simplify main processing loop. As a nice side-effect that squeezed
out some cycles.
- More cycle squeezing.
- Removed pvector_t.
- Use std::sort.
- Refactored netlist state manager.
- Introduction of state_var object template to be used on device
state
members.
- Changed remaining save occurrences to state_var.
- Rewrote nltool's listdevices command. This allowed removal of one
member from devices which served solely for listdevices.
- Remove hashmap_t. Fix kidniki regression.
220 lines
5.9 KiB
C++
220 lines
5.9 KiB
C++
// license:GPL-2.0+
|
|
// copyright-holders:Couriersud
|
|
/*
|
|
* nld_7448.c
|
|
*
|
|
*/
|
|
|
|
#include "nld_7448.h"
|
|
#include "nld_truthtable.h"
|
|
|
|
namespace netlist
|
|
{
|
|
namespace devices
|
|
{
|
|
|
|
#if (USE_TRUTHTABLE_7448 && USE_TRUTHTABLE)
|
|
|
|
NETLIB_TRUTHTABLE(7448, 7, 7, 0);
|
|
|
|
#else
|
|
|
|
NETLIB_OBJECT(7448)
|
|
{
|
|
NETLIB_CONSTRUCTOR(7448)
|
|
, m_A(*this, "A")
|
|
, m_B(*this, "B")
|
|
, m_C(*this, "C")
|
|
, m_D(*this, "D")
|
|
, m_LTQ(*this, "LTQ")
|
|
, m_BIQ(*this, "BIQ")
|
|
, m_RBIQ(*this, "RBIQ")
|
|
, m_state(*this, "m_state", 0)
|
|
, m_Q(*this, {{"a", "b", "c", "d", "e", "f", "g"}})
|
|
{
|
|
}
|
|
|
|
NETLIB_RESETI();
|
|
NETLIB_UPDATEI();
|
|
|
|
public:
|
|
void update_outputs(uint_fast8_t v);
|
|
static const uint_fast8_t tab7448[16][7];
|
|
|
|
logic_input_t m_A;
|
|
logic_input_t m_B;
|
|
logic_input_t m_C;
|
|
logic_input_t m_D;
|
|
logic_input_t m_LTQ;
|
|
logic_input_t m_BIQ;
|
|
logic_input_t m_RBIQ;
|
|
|
|
state_var<unsigned> m_state;
|
|
|
|
object_array_t<logic_output_t, 7> m_Q; /* a .. g */
|
|
|
|
};
|
|
|
|
NETLIB_OBJECT_DERIVED(7448_dip, 7448)
|
|
{
|
|
NETLIB_CONSTRUCTOR_DERIVED(7448_dip, 7448)
|
|
{
|
|
register_subalias("1", m_B);
|
|
register_subalias("2", m_C);
|
|
register_subalias("3", m_LTQ);
|
|
register_subalias("4", m_BIQ);
|
|
register_subalias("5",m_RBIQ);
|
|
register_subalias("6", m_D);
|
|
register_subalias("7", m_A);
|
|
|
|
register_subalias("9", m_Q[4]); // e
|
|
register_subalias("10", m_Q[3]); // d
|
|
register_subalias("11", m_Q[2]); // c
|
|
register_subalias("12", m_Q[1]); // b
|
|
register_subalias("13", m_Q[0]); // a
|
|
register_subalias("14", m_Q[6]); // g
|
|
register_subalias("15", m_Q[5]); // f
|
|
}
|
|
};
|
|
#endif
|
|
|
|
|
|
#if (USE_TRUTHTABLE_7448 && USE_TRUTHTABLE)
|
|
nld_7448::truthtable_t nld_7448::m_ttbl;
|
|
const char *nld_7448::m_desc[] = {
|
|
" LTQ,BIQ,RBIQ, A , B , C , D | a, b, c, d, e, f, g",
|
|
|
|
" 1, 1, 1, 0, 0, 0, 0 | 1, 1, 1, 1, 1, 1, 0|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 0, 0, 0 | 0, 1, 1, 0, 0, 0, 0|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 1, 0, 0 | 1, 1, 0, 1, 1, 0, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 1, 0, 0 | 1, 1, 1, 1, 0, 0, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 0, 1, 0 | 0, 1, 1, 0, 0, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 0, 1, 0 | 1, 0, 1, 1, 0, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 1, 1, 0 | 0, 0, 1, 1, 1, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 1, 1, 0 | 1, 1, 1, 0, 0, 0, 0|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 0, 0, 1 | 1, 1, 1, 1, 1, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 0, 0, 1 | 1, 1, 1, 0, 0, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 1, 0, 1 | 0, 0, 0, 1, 1, 0, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 1, 0, 1 | 0, 0, 1, 1, 0, 0, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 0, 1, 1 | 0, 1, 0, 0, 0, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 0, 1, 1 | 1, 0, 0, 1, 0, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 0, 1, 1, 1 | 0, 0, 0, 1, 1, 1, 1|100,100,100,100,100,100,100",
|
|
" 1, 1, X, 1, 1, 1, 1 | 0, 0, 0, 0, 0, 0, 0|100,100,100,100,100,100,100",
|
|
|
|
// BI/RBO is input output. In the next case it is used as an input will go low.
|
|
" 1, 1, 0, 0, 0, 0, 0 | 0, 0, 0, 0, 0, 0, 0|100,100,100,100,100,100,100", // RBI
|
|
|
|
" 0, 1, X, X, X, X, X | 1, 1, 1, 1, 1, 1, 1|100,100,100,100,100,100,100", // LT
|
|
|
|
// This condition has precedence
|
|
" X, 0, X, X, X, X, X | 0, 0, 0, 0, 0, 0, 0|100,100,100,100,100,100,100", // BI
|
|
""
|
|
};
|
|
|
|
NETLIB_OBJECT_DERIVED(7448_dip, 7448)
|
|
{
|
|
NETLIB_CONSTRUCTOR_DERIVED(7448_dip, 7448)
|
|
{
|
|
register_subalias("1", m_I[4]); // B
|
|
register_subalias("2", m_I[5]); // C
|
|
register_subalias("3", m_I[0]); // LTQ
|
|
register_subalias("4", m_I[1]); // BIQ
|
|
register_subalias("5", m_I[2]); // RBIQ
|
|
register_subalias("6", m_I[6]); // D
|
|
register_subalias("7", m_I[3]); // A
|
|
|
|
register_subalias("9", m_Q[4]); // e
|
|
register_subalias("10", m_Q[3]); // d
|
|
register_subalias("11", m_Q[2]); // c
|
|
register_subalias("12", m_Q[1]); // b
|
|
register_subalias("13", m_Q[0]); // a
|
|
register_subalias("14", m_Q[6]); // g
|
|
register_subalias("15", m_Q[5]); // f
|
|
}
|
|
};
|
|
|
|
#else
|
|
|
|
NETLIB_UPDATE(7448)
|
|
{
|
|
if (!INPLOGIC(m_BIQ) || (INPLOGIC(m_BIQ) && !INPLOGIC(m_LTQ)))
|
|
{
|
|
m_A.inactivate();
|
|
m_B.inactivate();
|
|
m_C.inactivate();
|
|
m_D.inactivate();
|
|
m_RBIQ.inactivate();
|
|
if (INPLOGIC(m_BIQ) && !INPLOGIC(m_LTQ))
|
|
{
|
|
update_outputs(8);
|
|
}
|
|
else if (!INPLOGIC(m_BIQ))
|
|
{
|
|
update_outputs(15);
|
|
}
|
|
} else {
|
|
m_RBIQ.activate();
|
|
m_D.activate();
|
|
m_C.activate();
|
|
m_B.activate();
|
|
m_A.activate();
|
|
uint_fast8_t v;
|
|
|
|
v = (INPLOGIC(m_A) << 0) | (INPLOGIC(m_B) << 1) | (INPLOGIC(m_C) << 2) | (INPLOGIC(m_D) << 3);
|
|
if ((!INPLOGIC(m_RBIQ) && (v==0)))
|
|
v = 15;
|
|
update_outputs(v);
|
|
}
|
|
}
|
|
|
|
NETLIB_RESET(7448)
|
|
{
|
|
m_state = 0;
|
|
m_A.inactivate();
|
|
m_B.inactivate();
|
|
m_C.inactivate();
|
|
m_D.inactivate();
|
|
m_RBIQ.inactivate();
|
|
}
|
|
|
|
NETLIB_FUNC_VOID(7448, update_outputs, (uint_fast8_t v))
|
|
{
|
|
nl_assert(v<16);
|
|
if (v != m_state)
|
|
{
|
|
// max transfer time is 100 NS */
|
|
|
|
for (int i=0; i<7; i++)
|
|
OUTLOGIC(m_Q[i], tab7448[v][i], NLTIME_FROM_NS(100));
|
|
m_state = v;
|
|
}
|
|
}
|
|
|
|
const uint_fast8_t NETLIB_NAME(7448)::tab7448[16][7] =
|
|
{
|
|
{ 1, 1, 1, 1, 1, 1, 0 }, /* 00 - not blanked ! */
|
|
{ 0, 1, 1, 0, 0, 0, 0 }, /* 01 */
|
|
{ 1, 1, 0, 1, 1, 0, 1 }, /* 02 */
|
|
{ 1, 1, 1, 1, 0, 0, 1 }, /* 03 */
|
|
{ 0, 1, 1, 0, 0, 1, 1 }, /* 04 */
|
|
{ 1, 0, 1, 1, 0, 1, 1 }, /* 05 */
|
|
{ 0, 0, 1, 1, 1, 1, 1 }, /* 06 */
|
|
{ 1, 1, 1, 0, 0, 0, 0 }, /* 07 */
|
|
{ 1, 1, 1, 1, 1, 1, 1 }, /* 08 */
|
|
{ 1, 1, 1, 0, 0, 1, 1 }, /* 09 */
|
|
{ 0, 0, 0, 1, 1, 0, 1 }, /* 10 */
|
|
{ 0, 0, 1, 1, 0, 0, 1 }, /* 11 */
|
|
{ 0, 1, 0, 0, 0, 1, 1 }, /* 12 */
|
|
{ 1, 0, 0, 1, 0, 1, 1 }, /* 13 */
|
|
{ 0, 0, 0, 1, 1, 1, 1 }, /* 14 */
|
|
{ 0, 0, 0, 0, 0, 0, 0 }, /* 15 */
|
|
};
|
|
#endif
|
|
|
|
NETLIB_DEVICE_IMPL(7448)
|
|
NETLIB_DEVICE_IMPL(7448_dip)
|
|
|
|
|
|
} //namespace devices
|
|
} // namespace netlist
|