Return to cem.h CVS log

Up to [Research Unix] / researchv8dc / cmd / cyntax / cem

Annotation of researchv8dc/cmd/cyntax/cem/cem.h, revision 1.1

1.1     ! root        1: #include       <stdio.h>
        !             2: 
        !             3: /*
        !             4:  *     Cemantics.  Intelligent C loader and binder.
        !             5:  */
        !             6: 
        !             7: #ifndef        DEBUG
        !             8: #define        DEBUG           1
        !             9: #endif DEBUG
        !            10: 
        !            11: /*
        !            12:  *     LIB_PATH is prefix for library pathnames.
        !            13:  *     -lxxx maps to LIB_PATHxxx
        !            14:  */
        !            15: #ifndef        LIB_PATH
        !            16: #define        LIB_PATH        "/usr/lib/cyntax/lib"
        !            17: #endif LIB_PATH
        !            18: 
        !            19: /*
        !            20:  *     ALLOC_SIZE      Memory allocation chunk for alloc() style macros.
        !            21:  *     OUTZ            Output buffer size.
        !            22:  *     STABZ           Symbol table size.
        !            23:  *     STR_INC         String allocation increment (page pointers).
        !            24:  */
        !            25: #define        ALLOC_SIZE      (8*1024)
        !            26: #define        OUTZ            (4*1024)
        !            27: #define        STABZ           251
        !            28: #define        STR_INC         16
        !            29: 
        !            30: typedef struct inst    inst;
        !            31: typedef struct symbol  symbol;
        !            32: typedef struct type    type;
        !            33: typedef struct var     var;
        !            34: 
        !            35: extern char    *alloc_end;
        !            36: extern char    *alloc_ptr;
        !            37: extern char    *my_name;
        !            38: extern char    *load_out;
        !            39: extern int     debug;
        !            40: extern int     errors;
        !            41: extern int     file_errors;
        !            42: extern int     in_lib;
        !            43: extern int     modtimes;
        !            44: extern int     out_fid;
        !            45: extern int     pedantic;
        !            46: extern int     tell_times;
        !            47: extern int     verbose;
        !            48: extern char    *data_base;
        !            49: extern char    *str_base;
        !            50: extern char    *data_end;
        !            51: extern char    *data_ptr;
        !            52: extern long    new_type_index;
        !            53: extern long    str_num;
        !            54: extern long    type_index;
        !            55: extern long    var_index;
        !            56: extern inst    *global_list;
        !            57: extern symbol  *src_file;
        !            58: extern symbol  **str_trans;
        !            59: extern type    **type_trans;
        !            60: extern var     **var_trans;
        !            61: 
        !            62: extern char    *alloc_fill();
        !            63: extern char    *salloc();
        !            64: extern char    *srealloc();
        !            65: extern char    *stime();
        !            66: extern long    getu();
        !            67: extern long    getv();
        !            68: extern long    get4();
        !            69: extern void    print_basetype();
        !            70: extern void    put_file();
        !            71: extern void    put_type();
        !            72: extern void    say_file();
        !            73: extern void    skip();
        !            74: 
        !            75: #define        SYSERROR        (-1)
        !            76: 
        !            77: #define        loop            for (;;)
        !            78: #define        getd()          (*data_ptr++)
        !            79: #define        skip4()         (data_ptr += 4)
        !            80: #define talloc(t)      (t *)alloc(sizeof (t))
        !            81: #define        alloc(n)        ((alloc_ptr += (n)) > alloc_end ? alloc_fill((long)n) : (alloc_ptr - (n)))
        !            82: #define        vector(p, n, t) (t *)srealloc((char *)p, (long)(n) * sizeof (t))

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