src/dps8/fnp_2.c
// XXX Bad code -- blocks the thread
XXX Bad code -- blocks the thread
XXX Bad code -- blocks the thread
void tmxr_linemsg_stall (TMLN *lp, char *msg)
  {
    int32 len;
    for (len = (int32)strlen (msg); len > 0; --len)
      {
        while (SCPE_STALL == tmxr_putc_ln (lp, *msg))
          {
            if (lp->txbsz == tmxr_send_buffered_data (lp))
              usleep (100); 
          }
        msg ++;
      }
    return;
  }
void tmxr_linemsg_stall ( TMLN * lp , char * msg ) { int32 len ; for ( len = ( int32 ) strlen ( msg ) ; len > 0 ; -- len ) { while ( SCPE_STALL == tmxr_putc_ln ( lp , * msg ) ) { if ( lp -> txbsz == tmxr_send_buffered_data ( lp ) ) usleep ( 100 ) ; } msg ++ ; } return ; }
XXX Bad code -- blocks the thread
XXX Bad code -- blocks the thread
// 10 ms