2016-03-01 15:57:46 -07:00
|
|
|
// Copyright 2010 The Go Authors. All rights reserved.
|
2010-02-10 01:06:41 -07:00
|
|
|
// Use of this source code is governed by a BSD-style
|
|
|
|
// license that can be found in the LICENSE file.
|
|
|
|
|
2014-08-12 18:04:45 -06:00
|
|
|
#include "textflag.h"
|
2013-08-12 11:25:18 -06:00
|
|
|
|
2010-02-10 01:06:41 -07:00
|
|
|
// func Exp2(x float64) float64
|
2013-08-12 11:25:18 -06:00
|
|
|
TEXT ·Exp2(SB),NOSPLIT,$0
|
2010-02-10 01:06:41 -07:00
|
|
|
// test bits for not-finite
|
2013-03-22 10:57:55 -06:00
|
|
|
MOVL x_hi+4(FP), AX
|
2010-02-10 01:06:41 -07:00
|
|
|
ANDL $0x7ff00000, AX
|
|
|
|
CMPL AX, $0x7ff00000
|
|
|
|
JEQ not_finite
|
|
|
|
FMOVD x+0(FP), F0 // F0=x
|
|
|
|
FMOVD F0, F1 // F0=x, F1=x
|
|
|
|
FRNDINT // F0=int(x), F1=x
|
|
|
|
FSUBD F0, F1 // F0=int(x), F1=x-int(x)
|
|
|
|
FXCHD F0, F1 // F0=x-int(x), F1=int(x)
|
|
|
|
F2XM1 // F0=2**(x-int(x))-1, F1=int(x)
|
|
|
|
FLD1 // F0=1, F1=2**(x-int(x))-1, F2=int(x)
|
|
|
|
FADDDP F0, F1 // F0=2**(x-int(x)), F1=int(x)
|
|
|
|
FSCALE // F0=2**x, F1=int(x)
|
|
|
|
FMOVDP F0, F1 // F0=2**x
|
2013-03-22 10:57:55 -06:00
|
|
|
FMOVDP F0, ret+8(FP)
|
2010-02-10 01:06:41 -07:00
|
|
|
RET
|
|
|
|
not_finite:
|
|
|
|
// test bits for -Inf
|
2013-03-22 10:57:55 -06:00
|
|
|
MOVL x_hi+4(FP), BX
|
|
|
|
MOVL x_lo+0(FP), CX
|
2010-02-10 01:06:41 -07:00
|
|
|
CMPL BX, $0xfff00000
|
|
|
|
JNE not_neginf
|
|
|
|
CMPL CX, $0
|
|
|
|
JNE not_neginf
|
2013-03-22 10:57:55 -06:00
|
|
|
MOVL $0, ret_lo+8(FP)
|
|
|
|
MOVL $0, ret_hi+12(FP)
|
2010-02-10 01:06:41 -07:00
|
|
|
RET
|
|
|
|
not_neginf:
|
2013-03-22 10:57:55 -06:00
|
|
|
MOVL CX, ret_lo+8(FP)
|
|
|
|
MOVL BX, ret_hi+12(FP)
|
2010-02-10 01:06:41 -07:00
|
|
|
RET
|