![[BACK]](/icons/back.gif){kind=icon}
Return to capaSubjective.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / capa / capa51 / pProj|
Return to capaSubjective.c CVS log | Up to [LON-CAPA] / capa / capa51 / pProj |
| version 1.1, 1999/09/28 21:26:22 | version 1.2, 2000/01/31 18:34:13 |
|---|---|
| Line 9 char* strtoupper(char* source) | Line 9 char* strtoupper(char* source) |
| { | { |
| char* result; | char* result; |
| int i,len=strlen(source); | int i,len=strlen(source); |
| result=capa_malloc(len,1); | result=capa_malloc(len+2,1); |
| for(i=0;i<len;i++) result[i]=toupper(source[i]); | for(i=0;i<len;i++) result[i]=toupper(source[i]); |
| result[i]='\0'; | |
| return result; | return result; |
| } | } |