errno = 0;
if( connect( tpptr->fd, taddr, tpptr->palen ) != 0 ) {
close( tpptr->fd ); // clean up fd and tp_block
SItrash( TP_BLK, tpptr ); // free the trasnsport block
fd = SI_ERROR; // send bad session id num back
} else { // connect ok
errno = 0;
if( connect( tpptr->fd, taddr, tpptr->palen ) != 0 ) {
close( tpptr->fd ); // clean up fd and tp_block
SItrash( TP_BLK, tpptr ); // free the trasnsport block
fd = SI_ERROR; // send bad session id num back
} else { // connect ok