
iAPX 432 Interface Processor Architecture Reference Manual
Dispatch:
Procedure~
/**********************************************************************************/
/* This procedure hangs the IP's processor carrier on the IP's dispatching*/ /* port. This allcws blocking sends and receives to be handled . */ 1* This example assumes that the IP processor carrier blocks at the dispacthing */
/*  | port. No "select process" IPC is received if the Surrogate Receive does not  | */  | 
/*  | block.  | */  | 
/**********************************************************************************/
Window_4.disp_state  | = false;  | 
  | 
  | 
  | 
  | 
  | |
/* Unlock the IP' s  | processor carr ier •  | 
  | 
  | 
  | 
  | */  | |
= process_Ii  | 
  | 
  | /*  | Use process object 1.  | */  | ||
Window 4.frf operand(O)  | = psor carrier ds obj  | se1;  | /*  | Data segment  | */  | ||
Window:4.frf:operator  | = OllH; -  | - -  | -  | /* Unlock function code.  | */  | ||
Call AwaJ.t_ function_completion;
/* Hang processor carrier on the dispatching port.  | |
= process_l;  | |
Window_4.frf_operand(O)  | =   | 
Window 4.frf operam (2)  | = null destination obj sel;  | 
=   | |
Window=4.frf=operator = 017H: -  | - - -  | ||
Call Await furction ~letion:  | 
  | ||
End  | -  | -  | 
  | 
/* Use process object l.  | */  | |
*/  | ||
/* port  | */  | |
/*  | destination  | */  | 
/* carrier  | */  | |
/*  | Surrogate receive  | */  | 
/*  | function rode.  | */  | 
Dispatch;
Open windCM:
PrOcedure:
/************************************************************************************/
/* Open a windcw to the message, Figure   | */  | 
/************************************************************************************/
Wl.ndow 4. frf operand (O)
Window=4.frf=operator
=process 1;
=3; -
=000010lBi
=4096;
=lllll10000000000B:
=Iressage obj se1;
=0; 
=OOOH;
/* process obj ect index  | */  | 
/* window index  | */  | 
/* entry state  | */  | 
/* base address  | */  | 
/* mask  | */  | 
~ data segment  | */  | 
/* base displacement  | */  | 
/* Alter Map and Select Data */
Call Await furction canpletion:
EM - -
<.pen_windO!l;
/* Segment function code */