/* * VxDPut - put some data to client/server */ void __pascal VxDPut( const void __far *rec, unsigned len ) { #ifdef __WINDOWS__ int rc; while( 1 ) { rc = ConvPut( __ConvId,rec, len, NO_BLOCK ); if( rc == BLOCK ) { messageLoop(); } else { break; } } #else ConvPut( __ConvId,rec, len, BLOCK ); #endif } /* VxDPut */
unsigned RemotePut( char *rec, unsigned len ) { #ifdef __WINDOWS__ int rc; while( 1 ) { rc = ConvPut( _id, rec, len, NO_BLOCK ); if( rc == BLOCK ) SetExecutionFocus( _id ); else break; } #else #ifdef DEBUG_ME Blip( &_aa, &_bb, 'T' ); #endif ConvPut( _id, rec, len, BLOCK ); #ifdef DEBUG_ME Blip( &_aa, &_bb, 't' ); #endif #endif return( len ); }
trap_retval RemotePut( byte *rec, trap_elen len ) { #ifdef __WINDOWS__ int rc; for( ;; ) { rc = ConvPut( _id, rec, len, NO_BLOCK ); if( rc == BLOCK ) SetExecutionFocus( _id ); else break; } #else #ifdef DEBUG_ME Blip( &_aa, &_bb, 'T' ); #endif ConvPut( _id, rec, len, BLOCK ); #ifdef DEBUG_ME Blip( &_aa, &_bb, 't' ); #endif #endif return( len ); }