main.c

pascal 词法分析器

/*
  Powered by xiao c. @ 2007.10.29
  with: Dev-C++ Editor GNU gcc Compiler.
*/
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>
#include "errmsg.h"
#include "lexan.h"
int main(int argc, char *argv[])
{
  char* fname; int tok,i;
  
  if (argc!=2) {
     fprintf(stderr,"use argument filename\n");
     system("PAUSE");
      exit(1);
  }
  fname=argv[1];
  //fname="text.txt";
  reset(fname);
  printf("Token串 \n");
  printf("%6s记号  位置   词素\n"," ");
  for(;;) {
      tok=nexttoken();
      if (tok==0) break;
      switch(tok) {
          case ID: case LITERAL: case NUM:
          printf("%10s %4d.%d    %s\n",tokname(tok),lineNum,tokPos-linePos->i,symtable[tokenValue].tokPtr);
          break;
          default:
          printf("%10s %4d.%d\n",tokname(tok),lineNum,tokPos-linePos->i);
      }
  }
  printf("字符表 \n");
  for(i=1;i<=lastSymbol;i++){
      printf("%10s,%s\n",tokname(symtable[i].token),symtable[i].tokPtr);                                                  
  }
  system("PAUSE");	
  return 0;
}