Ultrix-3.1/src/cmd/tbl/tr.c

Compare this file to the similar file:
Show the results in this format: 


/**********************************************************************
 *   Copyright (c) Digital Equipment Corporation 1984, 1985, 1986.    *
 *   All Rights Reserved. 					      *
 *   Reference "/usr/src/COPYRIGHT" for applicable restrictions.      *
 **********************************************************************/

/*	SCCSID:	@(#)tr.c	3.0	4/22/86	*/
/*	(SYSTEM 5.0)	tr.c	1.1	*/
/* tr.c: number register allocation */
# include "t..c"
char * nregs[] ={
	/* this array must have at least 3*qcol entries
	   or illegal register names will result */
	"40","41","42","43","44","45","46","47","48","49",
	"50","51","52","53","54","55","56","57","58","59",
	"60","61","62","63","64","65","66","67","68","69",
	"70","71","72","73","74","75","76","77","78","79",
	"80","81","82","83","84","85","86","87","88","89",
	"90","91","92","93","94","95","96","97","4q","4r",
	"4s","4t","4u","4v","4w","4x","4y","4z","4;","4.",
	"4a","4b","4c","4d","4e","4f","4g","4h","4i","4j",
	"4k","4l","4m","4n","4o","4p","5a","5b","5c","5d",
	"5e","5f","5g","5h","5i","5j","5k","5l","5m","5n",
	"5o","5p","5q","5r","5s","5t","5u","5v","5w","5x",
	0};
char *
reg(col, place)
{
if(sizeof(nregs) < 2*3*qcol)
	error("Too many columns for registers");
return (nregs[qcol*place+col]);
}