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

I7010, I7070, I7080, I7090: Adopt internal SCP internal time base

Browse source
This commit is contained in:
Mark Pizzolato 2020-10-29 13:34:05 -07:00
parent c9c3f8568a
commit 8d6219325a
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
I7000/i7000_chron.c
View file

@ -155,7 +155,7 @@ chron_read_buff(UNIT * uptr, int cmd)
uptr->u6 = 0; /* Set to no data */ uptr->u6 = 0; /* Set to no data */
curtim = time(NULL); /* get time */ curtim = sim_get_time(NULL);/* get time */
tptr = localtime(&curtim); /* decompose */ tptr = localtime(&curtim); /* decompose */
if (tptr == NULL) if (tptr == NULL)
return; /* error? */ return; /* error? */

2
I7000/i7010_cpu.c
View file

@ -1528,7 +1528,7 @@ sim_instr(void)
struct tm *tptr; struct tm *tptr;
temp = 99999; temp = 99999;
curtim = time(NULL); /* get time */ curtim = sim_get_time(NULL);/* get time */
tptr = localtime(&curtim); /* decompose */ tptr = localtime(&curtim); /* decompose */
if (tptr != NULL && tptr->tm_sec != 59) { if (tptr != NULL && tptr->tm_sec != 59) {
/* Convert minutes to 100th hour */ /* Convert minutes to 100th hour */