File:  [MW Coherent from dump] / coherent / b / bin / c / n1 / i386 / fixtop.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:37 2019 UTC (7 years, 2 months ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

/*
 * n1/i386/fixtop.c
 * Adjust types at the top of a tree node.
 * i386.
 */

#ifdef   vax
#include "INC$LIB:cc1.h"
#else
#include "cc1.h"
#endif

/*
 * Make the top of a tree a computational type.
 */
fixtoptype(tp)
register TREE *tp;
{
	register type;

	type = tp->t_type;
	if (type == S8 || type == S16)
		tp->t_type = S32;
	else if (type == U8 || type == U16)
		tp->t_type = U32;
	else if (type == F32)
		tp->t_type = F64;
}

/* end of n1/i386/fixtop.c */

unix.superglobalmegacorp.com

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