.TITLE MRKT Mark Time .IDENT "V1.1" .ENABL LC .PSECT C$CODE ;+ ; Index MRKT Mark Time ; ; Usage ; ; #include ; word eflag; /* Event flag number */ ; word tmg; /* Time interval magnitude */ ; word tnt; /* Time interval units */ ; {typ} astsrv(); /* AST service routine */ ; word status; /* Returned DSW */ ; ; status = mrkt(eflag, tmg, tnt); ; ; [end] ;- ; Edits: ; V1.0 12-Jun-80 RBD Initial Edit ; V1.1 20-Oct-82 RBD Change P-Section. Fix documentation. ; .mcall mrkt$s mrkt:: mov sp,r0 ;r0 --> calling stack mrkt$s 2(r0), 4(r0), 6(r0), 10(r0) mov $dsw,r0 ;return DSW return .end