File: scalbnl.S

package info (click to toggle)
libnewlib-nano 2.11.2-1
  • links: PTS
  • area: main
  • in suites: buster
  • size: 114,156 kB
  • sloc: ansic: 631,393; cpp: 129,053; makefile: 62,427; asm: 49,042; sh: 15,817; xml: 15,337; perl: 4,340; lisp: 720; python: 557; exp: 470; yacc: 315; awk: 25; tcl: 4
file content (41 lines) | stat: -rw-r--r-- 782 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
/**
 * This file has no copyright assigned and is placed in the Public Domain.
 * This file is part of the mingw-w64 runtime package.
 * No warranty is given; refer to the file DISCLAIMER.PD within this package.
 */
#include <_mingw_mac.h>

	.file	"scalbnl.S"
	.text
#ifdef __x86_64__
	.align 8
#else
	.align 4
#endif
.globl __MINGW_USYMBOL(scalbnl)
	.def	__MINGW_USYMBOL(scalbnl);	.scl	2;	.type	32;	.endef
__MINGW_USYMBOL(scalbnl):
#ifdef __x86_64__
	subq  $24, %rsp
	andl    $-1, %r8d
	movq	%r8, (%rsp)
	fildl	(%rsp)
	fldt	(%rdx)
	fscale
	fstp	%st(1)
	movq	%rcx,%rax
	movq	$0,8(%rcx)
	fstpt	(%rcx)
	addq $24, %rsp
	ret
#else
	fildl	16(%esp)
	fldt	4(%esp)
	fscale
	fstp	%st(1)
	ret
#endif

.globl __MINGW_USYMBOL(scalblnl)
	.set	__MINGW_USYMBOL(scalblnl),__MINGW_USYMBOL(scalbnl)