From 5859a8216b5db24a135ed6ae7151c9ebb1f5fdf2 Mon Sep 17 00:00:00 2001 From: Mark Pizzolato Date: Sun, 15 Dec 2019 01:21:55 -0800 Subject: [PATCH] SCP: Add debug details when initially queuing pending SEND input --- scp.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/scp.c b/scp.c index c8649f29..8e690196 100644 --- a/scp.c +++ b/scp.c @@ -12314,6 +12314,12 @@ memcpy(snd->buffer+snd->insoff, data, size); snd->insoff += size; snd->delay = (sim_switches & SWMASK ('T')) ? (uint32)((sim_timer_inst_per_sec()*delay)/1000000.0) : delay; snd->after = (sim_switches & SWMASK ('T')) ? (uint32)((sim_timer_inst_per_sec()*after)/1000000.0) : after; +if (sim_switches & SWMASK ('T')) + sim_debug (snd->dbit, snd->dptr, "%d bytes queued for output. Delay %d usecs = %d insts, After %d usecs = %d insts\n", + (int)size, (int)delay, (int)snd->delay, (int)after, (int)snd->after); +else + sim_debug (snd->dbit, snd->dptr, "%d bytes queued for output. Delay=%d, After=%d\n", + (int)size, (int)delay, (int)after); snd->next_time = sim_gtime() + snd->after; return SCPE_OK; }