p2c.hdrs

把pascal程序转成C语言程序 把pascal程序转成C语言程序

/* Declarations created by "makeproto" on Tue Dec  7 20:57:13 1993 */



/* Declarations from trans.c */
extern void     saveoldfile        PP( (char *fname) );
extern void     closelogfile       PV();
extern void     showinitfile       PV();
extern void     usage              PV();
extern int      main               PP( (int argc, char **argv) );
extern void     exit_failure       PV();
extern int      outmem             PV();
extern int      ISBOGUS            PP( (char *p) );
extern char    *meaningkindname    PP( (enum meaningkind kind) );
extern char    *typekindname       PP( (enum typekind kind) );
extern char    *exprkindname       PP( (enum exprkind kind) );
extern char    *stmtkindname       PP( (enum stmtkind kind) );
extern void     dumptype           PP( (Type *tp) );
extern void     dumpmeaning        PP( (Meaning *mp) );
extern void     dumpsymtable       PP( (Symbol *sym) );
extern void     dumptypename       PP( (Type *tp, int waddr) );
extern void     dumptypename_file  PP( (FILE *f, Type *tp) );
extern void     dumpexpr           PP( (Expr *ex) );
extern void     dumpexpr_file      PP( (FILE *f, Expr *ex) );
extern void     innerdumpstmt      PP( (Stmt *sp, int indent) );
extern void     dumpstmt           PP( (Stmt *sp, int indent) );
extern void     dumpstmt_file      PP( (FILE *f, Stmt *sp) );
extern void     wrapup             PV();
extern void     mem_summary        PV();
extern anyptr   test_malloc        PP( (int size, int *total, int *final) );
extern void     test_free          PP( (anyptr p) );
extern anyptr   test_realloc       PP( (anyptr p, int size) );

/* Declarations from stuff.c */
extern void     debughook          PV();
extern Strlist *strlist_append     PP( (Strlist **base, char *s) );
extern Strlist *strlist_insert     PP( (Strlist **base, char *s) );
extern Strlist *strlist_add        PP( (Strlist **base, char *s) );
extern void     strlist_mix        PP( (Strlist **base, Strlist *sl) );
extern void     strlist_eat        PP( (Strlist **base) );
extern void     strlist_empty      PP( (Strlist **base) );
extern void     strlist_remove     PP( (Strlist **base, char *s) );
extern void     strlist_delete     PP( (Strlist **base, Strlist *sl) );
extern Strlist *strlist_find       PP( (Strlist *base, char *s) );
extern Strlist *strlist_cifind     PP( (Strlist *base, char *s) );
extern int      strcincmp          PP( (char *s1, char *s2, int n) );
extern int      strcicmp           PP( (char *s1, char *s2) );
extern void     fixfname           PP( (char *fn, char *ext) );
extern void     removesuffix       PP( (char *fn) );
extern char    *stralloc           PP( (char *s) );
extern void     strchange          PP( (char **v, char *s) );
extern char    *format_gen         PP( (char *fmt, long i1, long i2, double dbl,
                                        char *s1, char *s2, char *s3) );
extern char    *format_none        PP( (char *fmt) );
extern char    *format_d           PP( (char *fmt, long a1) );
extern char    *format_g           PP( (char *fmt, double a1) );
extern char    *format_s           PP( (char *fmt, char *a1) );
extern char    *format_ss          PP( (char *fmt, char *a1, char *a2) );
extern char    *format_sd          PP( (char *fmt, char *a1, long a2) );
extern char    *format_ds          PP( (char *fmt, long a1, char *a2) );
extern char    *format_dd          PP( (char *fmt, long a1, long a2) );
extern char    *format_sss         PP( (char *fmt, char *a1, char *a2, char *a3) );
extern char    *format_ssd         PP( (char *fmt, char *a1, char *a2, long a3) );
extern char    *format_sds         PP( (char *fmt, char *a1, long a2, char *a3) );
extern int      my_toupper         PP( (int c) );
extern int      my_tolower         PP( (int c) );
extern void     upc                PP( (char *s) );
extern void     lwc                PP( (char *s) );
extern char    *strupper           PP( (char *s) );
extern char    *strlower           PP( (char *s) );
extern char    *my_strchr          PP( (char *cp, int c) );
extern char    *my_strrchr         PP( (char *cp, int c) );
extern char    *my_strtok          PP( (char *cp, char *delim) );
extern char    *my_strtokq         PP( (char *cp, char *delim) );
extern long     my_strtol          PP( (char *buf, char **ret, int base) );
extern void     init_stuff         PV();

/* Declarations from out.c */
extern void     setup_out          PV();
extern int      grow_outfilebuf    PV();
extern void     flush_outfilebuf   PV();
extern void     puts_outf          PP( (char *s) );
extern void     select_outfile     PP( (FILE *fp) );
extern void     start_source       PV();
extern void     end_source         PV();
extern int      line_start         PV();
extern int      cur_column         PV();
extern int      lookback           PP( (int n) );
extern int      lookback_prn       PP( (int n) );
extern int      adddeltas          PP( (int d1, int d2) );
extern int      applydelta         PP( (int i, int d) );
extern void     moreindent         PP( (int delta) );
extern void     singleindent       PP( (int delta) );
extern void     futureindent       PP( (int num) );
extern int      parsedelta         PP( (char *cp, int def) );
extern void     eatblanklines      PV();
extern int      parse_breakstr     PP( (char *cp) );
extern long     getcurtime         PV();
extern void     output             PP( (char *msg) );
extern void     out_n_spaces       PP( (int n) );
extern void     out_spaces         PP( (int spc, int over, int len, int delta) );
extern void     testlinebreaker    PP( (int lev, char *fn) );
extern void     outsection         PP( (int size) );
extern int      isembedcomment     PP( (Strlist *cmt) );
extern Strlist *outcomments        PP( (Strlist *cmt) );
extern void     outcomment         PP( (Strlist *cmt) );
extern void     outtrailcomment    PP( (Strlist *cmt, int serial, int indent) );
extern void     flushcomments      PP( (Strlist **cmt, int kind, int serial) );
extern char    *rawCstring         PP( (char *fmt, char *s, int len, int special) );
extern char    *makeCstring        PP( (char *s, int len) );
extern char    *makeCchar          PP( (int ich) );

/* Declarations from comment.c */
extern void     setup_comment      PV();
extern int      commentlen         PP( (Strlist *cmt) );
extern int      commentvisible     PP( (Strlist *cmt) );
extern void     steal_comments     PP( (long olds, long news, int always) );
extern Strlist *fixbeginendcomment PP( (Strlist *cmt) );
extern void     attach_comments    PP( (Stmt *sbase) );
extern void     setcommentkind     PP( (Strlist *cmt, int kind) );
extern void     commentline        PP( (int kind) );
extern void     addnote            PP( (char *msg, long serial) );
extern Strlist *grabcomment        PP( (int kind) );
extern int      matchcomment       PP( (Strlist *cmt, int kind, long stamp) );
extern Strlist *findcomment        PP( (Strlist *cmt, int kind, long stamp) );
extern Strlist *extractcomment     PP( (Strlist **cmt, int kind, long stamp) );
extern void     changecomments     PP( (Strlist *cmt, int okind, long ostamp,
                                        int kind, long stamp) );

/* Declarations from lex.c */
extern char    *fixpascalname      PP( (char *name) );
extern void     init_lex           PV();
extern void     setup_lex          PV();
extern int      checkeatnote       PP( (char *msg) );
extern void     beginerror         PV();
extern void     counterror         PV();
extern void     error              PP( (char *msg) );
extern void     interror           PP( (char *proc, char *msg) );
extern void     warning            PP( (char *msg) );
extern void     intwarning         PP( (char *proc, char *msg) );
extern void     note               PP( (char *msg) );
extern void     endnote            PP( (char *msg) );
extern void     showendnotes       PV();
extern char    *tok_name           PP( (Token tok) );
extern void     expected           PP( (char *msg) );
extern void     expecttok          PP( (Token tok) );
extern void     needtok            PP( (Token tok) );
extern int      wexpected          PP( (char *msg) );
extern int      wexpecttok         PP( (Token tok) );
extern int      wneedtok           PP( (Token tok) );
extern void     alreadydef         PP( (Symbol *sym) );
extern void     undefsym           PP( (Symbol *sym) );
extern void     symclass           PP( (Symbol *sym) );
extern void     badtypes           PV();
extern void     valrange           PV();
extern void     skipparens         PV();
extern void     skiptotoken2       PP( (Token tok1, Token tok2) );
extern void     skippasttoken2     PP( (Token tok1, Token tok2) );
extern void     skippasttotoken    PP( (Token tok1, Token tok2) );
extern void     skiptotoken        PP( (Token tok) );
extern void     skippasttoken      PP( (Token tok) );
extern int      skipopenparen      PV();
extern int      skipcloseparen     PV();
extern int      skipcomma          PV();
extern char    *findaltname        PP( (char *name, int num) );
extern Symbol  *findsymbol_opt     PP( (char *name) );
extern Symbol  *findsymbol         PP( (char *name) );
extern void     clearprogress      PV();
extern void     progress           PV();
extern void     replacestrings     PP( (char *buf, Strlist *sl) );
extern void     getline            PV();
extern void     push_input_file    PP( (FILE *fp, char *fname, int isinclude) );
extern void     include_as_import  PV();
extern void     push_input_strlist PP( (Strlist *sp, char *fname) );
extern void     pop_input          PV();
extern int      undooption         PP( (int i, char *name) );
extern void     badinclude         PV();
extern int      handle_include     PP( (char *fn) );
extern int      turbo_directive    PP( (char *closing, char *after) );
extern void     defmacro           PP( (char *name, long kind, char *fname,
                                        int lnum) );
extern void     check_unused_macros PV();
extern char    *getinlinepart      PV();
extern char     getchartok         PV();
extern char    *getparenstr        PP( (char *buf) );
extern void     leadingcomments    PV();
extern void     get_C_string       PP( (int term) );
extern void     begincommenting    PP( (char *cp) );
extern void     saveinputcomment   PP( (char *cp) );
extern void     endcommenting      PP( (char *cp) );
extern char    *peeknextptr        PV();
extern int      peeknextchar       PV();
extern int      peeknextword       PP( (char *word) );
extern void     gettok             PV();
extern void     checkkeyword       PP( (Token tok) );
extern void     checkmodulewords   PV();

/* Declarations from parse.c */
extern void     setup_parse        PV();
extern void     echobreak          PV();