Die Funktion "line_format"
int line_format( char *l)
{
int last;
last=(((last=strlen(l))>0) ? last-1 : 0);
/* "@...{" --> 1 */
if(( l[first] == '@') && ( l[last] == '{'))
{ return(1);}
else
{
/* "}" --> 2 */
if(( l[first] == '}') && ( l[last] == '}'))
{ return(2);}
else
{
/* "," --> 3 */
if(( l[first] == ',') && ( l[last] == ','))
{ return(3);}
else
{
/* "=" --> 4 */
if(( l[first] == '=') && ( l[last] == '='))
{ return(4);}
else
{
/* "...=..." --> 5 */
if((last >= 15) && ( l[15] == '='))
{
/* strcat( k, l); */
return(5);
}
else
{
/* ""..."," --> 6 */
if(( last > 0 ) && ( l[first] == '"')
&& ( l[last] == ',') && ( l[last-1] == '"'))
{ return(6);}
else
{
/* ""..."" --> 7 */
if(( last > 0) && ( l[first] == '"')
&& ( l[last] == '"'))
{ return(7);}
else
{
/* ""..." --> 8 */
if( l[first] == '"')
{ return(8);}
else
{
/* "..."," --> 9 */
if(( last > 0 ) && ( l[last] == ',')
&& ( l[last-1] == '"'))
{ return(9);}
else
{
/* "..."" --> 10 */
if( l[last] == '"')
{ return(10);}
else
{
/* "...," --> 11 */
if( l[last] == ',')
{ return(11);}
else
{
/* "..." --> 0 */
return(0);
} /* endif 11 */
} /* endif 10 */
} /* endif 9 */
} /* endif 8 */
} /* endif 7 */
} /* endif 6 */
} /* endif 5 */
} /* endif 4 */
} /* endif 3 */
} /* endif 2 */
} /* endif 1 */
}
CSLIB 2000
Zurück: Persönliche Hypertexte