Tools/CodeTools/TianoTools/Pccts/h/charptr.c

   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-2000
  27  */
  28
  29 #include "pcctscfg.h"
  30
  31 #ifdef __STDC__
  32 #include "pccts_stdlib.h"
  33 #else
  34 #include <malloc.h>
  35 #endif
  36 #include "pccts_string.h"
  37
  38 /* 133MR1 include stdio.h for fprintf in charptr.c */
  39
  40 #include "pccts_stdio.h"
  41
  42 /* 133MR1 include charptr.h for Attrib in charptr.c */
  43
  44 #include "charptr.h"
  45
  46 #ifdef __USE_PROTOS
  47 zzcr_attr(Attrib *a,int token,char *text)
  48 #else
  49 zzcr_attr(a,token,text)
  50 Attrib *a;
  51 int token;
  52 char *text;
  53 #endif
  54 {
  55         *a = (char *) malloc(strlen(text)+1);                   /* MR6 */
  56         if ( *a == NULL ) {fprintf(stderr, "zzcr_attr: out of memory!\n"); exit(-1);}
  57         strcpy(*a, text);
  58 }