File:  [MW Coherent from dump] / coherent / b / bin / c / n1 / i8086 / tables / neg.t
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

/////////
/
/ Twos complement. Integers are easy. Longs are negated in halves. There
/ may be a better sequence for long negation. This table handles routine
/ call style floating point.
/
/////////

NEG:
%	PEFFECT|PRVALUE|PREL|P_SLT
	WORD		ANYR	ANYR	*	TEMP
		TREG		WORD
		*		*
			[ZNEG]	[R]
		[IFR]	[REL0]	[LAB]

%	PEFFECT|PRVALUE|PGE|PLT|P_SLT
	LONG		ANYR	ANYR	*	TEMP
		TREG		LONG
		*		*
			[ZNEG]	[HI R]
			[ZNEG]	[LO R]
			[ZSBB]	[HI R],[CONST 0]
		[IFR]	[REL1]	[LAB]

#ifndef NDPDEF
%	PEFFECT|PRVALUE|P_SLT
	FF64		FPAC	FPAC	*	FPAC
		TREG		FF64
		*		*
			[ZXORB]	[LO HI LO R],[CONST 0200]
#endif
#ifdef NDPDEF
%	PRVALUE|P_SLT
	FF64		FPAC	FPAC	*	FPAC
		TREG		FF64
		*		*
			[ZFCHS]
#endif

unix.superglobalmegacorp.com

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