2 * (c) Oleg Puchinin 2006
3 * graycardinalster@gmail.com
11 extern char * d_lpsz_operators
[]; // from nogui_indent.cpp
13 // $ silent_bob --file
14 // Get functions list from file.
15 void flist_main (char * d_file
)
17 struct tt_state_t
* d_tt_state
;
24 if (access (d_file
, R_OK
) != F_OK
) {
25 printf ("/*** %s ***/\n", d_file
);
30 d_tt_state
= CNEW (tt_state_t
, 1);
31 d_tt_state
->fileName
= strdup (d_file
);
32 d_ptr
= THE_TT::do_tt_file (d_tt_state
);
34 d_ptr
= do_tt(d_tt_state
);
36 printf ("/*** %s ***/\n", d_file
);
38 ch
= t_op (&d_ptr
, &d_out
, true);
43 d_len
= strlen (d_out
);
45 if (!brace_depth
&& d_operators
.snfind (d_out
) == -1) {
46 if (what_is_this (d_out
, ch
) == OT::Function
)
47 printf ("%s;\n", d_out
);
61 free_tt_state (d_tt_state
);