.title XMINT - Send interrupt message .ident /000001/ ; ; ; C Runtime Library Extensions for RSX DECNET V4.0 ; ;{} ; Copyright 1984 - The Associated Press, New York ; ; This software is provided as a service to the DECUS community. ; Copying and distribution is encouraged so long as it is done ; free. The Associated Press makes no guarantees that this ; software works. ; ; ; 1-Sep-84 ; ;+ ; ; Index XMINT - Send interrupt message ; ; Usage ; ; include ; ; int lun; /* Logical unit number */ ; int eflag; /* Event flag number */ ; int iosb[2]; /* I/O status block */ ; {typ} astsrv(); /* AST service routine */ ; char *intmsg; /* interrupt message */ ; int intlen; /* length of above */ ; ; int xmint(lun, efn, iosb, astsrv, intmsg, intlen) ; ; Returns DSW. ; include for symbolic DSW return codes. ; ; ; Description ; ; See DECnet-RSX Programmer's Reference manual for usage. ; Remember that unused parameters must be 0. ; Note - the connect block length must be specified. ; Bugs ; ;- ; ; Edit history ; ; 000001 hjj 9/1/84 created ; .mcall xmi$s .PSECT c$code xmint:: mov sp,r0 ;r0 --> stack frame xmi$s 2(r0),4(r0),6(r0),10(r0),<12(r0),14(r0)> mov $dsw,r0 ;return dsw return .end