wswitch.s

来自「操作系统SunOS 4.1.3版本的源码」· S 代码 · 共 29 行

	.data
|	.asciz	"@(#)Wswitch.s 1.1 92/07/30 Copyr 1985 Sun Micro"
	.even
	.text

|	Copyright (c) 1985 by Sun Microsystems, Inc.

#include "fpcrtdefs.h"

ENTER(Wswitch)
RTENTRY(_wswitchfp_)
	moveml	a0/a1/d0,sp@-
	JBSR(Winit,a0)
	tstw	d0
	beqs	1f
	JBSR(float_switch,a0)
	moveml	sp@+,a0/a1/d0
	RET
1:
	pea	end-begin
	pea	begin
	pea	2
	JBSR(_write,a0)
	pea	99
	JBSR(__exit,a0)
begin:
	.asciz	"Sun-3 Floating Point Accelerator not available -- program requires it\012"
end: