X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=sbr%2Ffmt_compile.c;h=9d8f41d016d5dff1bff32315af21c68591d09f35;hp=87e0769415afe6005983692a08ce914309c40fe3;hb=ced6090a330d3d83d0bce709f756aa3d7d65fea4;hpb=337338b404931f06f0db2119c9e145e8ca5a9860 diff --git a/sbr/fmt_compile.c b/sbr/fmt_compile.c index 87e0769..9d8f41d 100644 --- a/sbr/fmt_compile.c +++ b/sbr/fmt_compile.c @@ -1,10 +1,10 @@ /* - * fmt_compile.c -- "compile" format strings for fmt_scan - * - * This code is Copyright (c) 2002, by the authors of nmh. See the - * COPYRIGHT file in the root directory of the nmh distribution for - * complete copyright information. - */ +** fmt_compile.c -- "compile" format strings for fmt_scan +** +** This code is Copyright (c) 2002, by the authors of nmh. See the +** COPYRIGHT file in the root directory of the nmh distribution for +** complete copyright information. +*/ #include #include @@ -24,8 +24,8 @@ #endif /* - * hash table for deciding if a component is "interesting" - */ +** hash table for deciding if a component is "interesting" +*/ struct comp *wantcomp[128]; static struct format *formatvec; /* array to hold formats */ @@ -50,9 +50,10 @@ extern struct mailname fmt_mnull; #define TF_NOP 8 /* like expr but no result */ /* ftable->flags */ -/* NB that TFL_PUTS is also used to decide whether the test - * in a "%<(function)..." should be a string or numeric one. - */ +/* +** NB that TFL_PUTS is also used to decide whether the test +** in a "%<(function)..." should be a string or numeric one. +*/ #define TFL_PUTS 1 /* implicit putstr if top level */ #define TFL_PUTN 2 /* implicit putnum if top level */ @@ -191,13 +192,13 @@ static unsigned char *usr_fstring; /* for CERROR */ #define CERROR(str) compile_error (str, cp) /* - * external prototypes - */ +** external prototypes +*/ extern char *getusername(void); /* - * static prototypes - */ +** static prototypes +*/ static struct ftable *lookup(char *); static void compile_error(char *, char *); static char *compile (char *); @@ -250,10 +251,10 @@ compile_error(char *str, char *cp) } /* - * Compile format string "fstring" into format list "fmt". - * Return the number of header components found in the format - * string. - */ +** Compile format string "fstring" into format list "fmt". +** Return the number of header components found in the format +** string. +*/ int fmt_compile(char *fstring, struct format **fmt) @@ -272,12 +273,13 @@ fmt_compile(char *fstring, struct format **fmt) memset((char *) &fmt_mnull, 0, sizeof(fmt_mnull)); - /* it takes at least 4 char to generate one format so we - * allocate a worst-case format array using 1/4 the length - * of the format string. We actually need twice this much - * to handle both pre-processing (e.g., address parsing) and - * normal processing. - */ + /* + ** it takes at least 4 char to generate one format so we + ** allocate a worst-case format array using 1/4 the length + ** of the format string. We actually need twice this much + ** to handle both pre-processing (e.g., address parsing) and + ** normal processing. + */ i = strlen(fstring)/2 + 1; if (i == 1) i++; @@ -609,10 +611,11 @@ do_if(char *sp) if (ftbl->f_type >= IF_FUNCS) fp->f_type = ftbl->extra; else { - /* Put out a string test or a value - * test depending on what this - * function 's return type is. - */ + /* + ** Put out a string test or a value + ** test depending on what this + ** function 's return type is. + */ if (ftbl->flags & TFL_PUTS) { LV (FT_IF_S, 0); } else {