Return to capaLexerDef.flex CVS log | Up to [LON-CAPA] / capa / capa51 / pProj |
version 1.3, 1999/10/13 20:05:00 | version 1.4, 1999/10/18 20:58:33 |
---|---|
Line 1135 char * | Line 1135 char * |
strsave(char *s) | strsave(char *s) |
{ | { |
char *p; | char *p; |
if (s==NULL) {return s;} | |
p=capa_malloc(strlen(s)+1,1); | p=capa_malloc(strlen(s)+1,1); |
strcpy(p,s); | strcpy(p,s); |
return (p); | return (p); |