DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T u

⟦2b402d262⟧ TextFile

    Length: 1198 (0x4ae)
    Types: TextFile
    Names: »ut_com.c«

Derivation

└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
    └─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z« 
        └─⟦e5a54fb17⟧ 
            └─⟦this⟧ »pp-5.0/Lib/pp/ut_com.c« 

TextFile

/* ut_com.c Buffer utilities used by all the tx_*.c files */

# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_com.c,v 5.0 90/09/20 16:12:31 pp Exp Locker: pp $";
# endif

/*
 * $Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_com.c,v 5.0 90/09/20 16:12:31 pp Exp Locker: pp $
 *
 * $Log:	ut_com.c,v $
 * Revision 5.0  90/09/20  16:12:31  pp
 * rcsforce : 5.0 public release
 * 
 */



#include "util.h"



/* ---------------------  General  Routines  ------------------------------ */




char *Bf_put (buf, str)  /* cat str LWSP > buf */
char    *buf;
char    *str;
{
	while (*buf++ = *str++);
	return (buf);
}


extern	void	arg2vstr ();

void argv2fp (fp, argv)
FILE    *fp;
char    **argv;
{
	extern int      protocol_mode;
	char            buffer[BUFSIZ];

	arg2vstr (protocol_mode ? 0 : 72, sizeof buffer, buffer, argv);
	PP_DBG (("argv2fp(%d) -> '%s'", protocol_mode, buffer));
	fputs (buffer, fp);
	(void) putc ('\n', fp);
}




static char genbuf[BUFSIZ];
static char *_genbuf;


void genreset ()
{
	_genbuf = genbuf;
}



char  *genstore (str)
char    *str;
{
	char    *p = _genbuf;
	while (*_genbuf++ = *str++)
		continue;
	return p;
}