DECLARE INT$EXCHANGE$DESCRIPTOR LITERALLY 'STRUCTURE (
 MESSAGE$HEAD ADDRESS,
 MESSAGE$TAIL ADDRESS,
 TASK$HEAD ADDRESS,
 TASK$TAIL ADDRESS,
 EXCHANGE$LINK ADDRESS,
 LINK ADDRESS,
 LENGTH ADDRESS,
 TYPE BYTE)';