1 // format_padded_string().
14 void format_padded_string (cl_ostream stream, sintL mincol, sintL colinc, sintL minpad, char padchar, cl_boolean padleftflag, const char * str)
16 var sintL need = strlen(str) + minpad; // so viele Zeichen mindestens
17 var uintL auxpad = (need < mincol
18 ? ceiling((uintL)(mincol - need), colinc) * colinc
23 format_padding(stream,minpad+auxpad,padchar);