28 lines
698 B
C++
28 lines
698 B
C++
/* There is no FPrintF type function and no
|
|
way to grow files. Therefore, use mem to
|
|
hold the file until you are done. The $LK,"CDoc","MN:CDoc"$
|
|
framework is convenient for this.
|
|
*/
|
|
|
|
#include "/SparrowOS/Demo/Shared/TreeDemoJoin"
|
|
|
|
U0 FPrintFDemo(U8 *output_filename=NULL)
|
|
{
|
|
I64 fuf_flags=0;
|
|
CDoc *doc=DocNew;
|
|
GetFFlags(&fuf_flags,Define("ST_FILE_UTIL_FLAGS"),"+r");
|
|
DocPutS(doc,"$$TR-C+AL,\"\"$$\n");
|
|
DocPutS(doc,"$$ID,+2$$");
|
|
TreeSub(doc,FilesFind("/SparrowOS/*",fuf_flags));
|
|
DocPutS(doc,"$$ID,-2$$");
|
|
DocRecalc(doc);
|
|
if (output_filename) {
|
|
StrCpy(doc->filename.name,output_filename);
|
|
DocWrite(doc,FALSE);
|
|
} else
|
|
DocWrite(doc,TRUE);
|
|
DocDel(doc);
|
|
}
|
|
|
|
FPrintFDemo;
|