Files
TempleOS-Rijn/TempleOS/Demo/Dsk/FPrintF.CPP
T
2018-09-08 21:45:37 +02:00

28 lines
696 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 "/TempleOS/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("/TempleOS/*",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;