rcs/lib/rcsgen.c

463 	register FILE *fout;
468 	if (!(fout = frewrite)) {
471 			fout = fopenSafer(makedirtemp(0), FOPEN_WB);
475 			fout = fdopen(fo, FOPEN_WB);
478 		if (!(frewrite = fout))
486 	aputc_(*Khead, fout)
487 	aprintf(fout, "%s\t%s;\n", Khead + 1, Head?Head->num:"");
489 		aprintf(fout, "%s\t%s;\n", Kbranch, Dbranch);
491 	aputs(Kaccess, fout);
494 	       aprintf(fout, "\n\t%s", curaccess->login);
497 	aprintf(fout, ";\n%s", Ksymbols);
500 	       aprintf(fout, "\n\t%s:%s", curassoc->symbol, curassoc->num);
503 	aprintf(fout, ";\n%s", Klocks);
506 	       aprintf(fout, "\n\t%s:%s", curlock->login, curlock->delta->num);
509 	if (StrictLocks) aprintf(fout, "; %s", Kstrict);
510 	aprintf(fout, ";\n");
512 		aprintf(fout, "%s\t", Kcomment);
513 		putstring(fout, true, Comment, false);
514 		aprintf(fout, ";\n");
517 		aprintf(fout, "%s\t%c%s%c;\n",
520 	awrite(Ignored.string, Ignored.size, fout);
521 	aputc_('\n', fout)
526 putdelta(node, fout)
528 	register FILE * fout;
535 	aprintf(fout, "\n%s\n%s\t%s;\t%s %s;\t%s %s;\nbranches",
543 	       aprintf(fout, "\n\t%s", nextbranch->hsh->num);
547 	aprintf(fout, ";\n%s\t%s;\n", Knext, node->next?node->next->num:"");
548 	awrite(node->ig.string, node->ig.size, fout);
553 puttree(root, fout)
555 	register FILE *fout;
563 		putdelta(root, fout);
565 	puttree(root->next, fout);
569 	     puttree(nextbranch->hsh, fout);
576 putdtext(delta, srcname, fout, diffmt)
579 	FILE *fout;
595 	putdftext(delta, fin, fout, diffmt);
635 	register FILE *fout;
641 	fout = foutfile;
642 	aprintf(fout, DELNUMFORM, delta->num, Klog);
645 	putstring(fout, true, delta->log, true);
646 	aputc_('\n', fout)
649 	awrite(delta->igtext.string, delta->igtext.size, fout);
652 	aprintf(fout, "%s\n%c", Ktext, SDELIM);
661 		if (c==SDELIM) aputc_(SDELIM, fout) /*double up SDELIM*/
662 		aputc_(c, fout)
666 	    while (0  <=  (ed = getdiffcmd(fin, false, fout, &dc)))
673 				aputc_(SDELIM, fout)
674 			    aputc_(c, fout)
680 	aprintf(fout, "%c\n", SDELIM);