|
|
1.1 ! root 1: # ! 2: ! 3: #define SRBHDR ! 4: ! 5: #define LOCAL static ! 6: #define TYPE typedef ! 7: #define STRUCT TYPE struct ! 8: #define UNION TYPE union ! 9: #define REG register ! 10: ! 11: #define IF if( ! 12: #define THEN ){ ! 13: #define ELSE } else { ! 14: #define ELIF } else if ( ! 15: #define FI } ! 16: ! 17: #define BEGIN { ! 18: #define END } ! 19: #define SWITCH switch( ! 20: #define IN ){ ! 21: #define ENDSW } ! 22: #define FOR for( ! 23: #define WHILE while( ! 24: #define DO ){ ! 25: #define OD } ! 26: #define REP do{ ! 27: #define PER }while( ! 28: #define DONE ); ! 29: #define LOOP for(;;){ ! 30: #define POOL } ! 31: ! 32: ! 33: #define SKIP ; ! 34: #define DIV / ! 35: #define REM % ! 36: #define NEQ ^ ! 37: #define ANDF && ! 38: #define ORF || ! 39: ! 40: #define TRUE (-1) ! 41: #define FALSE 0 ! 42: #define LOBYTE 0377 ! 43: ! 44: #define NL '\n' ! 45: #define SP ' ' ! 46: #define TB '\t' ! 47: #define MAX(a,b) ((a)>(b)?(a):(b)) ! 48: ! 49: ! 50: TYPE int INT; ! 51: TYPE long INT L_INT; ! 52: TYPE unsigned int POS; ! 53: TYPE unsigned short S_POS; ! 54: TYPE int VOID; ! 55: TYPE float REAL; ! 56: TYPE double L_REAL; ! 57: TYPE char BOOL; ! 58: TYPE char CHAR; ! 59: TYPE char *STRING; ! 60: TYPE char MSG[]; ! 61: TYPE int (*FNVAR)(); ! 62: TYPE FNVAR SIGARG; /*temp until unions work*/ ! 63: TYPE int UFD;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.