version 1.5, 2002/04/26 13:12:33 |
version 1.6, 2002/04/26 16:15:16 |
|
|
static unsigned int flags = TRACE_QUOTE | TRACE_EXPANSION; |
static unsigned int flags = TRACE_QUOTE | TRACE_EXPANSION; |
|
|
static struct t * |
static struct t * |
find_trace_entry(name) |
find_trace_entry(const char *name) |
const char *name; |
|
{ |
{ |
struct t *n; |
struct t *n; |
|
|
|
|
|
|
|
|
void |
void |
mark_traced(name, on) |
mark_traced(const char *name, int on) |
const char *name; |
|
int on; |
|
{ |
{ |
struct t *n, *n2; |
struct t *n, *n2; |
|
|
|
|
} |
} |
|
|
int |
int |
is_traced(name) |
is_traced(const char *name) |
const char *name; |
|
{ |
{ |
struct t *n; |
struct t *n; |
|
|
|
|
} |
} |
|
|
void |
void |
trace_file(name) |
trace_file(const char *name) |
const char *name; |
|
{ |
{ |
|
|
if (traceout != stderr) |
if (traceout != stderr) |
|
|
} |
} |
|
|
static unsigned int |
static unsigned int |
letter_to_flag(c) |
letter_to_flag(int c) |
int c; |
|
{ |
{ |
switch(c) { |
switch(c) { |
case 'a': |
case 'a': |
|
|
} |
} |
|
|
void |
void |
set_trace_flags(s) |
set_trace_flags(const char *s) |
const char *s; |
|
{ |
{ |
char mode = 0; |
char mode = 0; |
unsigned int f = 0; |
unsigned int f = 0; |
|
|
} |
} |
|
|
static void |
static void |
print_header(inp) |
print_header(struct input_file *inp) |
struct input_file *inp; |
|
{ |
{ |
fprintf(traceout, "m4trace:"); |
fprintf(traceout, "m4trace:"); |
if (flags & TRACE_FILENAME) |
if (flags & TRACE_FILENAME) |
|
|
} |
} |
|
|
ssize_t |
ssize_t |
trace(argv, argc, inp) |
trace(const char *argv[], int argc, struct input_file *inp) |
const char **argv; |
|
int argc; |
|
struct input_file *inp; |
|
{ |
{ |
print_header(inp); |
print_header(inp); |
if (flags & TRACE_CONT) { |
if (flags & TRACE_CONT) { |
|
|
} |
} |
|
|
void |
void |
finish_trace(mark) |
finish_trace(size_t mark) |
size_t mark; |
|
{ |
{ |
fprintf(traceout, " -> "); |
fprintf(traceout, " -> "); |
if (flags & TRACE_QUOTE) |
if (flags & TRACE_QUOTE) |