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