.TITLE GTSK Get Task Parameters .IDENT "V1.1" .ENABL LC .PSECT C$CODE ;+ ; Index GTSK Get Task Parameters ; ; Usage ; ; #include ; #include ; struct tparbf tskdat; /* task param's structure */ ; word status; /* Returned DSW */ ; ; status = gtsk(&tskdat); ; [end] ;- ; Edits: ; V1.0 12-Jun-80 RBD Initial Edit ; V1.1 20-Oct-82 RBD Change P-Section. Fix documentation. ; .mcall gtsk$s gtsk:: mov 2(sp),r0 ; R0 --> parameters buffer gtsk$s r0 ; Fill it mov $dsw,r0 ; return dsw return .end