$PAGE "I/O SYSTEM IMPORTABLE PROCEDURE DECLARATIONS"                    00010000
                                                                        00015000
<< begin include file : inclioim>>                                      00020000
                                                                        00025000
procedure help;                                                         00030000
option external;                                                        00035000
                                                                        00040000
procedure initio(flags);                                                00045000
value flags;                                                            00050000
integer flags;                                                          00055000
option external;                                                        00060000
                                                                        00065000
double procedure timer;                                                 00070000
option external;                                                        00075000
                                                                        00080000
procedure suddendeath(which);                                           00085000
value which;                                                            00090000
integer which;                                                          00095000
option external;                                                        00100000
                                                                        00105000
integer procedure timereq(c,r,t);                                       00110000
value c,r,t;                                                            00115000
integer c,r;                                                            00120000
double t;                                                               00125000
option external;                                                        00130000
                                                                        00135000
procedure aborttimereq(trlx);                                           00140000
value trlx;                                                             00145000
integer trlx;                                                           00150000
option external;                                                        00155000
                                                                        00160000
procedure awakeio(ditp,flags);                                          00165000
value ditp,flags;                                                       00170000
integer pointer ditp;                                                   00175000
integer flags;                                                          00180000
option external;                                                        00185000
                                                                        00190000
double procedure attachio(ldev,qmisc,dstx,adr,fnct,cnt,p1,p2,flags);    00195000
value ldev,qmisc,dstx,adr,fnct,cnt,p1,p2,flags;                         00200000
integer ldev,qmisc,dstx,adr,fnct,cnt,p1,p2,flags;                       00205000
option external;                                                        00210000
                                                                        00215000
integer procedure getdiscreq(reqtype);                                  00220000
value reqtype;                                                          00225000
integer reqtype;                                                        00230000
option external;                                                        00235000
                                                                        00240000
procedure returndiscreq(pntr);                                          00245000
value pntr;                                                             00250000
integer pointer pntr;                                                   00255000
option external;                                                        00260000
                                                                        00265000
procedure startclock(yearday,timeday);                                  00270000
value yearday,timeday;                                                  00275000
integer yearday;                                                        00280000
double timeday;                                                         00285000
option external;                                                        00290000
                                                                        00295000
procedure discqmanager(reqp,requesttype);                               00300000
value reqp,requesttype;                                                 00305000
integer reqp,requesttype;                                               00310000
option external;                                                        00315000
                                                                        00320000
procedure queuediscreq(reqp, qtype, auxinfo);                           00325000
value reqp, qtype, auxinfo;                                             00330000
integer reqp, qtype, auxinfo;                                           00335000
option external;                                                        00340000
                                                                        00345000
procedure dequeuediscreq(reqp, qtype, auxinfo);                         00350000
value reqp, qtype, auxinfo;                                             00355000
integer reqp, qtype, auxinfo;                                           00360000
option external;                                                        00365000
                                                                        00370000
logical procedure chektrlfree;                                          00375000
option external;                                                        00380000
                                                                        00385000
procedure checkldev(ldev);                                              00390000
value ldev;                                                             00395000
integer ldev;                                                           00400000
option external;                                                        00405000
                                                                        00410000
double procedure waitforio(ioqx);                                       00415000
value ioqx;                                                             00420000
integer ioqx;                                                           00425000
option external;                                                        00430000
                                                                        00435000
                                                                        00440000
<< this hardres procedure performs i/o request        >>                00445000
<< completion processing.  called from cdt'completor. >>                00450000
procedure siodm'request'done(reqp,adisc);                      <<07296>>00455000
value reqp,adisc;                                              <<07296>>00460000
integer pointer reqp;                                                   00465000
logical adisc;                                                 <<07296>>00470000
option external;                                                        00475000
                                                                        00480000
<< call physical attachio if caching cannot satisfy request >>          00485000
double procedure p'attachio(ldev, qmisc, dstx, addr, fnct,     <<04317>>00490000
                            cnt, p1, p2, flags,                <<04500>>00495000
                            extbase, extsize);                 <<04500>>00500000
                                                               <<04317>>00505000
value                       ldev, qmisc, dstx, addr, fnct,     <<04317>>00510000
                            extbase, extsize,                  <<04500>>00515000
                            cnt, p1, p2, flags;                <<04317>>00520000
                                                               <<04317>>00525000
integer                     ldev, qmisc, dstx, addr, fnct,     <<04317>>00530000
                            cnt, p1, p2, flags;                <<04317>>00535000
                                                               <<04317>>00540000
double                      extbase;                           <<04500>>00545000
                                                               <<04500>>00550000
logical                     extsize;                           <<04500>>00555000
                                                               <<04500>>00560000
option privileged, external, variable;                                  00565000
                                                                        00570000
procedure bumpwritepri(discreqentryindex,newpri);              <<06795>>00575000
value discreqentryindex,newpri;                                <<06795>>00580000
integer discreqentryindex,newpri;                              <<06795>>00585000
option external;                                               <<06795>>00590000
                                                               <<06795>>00595000
integer procedure serialwriteqmgr(discreqentryindex,           <<06795>>00600000
   controlcode,auxinfo);                                       <<06795>>00605000
value discreqentryindex,controlcode,auxinfo;                   <<06795>>00610000
integer discreqentryindex,controlcode,auxinfo;                 <<06795>>00615000
option external;                                               <<06795>>00620000
                                                               <<06795>>00625000
<< end include file : inclioim>>                                        00630000
                                                                        00635000
