Return to globals.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / libsdp

Annotation of researchv9/jerq/sgs/libsdp/globals.c, revision 1.1

1.1     ! root        1: static char ID[] = "@(#) globals.c: 1.1 3/16/82";
        !             2: #include <stdio.h>
        !             3: #include "sdp.h"
        !             4: #include "define2.h"
        !             5: #include "define3.h"
        !             6: 
        !             7: #define COMPATIBLE     811221
        !             8: 
        !             9: extern int *ALLOC() ;
        !            10: extern char *BUILDNAME() ;
        !            11: extern int CLOSE() ;
        !            12: extern int CREATE() ;
        !            13: extern    FATAL() ;
        !            14: extern     FREE() ;
        !            15: extern FD  OPEN() ;
        !            16: extern int READ() ;
        !            17: extern int SEEK() ;
        !            18: extern int UNLINK() ;
        !            19: extern int WRITE() ;
        !            20: 
        !            21: int aud_flag = AUDITOFF ;              /* flag for audits                      */
        !            22: long compatible = COMPATIBLE ;         /* last version compatible with old SDP */
        !            23: 
        !            24: struct ENVIRON *first_environ = NULL ; /* pointer to first environment         */
        !            25: 
        !            26: struct SPACE *first_space = NULL ;     /* pointer to first space               */
        !            27: 
        !            28: long Gln_file[] = FILEINIT ;           /* file lengths                         */
        !            29: 
        !            30: long gl1_hash = HASHNULL ;             /* for audits                           */
        !            31: long gl2_hash = HASHNULL ;             /* for audits                           */
        !            32: 
        !            33: int Gnumbfile = sizeof(Gln_file)/sizeof(Gln_file[0]) ;
        !            34:                                        /* number of files with lengths         */
        !            35: 
        !            36: int Gsz_stax[] = STAXINIT ;            /* stack sizes                          */
        !            37: 
        !            38: int Gnumbstax = sizeof(Gsz_stax)/sizeof(Gsz_stax[0]) ;
        !            39:                                        /* number of stacks                     */
        !            40: 
        !            41: FILE *hist_fp = NULL ;                 /* for history file                     */
        !            42: 
        !            43: ITEMID *known_idptr = NULL ;           /* for user itemid                      */
        !            44: struct LIBFILE lib_file =
        !            45: {
        !            46:        BUILDNAME,
        !            47:        CLOSE,
        !            48:        CREATE,
        !            49:        OPEN,
        !            50:        READ,
        !            51:        SEEK,
        !            52:        UNLINK,
        !            53:        WRITE,
        !            54: };
        !            55: 
        !            56: struct LIBMEM lib_mem =
        !            57: {
        !            58:        ALLOC,
        !            59:        FREE,
        !            60: } ;
        !            61: 
        !            62: struct LIBFILE *Glib_file ;            /* file library pointer used in macros  */
        !            63: 
        !            64: struct LIBMEM *Glib_mem ;              /* memory library pointer used in macros*/

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