Return to makvar.c CVS log

Up to [MW Coherent from dump] / coherent / d / bin / cc / c / common

coherent

/*
 * Given a pointer to an argv entry, parse the variants into
 * the array of characters.
 */
#ifdef	vax
#include	"INC$LIB:var.h"
#else
#include "var.h"
#endif


makvariant(p)
register char *p;
{
	register int i, j;
	unsigned int u;
	static char digit[] = "0123456789ABCDEF";

	for (i = 0; i < VMAXIM/VGRANU; i += 1) {
		for (j = 4; j >= 0; j -= 4) {
			u = (variant[i] >> j) & 0xF;
			*p++ = digit[u];
		}
	}
	*p = 0;
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.