Revision f40fd757e33a23ff98c29dfb2fa50b518464781c authored by Ron Burkey on 17 December 2017, 19:08:20 UTC, committed by Ron Burkey on 17 December 2017, 19:08:20 UTC
(as in Raspbian), but I hadn't noticed because I was using the ansi configuration.
1 parent 774bae6
TPG.cpp
/****************************************************************************
* TPG - TIME PULSE GENERATOR subsystem
*
* AUTHOR: John Pultorak
* DATE: 9/22/01
* FILE: TPG.cpp
*
* NOTES: see header file.
*
*****************************************************************************
*/
#include "TPG.h"
#include "MON.h"
#include "SCL.h"
#include "SEQ.h"
#include "OUT.h"
const char* TPG::tpTypestring[] = // must correspond to tpType enumerated type
{ "STBY", "PWRON", "TP1", "TP2", "TP3", "TP4", "TP5", "TP6", "TP7", "TP8",
"TP9", "TP10", "TP11", "TP12", "SRLSE", "WAIT" };
regSG TPG::register_SG; // static member
void
TPG::doexecWP_TPG()
{
unsigned mystate = register_SG.read();
if (MON::PURST)
mystate = STBY;
else
switch (mystate)
{
case STBY:
if (!MON::PURST && ((!MON::FCLK) || SCL::F17x()))
mystate = PWRON;
break;
case PWRON:
if (((!MON::FCLK) || SCL::F13x()))
mystate = TP1;
break;
case TP1:
mystate = TP2;
break;
case TP2:
mystate = TP3;
break;
case TP3:
mystate = TP4;
break;
case TP4:
mystate = TP5;
break;
case TP5:
mystate = TP6;
break;
case TP6:
mystate = TP7;
break;
case TP7:
mystate = TP8;
break;
case TP8:
mystate = TP9;
break;
case TP9:
mystate = TP10;
break;
case TP10:
mystate = TP11;
break;
case TP11:
mystate = TP12;
break;
case TP12:
if (SEQ::register_SNI.read() && OUT::register_OUT1.readField(8, 8)
&& MON::SA)
mystate = STBY;
// the next transition to TP1 is incompletely decoded; it works because
// the transition to STBY has already been tested.
else if ((MON::RUN) || (!SEQ::register_SNI.read() && MON::INST))
mystate = TP1;
else
mystate = SRLSE;
break;
case SRLSE:
if (!MON::STEP)
mystate = WAIT;
break;
case WAIT:
if (MON::STEP || MON::RUN)
mystate = TP1;
break;
default:
break;
}
register_SG.write(mystate);
}
Computing file changes ...