d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Comments added

Browse source
This commit is contained in:
kaashoek 1988-01-07 15:52:52 +00:00
parent dcf14f338b
commit a92a93bc54
1 changed files with 15 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
util/ceg/as_parser/conversion.c
View file

@ -1,3 +1,8 @@
/* This file contains functions to handle %d, %$, %dist constructs in the
* as_table.
*/
pr_text_with_conversions( str) pr_text_with_conversions( str)
char *str; char *str;
{ {
@ -15,6 +20,9 @@ char *str;
char *next_conversion( str) char *next_conversion( str)
char *str; char *str;
/* Look for a %-sign, but not in a comment or string! */
{ {
char *match(); char *match();
@ -29,18 +37,24 @@ char *str;
return( *str == '%' ? str : (char *)0); return( *str == '%' ? str : (char *)0);
} }
char *match( c, str) char *match( c, str)
char c, *str; char c, *str;
/* Look for charcter 'c', but watch out for things like \n */
{ {
while ( *str && ( *str != c || *(str-1) == '\\')) while ( *str && ( *str != c || *(str-1) == '\\'))
str++; str++;
return( *str ? str : str-1); return( *str ? str : str-1);
} }
char *match_bracket( str) char *match_bracket( str)
char *str; char *str;
/* find ')', but look at nesting '('-')' pairs, return position of ')'. /* find ')', but look at nesting '('-')' pairs, return position of ')'.
* Skip strings and comments.
*/ */
{ {
int depth; int depth;
@ -75,7 +89,7 @@ char *pr_conversion( str)
char *str; char *str;
/* str points to '%'-sign, returns pointer to first character AFTER the /* str points to '%'-sign, returns pointer to first character AFTER the
* conversion * conversion. %$ will result in a call of eval(), %d will call dist().
*/ */
{ {
char *start, *ptr, *match_bracket(), *find(); char *start, *ptr, *match_bracket(), *find();