23 lines
590 B
ArmAsm
23 lines
590 B
ArmAsm
// Copyright (c) 2026 Petr Balvín <opensource@petrbalvin.org> (https://petrbalvin.org)
|
|
// SPDX-License-Identifier: BSD-3-Clause
|
|
|
|
#include "textflag.h"
|
|
|
|
// func fma(a, b, c float64) float64
|
|
TEXT ·fma(SB), NOSPLIT, $0-32
|
|
FLD a+0(FP), F10
|
|
FLD b+8(FP), F11
|
|
FLD c+16(FP), F12
|
|
FMADDD F10, F11, F12, F13
|
|
FSD F13, ret+24(FP)
|
|
RET
|
|
|
|
// func fms(a, b, c float64) float64
|
|
TEXT ·fms(SB), NOSPLIT, $0-32
|
|
FLD a+0(FP), F10
|
|
FLD b+8(FP), F11
|
|
FLD c+16(FP), F12
|
|
FMSUBD F10, F11, F12, F13
|
|
FSD F13, ret+24(FP)
|
|
RET
|