math: 386 FPU functions
sin, cos, tan, asin, acos, atan, exp, log, log10,
floor, ceil, and fabs
R=rsc
CC=golang-dev
https://golang.org/cl/189083
2010-01-15 14:21:36 -07:00
|
|
|
// Copyright 2010 The Go Authors. All rights reserved.
|
|
|
|
// Use of this source code is governed by a BSD-style
|
|
|
|
// license that can be found in the LICENSE file.
|
|
|
|
|
|
|
|
// func Tan(x float64) float64
|
2010-01-25 19:52:55 -07:00
|
|
|
TEXT ·Tan(SB),7,$0
|
math: 386 FPU functions
sin, cos, tan, asin, acos, atan, exp, log, log10,
floor, ceil, and fabs
R=rsc
CC=golang-dev
https://golang.org/cl/189083
2010-01-15 14:21:36 -07:00
|
|
|
FMOVD x+0(FP), F0 // F0=x
|
|
|
|
FPTAN // F0=1, F1=tan(x) if -2**63 < x < 2**63
|
|
|
|
FSTSW AX // AX=status word
|
|
|
|
ANDW $0x0400, AX
|
|
|
|
JNE 4(PC) // jump if x outside range
|
|
|
|
FMOVDP F0, F0 // F0=tan(x)
|
2013-03-22 10:57:55 -06:00
|
|
|
FMOVDP F0, ret+8(FP)
|
math: 386 FPU functions
sin, cos, tan, asin, acos, atan, exp, log, log10,
floor, ceil, and fabs
R=rsc
CC=golang-dev
https://golang.org/cl/189083
2010-01-15 14:21:36 -07:00
|
|
|
RET
|
|
|
|
FLDPI // F0=Pi, F1=x
|
|
|
|
FADDD F0, F0 // F0=2*Pi, F1=x
|
|
|
|
FXCHD F0, F1 // F0=x, F1=2*Pi
|
|
|
|
FPREM1 // F0=reduced_x, F1=2*Pi
|
|
|
|
FSTSW AX // AX=status word
|
|
|
|
ANDW $0x0400, AX
|
|
|
|
JNE -3(PC) // jump if reduction incomplete
|
|
|
|
FMOVDP F0, F1 // F0=reduced_x
|
|
|
|
FPTAN // F0=1, F1=tan(reduced_x)
|
|
|
|
FMOVDP F0, F0 // F0=tan(reduced_x)
|
2013-03-22 10:57:55 -06:00
|
|
|
FMOVDP F0, ret+8(FP)
|
math: 386 FPU functions
sin, cos, tan, asin, acos, atan, exp, log, log10,
floor, ceil, and fabs
R=rsc
CC=golang-dev
https://golang.org/cl/189083
2010-01-15 14:21:36 -07:00
|
|
|
RET
|