开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 编译器/解释器 > 查看源码
fcache.c
资源名称：pccts133.zip　[点击查看]
上传用户：itx_2006
上传日期：2007-01-06
资源大小：493k
文件大小：3k
源码类别：

编译器/解释器

开发平台：

Others

fcache.c：源码内容
  1. /*
  2.  * fcache.c
  3.  *
  4.  * SOFTWARE RIGHTS
  5.  *
  6.  * We reserve no LEGAL rights to the Purdue Compiler Construction Tool
  7.  * Set (PCCTS) -- PCCTS is in the public domain.  An individual or
  8.  * company may do whatever they wish with source code distributed with
  9.  * PCCTS or the code generated by PCCTS, including the incorporation of
  10.  * PCCTS, or its output, into commerical software.
  11.  *
  12.  * We encourage users to develop software with PCCTS.  However, we do ask
  13.  * that credit is given to us for developing PCCTS.  By "credit",
  14.  * we mean that if you incorporate our source code into one of your
  15.  * programs (commercial product, research project, or otherwise) that you
  16.  * acknowledge this fact somewhere in the documentation, research report,
  17.  * etc...  If you like PCCTS and have developed a nice tool with the
  18.  * output, please mention that you developed it using PCCTS.  In
  19.  * addition, we ask that this header remain intact in our source code.
  20.  * As long as these guidelines are kept, we expect to continue enhancing
  21.  * this system and expect to make other tools available as they are
  22.  * completed.
  23.  *
  24.  * ANTLR 1.33MR10
  25.  *
  26.  */
  28. #include <stdio.h>
  30. #ifdef __cplusplus
  31. #ifndef __STDC__
  32. #define __STDC__
  33. #endif
  34. #endif
  36. #include <ctype.h>
  37. #include "set.h"
  38. #include "syn.h"
  39. #include "hash.h"
  40. #include "generic.h"
  42. #ifdef __STDC__
  43. CacheEntry *dumpFcache1(char *prev)
  44. #else
  45. CacheEntry *dumpFcache1(prev)
  46.   char  *prev;
  47. #endif
  48. {
  49.     Entry   **table=Fcache;
  51.     int     low=0;
  52.     int     hi=0;
  54.     CacheEntry  *least=NULL;
  56. Entry   **p;
  58. for (p=table; p<&(table[HashTableSize]); p++) {
  60. CacheEntry *q =(CacheEntry *) *p;
  62. if ( q != NULL && low==0 ) low = p-table;
  63. while ( q != NULL ) {
  64.             if (strcmp(q->str,prev) > 0) {
  65.               if (least == NULL) {
  66.                 least=q;
  67.               } else {
  68.                 if (strcmp(q->str,least->str) < 0) {
  69.                   least=q;
  70.                 };
  71.               };
  72.             };
  73. q = q->next;
  74. };
  76. if ( *p != NULL ) hi = p-table;
  77. }
  78.     return least;
  79. }
  81. #ifdef __STDC__
  82. void reportFcache(CacheEntry *q)
  83. #else
  84. void reportFcache(q)
  85.   CacheEntry    *q;
  86. #endif
  87. {
  88.     char        *qstr;
  90.     fprintf(stdout,"nrule ");
  91.     for (qstr=q->str; *qstr != '*' ; qstr++) {
  92.       fprintf(stdout,"%c",*qstr);
  93.     };
  95.     qstr++;
  96.     if (*qstr == 'i') fprintf(stdout," First[");
  97.     if (*qstr == 'o') fprintf(stdout," Follow[");
  98.     qstr++;
  99.     fprintf(stdout,"%s]",qstr);
  100.     if (q->incomplete) fprintf(stdout," *** incomplete ***");
  101.     fprintf(stdout,"n");
  102.     MR_dumpTokenSet(stdout,1,q->fset);
  103. }
  105. void DumpFcache() {
  107.     char        *prev="";
  108.     int          n=0;
  109.     CacheEntry  *next;
  111.     fprintf(stdout,"nnDump of First/Follow Cachen");
  113.     while (1) {
  114.       next=dumpFcache1(prev);
  115.       if (next == NULL) break;
  116.       reportFcache(next);
  117.       ++n;
  118.       prev=next->str;
  119.     };
  120.     fprintf(stdout,"nEnd dump of First/Follow Cachen");
  121. }