home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / languages / pascal / PTC / _PtC1 / ptc__h < prev    next >
Encoding:
Text File  |  1991-04-25  |  6.1 KB  |  170 lines
  1.  
  2. /* c.ptc */
  3. extern void prtmsg(errors m);
  4. extern unsigned char uppercase(unsigned char c);
  5. extern unsigned char lowercase(unsigned char c);
  6. extern void gettokn(strindx i, toknbuf *t);
  7. extern void puttokn(strindx i, toknbuf *t);
  8. extern void writetok(toknbuf *w);
  9. extern void printtok(strindx i);
  10. extern void printid(idptr ip);
  11. extern void printchr(unsigned char c);
  12. extern void printstr(strindx i);
  13. extern treeptr idup(treeptr ip);
  14. extern hashtyp hashtokn(toknbuf *id);
  15. extern strindx savestr(toknbuf *t);
  16. extern idptr saveid(toknbuf *id);
  17. extern idptr mkconc(unsigned char sep, idptr p, idptr q);
  18. extern void dig(integer n);
  19. extern idptr mkuniqname(toknbuf *t);
  20. extern idptr mkvariable(unsigned char c);
  21. extern idptr mkrename(unsigned char c, idptr ip);
  22. extern idptr mkvrnt(void);
  23. extern void checksymbol(symset ss);
  24. extern unsigned char nextchar(void);
  25. extern unsigned char peekchar(void);
  26. extern boolean idchar(unsigned char c);
  27. extern boolean numchar(unsigned char c);
  28. extern integer numval(unsigned char c);
  29. extern symtyp keywordcheck(toknbuf *w, toknidx l);
  30. extern void nexttoken(boolean realok);
  31. extern void nextsymbol(symset ss);
  32. extern treeptr typeof(treeptr tp);
  33. extern void linkup(treeptr up, treeptr tp);
  34. extern symptr mksym(ltypes vt);
  35. extern void declsym(symptr sp);
  36. extern treeptr mknode(treetyp nt);
  37. extern treeptr mklit(void);
  38. extern symptr lookupid(idptr ip, boolean fieldok);
  39. extern symptr lookuplabel(integer i);
  40. extern void enterscope(declptr dp);
  41. extern declptr currscope(void);
  42. extern void leavescope(void);
  43. extern symptr mkid(idptr ip);
  44. extern treeptr newid(idptr ip);
  45. extern treeptr oldid(idptr ip, ltypes l);
  46. extern treeptr oldfield(treeptr tp, idptr ip);
  47. extern void addfields(treeptr rp);
  48. extern void scopeup(treeptr tp);
  49. extern treeptr newlbl(void);
  50. extern treeptr oldlbl(boolean defpt);
  51. extern void pbody(treeptr tp);
  52. extern treeptr pprmlist(void);
  53. extern treeptr pprogram(void);
  54. extern treeptr pmodule(void);
  55. extern treeptr plabel(void);
  56. extern treeptr pidlist(ltypes l);
  57. extern treeptr pconst(void);
  58. extern treeptr pconstant(boolean realok);
  59. extern treeptr precord(symtyp cs, declptr dp);
  60. extern treeptr ptypedef(void);
  61. extern treeptr ptype(void);
  62. extern treeptr pvar(void);
  63. extern treeptr psubs(void);
  64. extern treeptr pconfsub(void);
  65. extern treeptr pconform(void);
  66. extern treeptr psubpar(void);
  67. extern treeptr plabstmt(void);
  68. extern treeptr pstmt(void);
  69. extern void flagassigndest(treeptr tp);
  70. extern treeptr psimple(void);
  71. extern treeptr pvariable(treeptr varptr);
  72. extern treeptr padjust(treeptr tu, treeptr tr);
  73. extern treeptr pexpr(treeptr tnp);
  74. extern treeptr pcase(void);
  75. extern treeptr pif(void);
  76. extern treeptr pwhile(void);
  77. extern treeptr prepeat(void);
  78. extern treeptr pfor(void);
  79. extern treeptr pwith(void);
  80. extern treeptr pgoto(void);
  81. extern treeptr pbegin(boolean retain);
  82. extern void parse(void);
  83. extern integer cvalof(treeptr tp);
  84. extern integer clower(treeptr tp);
  85. extern integer cupper(treeptr tp);
  86. extern integer crange(treeptr tp);
  87. extern integer csetwords(integer i);
  88. extern integer csetsize(treeptr tp);
  89. extern boolean islocal(treeptr tp);
  90. extern void crtnvar(treeptr tp);
  91. extern void renamf(treeptr tp);
  92. extern treeptr xtrit(treeptr tp, treeptr pp, boolean last);
  93. extern void nametype(treeptr tp);
  94. extern treeptr xtrenum(treeptr tp, treeptr pp);
  95. extern void extract(treeptr tp);
  96. extern void markdecl(treeptr xp);
  97. extern treeptr movedecl(treeptr tp);
  98. extern void moveglob(treeptr tp, treeptr dp);
  99. extern treeptr stackop(treeptr decl, treeptr glob, treeptr loc);
  100. extern void addcode(treeptr tp, treeptr push);
  101. extern void movevars(treeptr tp, treeptr vp);
  102. extern void registervar(treeptr tp);
  103. extern void cklevel(treeptr tp);
  104. extern void global(treeptr tp, treeptr dp, boolean depend);
  105. extern void renamc(void);
  106. extern void renamp(treeptr tp, boolean on);
  107. extern boolean filevar(treeptr tp);
  108. extern treeptr fileinit(treeptr ti, treeptr tq, boolean opn);
  109. extern void initcode(treeptr tp);
  110. extern void transform(void);
  111. extern void increment(void);
  112. extern void decrement(void);
  113. extern void indent(void);
  114. extern boolean arithexpr(treeptr tp);
  115. extern boolean needsintcast(treeptr tp);
  116. extern void eselect(treeptr tp);
  117. extern unsigned char typeletter(treeptr tp);
  118. extern void etxt(treeptr tp);
  119. extern void eformat(treeptr tq);
  120. extern void ewrite(treeptr tq);
  121. extern void esubsize(treeptr tp, treeptr tq);
  122. extern void enewsize(treeptr tp);
  123. extern void epredef(treeptr ts, treeptr tp);
  124. extern void eaddr(treeptr tp);
  125. extern void ecall(treeptr tp);
  126. extern boolean constxps(treeptr tp);
  127. extern boolean constset(treeptr tp);
  128. extern void eexpr(treeptr tp);
  129. extern void econst(treeptr tp);
  130. extern void edconst(treeptr tp);
  131. extern void etrange(treeptr tp);
  132. extern void printsuf(idptr ip);
  133. extern void etdef(idptr uid, treeptr tp);
  134. extern void etypedef(treeptr tp);
  135. extern void etype(treeptr tp);
  136. extern void evar(treeptr tp);
  137. extern void ewithtype(treeptr tp);
  138. extern void echoise(treeptr tp);
  139. extern void cenv(idptr ip, declptr dp);
  140. extern void eglobid(treeptr tp);
  141. extern void estmt(treeptr tp);
  142. extern void elabel(treeptr tp);
  143. extern void econf(treeptr tp);
  144. extern void esubr(treeptr tp);
  145. extern boolean use(predefs d);
  146. extern void capital(symptr sp);
  147. extern void eprogram(treeptr tp);
  148. extern integer size(treeptr tp);
  149. extern void eword(bitset s);
  150. extern void ebits(treeptr tp);
  151. extern void econset(treeptr tp, integer len);
  152. extern void emit(void);
  153. extern void defname(cnames cn, keyword str);
  154. extern void defid(treetyp nt, predefs did, keyword str);
  155. extern void defkey(symtyp s, keyword w);
  156. extern void fixfp(strindx i);
  157. extern void defmach(integer lo, integer hi, machdefstr str);
  158. extern void initstrstore(void);
  159. extern void initialize(void);
  160. extern void error(errors m);
  161. extern void fatal(errors m);
  162. extern int main(int _ac, unsigned char *_av[]);
  163. extern setptr Union(register setptr p1, register setptr p2);
  164. extern boolean Member(register unsigned int m, register setptr sp);
  165. extern setptr Insmem(register unsigned int m, register setptr sp);
  166. extern setptr Currset(int n, setptr sp);
  167. extern void Setncpy(register setptr S1, register setptr S2, register unsigned int N);
  168. extern struct Set *Alignset(register unsigned int *Sp);
  169. extern struct String *Alignstr(register unsigned char *Cp);
  170.