Return to sysou.c CVS log

Up to [Research Unix] / researchv10dc / cmd / spitbol / ocint

Annotation of researchv10dc/cmd/spitbol/ocint/sysou.c, revision 1.1.1.1

1.1       root        1: #include "inter.h"
                      2: #include "spitblks.h"
                      3: #include "spitio.h"
                      4: 
                      5: sysou()
                      6: {
                      7:        register struct fcblk *fcb = WA (struct fcblk *);
                      8:        register struct scblk *scb = XR (struct scblk *);
                      9: 
                     10:        /* ensure iob is open, fail if unsuccessful */
                     11:        if (osopen (fcb->iob) != 0)
                     12:                return 0;
                     13:        
                     14:        /* write the data, fail if unsuccessful */
                     15:        if (oswrite (fcb->rsz, scb->len, fcb->iob, scb) != 0)
                     16:                return 1;
                     17: 
                     18:        /* normal return */
                     19:        return 2;
                     20: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.