Merge latest from Bob Supnik

markpizz · markpizz · commit 026dd98d833e · 2013-10-12T13:33:01.000-07:00
diff --git a/Interdata/id_pas.c b/Interdata/id_pas.c
@@ -1,6 +1,6 @@
 /* id_pas.c: Interdata programmable async line adapter simulator
 
-   Copyright (c) 2001-2012, Robert M Supnik
+   Copyright (c) 2001-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    pas          Programmable asynchronous line adapter(s)
 
+   11-Oct-13    RMS     Poll PAS immediately to pick up initial connect
    18-Apr-12    RMS     Revised to use clock coscheduling
    21-Mar-12    RMS     Fixed TT_GET_MODE test to use TTUF_MODE_x (Michael Bloom)
    19-Nov-08    RMS     Revised for common TMXR show routines
@@ -485,7 +486,7 @@ t_stat r;
 r = tmxr_attach (&pas_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error */
     return r;
-sim_activate (uptr, 100);                               /* quick poll */
+sim_activate (uptr, 0);                                 /* immediate poll */
 return SCPE_OK;
 }
 
diff --git a/PDP1/pdp1_dcs.c b/PDP1/pdp1_dcs.c
@@ -1,6 +1,6 @@
 /* pdp1_dcs.c: PDP-1D terminal multiplexor simulator
 
-   Copyright (c) 2006-2008, Robert M Supnik
+   Copyright (c) 2006-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    dcs          Type 630 data communications subsystem
 
+   11-Oct-2013  RMS     Poll DCS immediately after attach to pick up connect
    19-Nov-2008  RMS     Revised for common TMXR show routines
 
    This module implements up to 32 individual serial interfaces.
@@ -347,7 +348,7 @@ t_stat r;
 r = tmxr_attach (&dcs_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error */
     return r;
-sim_activate_abs (uptr, tmxr_poll);                     /* start poll */
+sim_activate_abs (uptr, 0);                             /* start poll at once */
 return SCPE_OK;
 }
 
diff --git a/PDP11/pdp11_cis.c b/PDP11/pdp11_cis.c
@@ -1320,7 +1320,7 @@ return;
         (a^x)(b^y)      TMP
 
    Note that the low bit of each digit is the same as the low bit of
-   the sum of the digits, ignoring the cary, since the low bit of the
+   the sum of the digits, ignoring the carry, since the low bit of the
    sum is the xor of the bits.
 
    Now compute I+J+66 to get decimal addition with carry forced left
diff --git a/PDP11/pdp11_dc.c b/PDP11/pdp11_dc.c
@@ -1,6 +1,6 @@
 /* pdp11_dc.c: PDP-11 DC11 multiple terminal interface simulator
 
-   Copyright (c) 1993-2012, Robert M Supnik
+   Copyright (c) 1993-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    dci,dco    DC11 terminal input/output
 
+   11-Oct-2013  RMS     Poll DCI immediately after attach to pick up connect
    18-Apr-2012  RMS     Modified to use clock coscheduling
    17-Aug-2011  RMS     Added AUTOCONFIGURE modifier
    19-Nov-2008  RMS     Revised for common TMXR show routines
@@ -557,7 +558,7 @@ t_stat r;
 r = tmxr_attach (&dcx_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error? */
     return r;
-sim_activate (uptr, tmxr_poll);                         /* start poll */
+sim_activate (uptr, 0);                                 /* start poll at once */
 return SCPE_OK;
 }
 
diff --git a/PDP11/pdp11_dl.c b/PDP11/pdp11_dl.c
@@ -1,6 +1,6 @@
 /* pdp11_dl.c: PDP-11 multiple terminal interface simulator
 
-   Copyright (c) 1993-2012, Robert M Supnik
+   Copyright (c) 1993-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    dli,dlo      DL11 terminal input/output
 
+   11-Oct-2013  RMS     Poll DLI immediately after attach to pick up connect
    18-Apr-2012  RMS     Modified to use clock coscheduling
    17-Aug-2011  RMS     Added AUTOCONFIGURE modifier
    19-Nov-2008  RMS     Revised for common TMXR show routines
@@ -508,7 +509,7 @@ t_stat r;
 r = tmxr_attach (&dlx_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error */
     return r;
-sim_activate (uptr, tmxr_poll);                         /* start poll */
+sim_activate (uptr, 0);                                 /* start poll at once */
 return SCPE_OK;
 }
 
diff --git a/PDP11/pdp11_rq.c b/PDP11/pdp11_rq.c
@@ -1617,7 +1617,7 @@ if ((uptr = rq_getucb (cp, lu))) {                      /* get unit */
                 cp->pak[prv].link = cp->pak[tpkt].link;
                 break;
                 }
-            prv = tpkt;
+            prv = tpkt;                                 /* no match, next */
             }
         }
     if (tpkt) {                                         /* found target? */
diff --git a/PDP11/pdp11_tq.c b/PDP11/pdp11_tq.c
@@ -933,7 +933,7 @@ if ((uptr = tq_getucb (lu))) {                          /* get unit */
                 tq_pkt[prv].link = tq_pkt[tpkt].link;   /* unlink */
                     break;
                 }
-            prv = tpkt;
+            prv = tpkt;                                 /* no match, next */
             }
         }
     if (tpkt) {                                         /* found target? */
diff --git a/PDP18B/pdp18b_tt1.c b/PDP18B/pdp18b_tt1.c
@@ -1,6 +1,6 @@
 /* pdp18b_ttx.c: PDP-9/15 additional terminals simulator
 
-   Copyright (c) 1993-2012, Robert M Supnik
+   Copyright (c) 1993-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    ttix,ttox    LT15/LT19 terminal input/output
 
+   11-Oct-13    RMS     Poll TTIX immediately to pick up initial connect
    18-Apr-12    RMS     Revised to use clock coscheduling
    19-Nov-08    RMS     Revised for common TMXR show routines
    18-Jun-07    RMS     Added UNIT_IDLE flag
@@ -396,7 +397,7 @@ t_stat r;
 r = tmxr_attach (&ttx_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error */
     return r;
-sim_activate (uptr, tmxr_poll);                         /* start poll */
+sim_activate (uptr, 0);                                 /* start poll at once */
 return SCPE_OK;
 }
 
diff --git a/PDP8/pdp8_ttx.c b/PDP8/pdp8_ttx.c
@@ -1,6 +1,6 @@
 /* pdp8_ttx.c: PDP-8 additional terminals simulator
 
-   Copyright (c) 1993-2012, Robert M Supnik
+   Copyright (c) 1993-2013, Robert M Supnik
 
    Permission is hereby granted, free of charge, to any person obtaining a
    copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@
 
    ttix,ttox    PT08/KL8JA terminal input/output
 
+   11-Oct-13    RMS     Poll TTIX immediately to pick up initial connect (Mark Pizzolato)
    18-Apr-12    RMS     Revised to use clock coscheduling
    19-Nov-08    RMS     Revised for common TMXR show routines
    07-Jun-06    RMS     Added UNIT_IDLE flag
@@ -360,7 +361,7 @@ t_stat r;
 r = tmxr_attach (&ttx_desc, uptr, cptr);                /* attach */
 if (r != SCPE_OK)                                       /* error */
     return r;
-sim_activate (uptr, 0);                                 /* start poll */
+sim_activate (uptr, 0);                                 /* start poll at once */
 return SCPE_OK;
 }
 

Original file line number	Diff line number	Diff line change
`@@ -1617,7 +1617,7 @@ if ((uptr = rq_getucb (cp, lu))) { /* get unit */`
`1617`	`1617`	`cp->pak[prv].link = cp->pak[tpkt].link;`
`1618`	`1618`	`break;`
`1619`	`1619`	`}`
`1620`		`- prv = tpkt;`
	`1620`	`+ prv = tpkt; /* no match, next */`
`1621`	`1621`	`}`
`1622`	`1622`	`}`
`1623`	`1623`	`if (tpkt) { /* found target? */`
Original file line number	Diff line number	Diff line change
`@@ -933,7 +933,7 @@ if ((uptr = tq_getucb (lu))) { /* get unit */`
`933`	`933`	`tq_pkt[prv].link = tq_pkt[tpkt].link; /* unlink */`
`934`	`934`	`break;`
`935`	`935`	`}`
`936`		`- prv = tpkt;`
	`936`	`+ prv = tpkt; /* no match, next */`
`937`	`937`	`}`
`938`	`938`	`}`
`939`	`939`	`if (tpkt) { /* found target? */`