charptr.c
上传用户:itx_2006
上传日期:2007-01-06
资源大小:493k
文件大小:2k
源码类别:

编译器/解释器

开发平台:

Others

  1. /*
  2.  * SOFTWARE RIGHTS
  3.  *
  4.  * We reserve no LEGAL rights to the Purdue Compiler Construction Tool
  5.  * Set (PCCTS) -- PCCTS is in the public domain.  An individual or
  6.  * company may do whatever they wish with source code distributed with
  7.  * PCCTS or the code generated by PCCTS, including the incorporation of
  8.  * PCCTS, or its output, into commerical software.
  9.  *
  10.  * We encourage users to develop software with PCCTS.  However, we do ask
  11.  * that credit is given to us for developing PCCTS.  By "credit",
  12.  * we mean that if you incorporate our source code into one of your
  13.  * programs (commercial product, research project, or otherwise) that you
  14.  * acknowledge this fact somewhere in the documentation, research report,
  15.  * etc...  If you like PCCTS and have developed a nice tool with the
  16.  * output, please mention that you developed it using PCCTS.  In
  17.  * addition, we ask that this header remain intact in our source code.
  18.  * As long as these guidelines are kept, we expect to continue enhancing
  19.  * this system and expect to make other tools available as they are
  20.  * completed.
  21.  *
  22.  * ANTLR 1.33
  23.  * Terence Parr
  24.  * Parr Research Corporation
  25.  * with Purdue University and AHPCRC, University of Minnesota
  26.  * 1989-1998
  27.  */
  28. #include "pcctscfg.h"
  29. #ifdef __STDC__
  30. #include PCCTS_STDLIB_H
  31. #else
  32. #include <malloc.h>
  33. #endif
  34. #include PCCTS_STRING_H
  35. /* 133MR1 include stdio.h for fprintf in charptr.c */
  36. #include PCCTS_STDIO_H
  37. /* 133MR1 include charptr.h for Attrib in charptr.c */
  38. #include "charptr.h"
  39. #ifdef __STDC__
  40. zzcr_attr(Attrib *a,int token,char *text)
  41. #else
  42. zzcr_attr(a,token,text)
  43. Attrib *a;
  44. int token;
  45. char *text;
  46. #endif
  47. {
  48. *a = (char *) malloc(strlen(text)+1); /* MR6 */
  49. if ( *a == NULL ) {fprintf(stderr, "zzcr_attr: out of memory!n"); exit(-1);}
  50. strcpy(*a, text);
  51. }