folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

PDP10-KA, PDP10-KL: Adopt internal SCP internal time base

Browse source
This commit is contained in:
Mark Pizzolato 2020-10-29 13:35:55 -07:00
parent 8d6219325a
commit e1ca936ab9
4 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
PDP10/ka10_ai.c
View file

@ -809,7 +809,7 @@ static void channel_command (uint64 data)
if (check_nxm (data, &n, &data2, &n2))
break;
(void)clock_gettime(CLOCK_REALTIME, &ts);
(void)sim_rtcn_get_time (&ts, 0);
latency_timer = ts.tv_nsec / 100000;
latency_timer %= 254;
M[data & ADDR] = latency_timer & 0377;
@ -938,7 +938,7 @@ t_stat ai_devio(uint32 dev, uint64 *data) {
case CONI|4:
/* Latency timer, timer unit, attention unit. */
(void)clock_gettime(CLOCK_REALTIME, &ts);
(void)sim_rtcn_get_time (&ts, 0);
latency_timer = ts.tv_nsec / 100000;
latency_timer %= 254;
*data = (latency_timer << 022)

2
PDP10/ka10_pclk.c
View file

@ -70,7 +70,7 @@ DEVICE pclk_dev = {
*/
t_stat pclk_devio(uint32 dev, uint64 *data)
{
time_t t=time(NULL);
time_t t=sim_get_time(NULL);
struct tm *dt;
uint64 hour=12, minute=1, seconds=2, milliseconds=3;
uint64 coni_word = ((minute&0xF)<<26) | (seconds<<20) | milliseconds;

2
PDP10/ka10_pd.c
View file

@ -77,7 +77,7 @@ DEVICE pd_dev = {
static uint64 pd_ticks (void)
{
time_t t = time(NULL);
time_t t = sim_get_time(NULL);
struct tm *x = localtime(&t);
uint64 seconds;
seconds = 86400ULL * x->tm_yday;

2
PDP10/kl10_fe.c
View file

@ -1026,7 +1026,7 @@ dte_function(UNIT *uptr)
case PRI_EMRDT: /* Request Date/Time */
{
time_t t = time(NULL);
time_t t = sim_get_time(NULL);
struct tm *tm = localtime(&t);
int yr = tm->tm_year + 1900;
int tim = (((tm->tm_hour * 60) + tm->tm_min) * 60) +