[BACK]Return to fabs.s CVS log [TXT] [DIR] Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / lib / libc / tahoe / gen
File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / lib / libc / tahoe / gen / fabs.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jul 28 12:24:19 2019 UTC (7 years ago) by root
Branches: bsd, MAIN
CVS tags: v12b, v121, HEAD
Power 6/32 Unix version 1.2b

/* @(#)fabs.s	Tahoe version 1/28/83	*/

#include "DEFS.h"

ENTRY(fabs)

	movl	8(fp),r1
	movl	4(fp),r0
	bgeq	fabsl
	xorl2	$0x80000000,r0
fabsl:
	ret
unix.superglobalmegacorp.com

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