1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| // 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.
|
| #include "textflag.h"
|
| // func Mod(x, y float64) float64
| TEXT ·Mod(SB),NOSPLIT,$0
| FMOVD y+8(FP), F0 // F0=y
| FMOVD x+0(FP), F0 // F0=x, F1=y
| FPREM // F0=reduced_x, F1=y
| FSTSW AX // AX=status word
| ANDW $0x0400, AX
| JNE -3(PC) // jump if reduction incomplete
| FMOVDP F0, F1 // F0=x-q*y
| FMOVDP F0, ret+16(FP)
| RET
|
|
