+ register char *bg, *bl, *pt, ch;
+
+ col = strlen(str);
+ if (col)
+ fprintf(fo, "%s", str);
+ pt = bg = txt;
+ bl = 0;
+ while (*bg) {
+ pt++;
+ if (++col >72) {
+ if (!bl) {
+ bl = bg;
+ while (*bl && !isspace(*bl))
+ bl++;
+ }
+ if (!*bl)
+ goto finish;
+ ch = *bl;
+ *bl = '\0';
+ fprintf(fo, "%s\n ", bg);