/* Header for module strings, generated by p2c */ #ifndef STRINGS_H #define STRINGS_H #ifdef STRINGS_G # define vextern #else # define vextern extern #endif #include "p2c/p2c.h" #define MSS 512 typedef struct symbol_node { struct symbol_node *next; Char *sstr, *dstr; } symbol_node; extern Char NOT_FOUND[21]; extern Char AMBIGUOUS[21]; extern Char DELIMITER_ERROR[21]; extern Char NO_MORE_TOKENS; extern boolean DEBUG; extern boolean match_range PP((Char *low, Char *test, Char *high)); extern Char lowercase PP((Char ch)); extern Char *lbr PP((Char *Result, Char *s)); extern Char *tbr PP((Char *Result, Char *s)); extern Char *to_lower PP((Char *Result, Char *s)); extern Char *to_upper PP((Char *Result, Char *s)); extern Char *filled_string PP((Char *Result, Char c, uchar width)); extern Char *right_justify PP((Char *Result, Char *s, uchar width)); extern Char *left_justify PP((Char *Result, Char *s, uchar width)); extern Char *center PP((Char *Result, Char *s, uchar width)); extern Char *merge PP((Char *Result, Char *s1, Char *s2)); extern Char *untab PP((Char *Result, Char *s, uchar tabsize)); extern Char *tab_compress PP((Char *Result, Char *s, uchar tabsize)); extern Char *replace_chars PP((Char *Result, Char *s, Char find, Char sub)); extern Char *replace_strs PP((Char *Result, Char *s, Char *find, Char *sub)); extern Void extract_delimited_string PP((Char lfchar, Char rtchar, Char *instr, uchar *startloc, uchar *size)); extern Char *find_symbol_def PP((Char *Result, symbol_node *slist, Char *symbol)); extern Char *match_symbol PP((Char *Result, symbol_node *slist, Char *symbol)); extern Void init_symbol PP((symbol_node **slist, Char *symbol, Char *definition)); extern Void copy_symbols PP((symbol_node **src, symbol_node **dst)); extern Void release_all_symbols PP((symbol_node **slist)); extern Void show_symbols PP((FILE **out, symbol_node *slist, Char *s1, uchar width1, Char *s2, uchar width2, uchar numcol)); extern long expand_macros PP((symbol_node *mlist, Char mc, uchar msize, Char *instr, Char *outstr)); extern Char *macro_error PP((Char *Result, long i)); extern long format_line PP((Char *instr, uchar leftmargin, uchar rightmargin, Char *outstr)); extern Char *alpha_count PP((Char *Result, long i)); extern boolean file_exists PP((Char *f)); extern Char *int2str PP((Char *Result, long i)); extern Char *float2str PP((Char *Result, double r)); extern Char *cli PP((Char *Result, symbol_node **slist, Char sc)); extern Char *cli2 PP((Char *Result, symbol_node **slist, Char sc, int argc_, Char *argv_[])); extern Char *tokenize PP((Char *Result, Char *line)); extern Char *get_token PP((Char *Result, Char *line)); #undef vextern #endif /*STRINGS_H*/ /* End. */