s_gtime          8774 src/simh/scp.c     double s_gtime = sim_gtime ();                      /* get time now */
s_gtime          8776 src/simh/scp.c     if (bp->time_fired[spc] == s_gtime)                 /* already taken?  */
s_gtime          8778 src/simh/scp.c     bp->time_fired[spc] = s_gtime;                      /* remember match time */