/* * Math library * * Copyright (C) 2016 Intel Corporation. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * * Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * * Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in * the documentation and/or other materials provided with the * distribution. * * Neither the name of Intel Corporation nor the names of its * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * * * Author Name * History: * 03-14-2016 Initial version. numerics svn rev. 12864 */ .file "ilogb_wmt.c" .text ..TXTST0: # -- Begin static_func .text .align 16,0x90 static_func: ..B1.1: ..L1: call ..L2 ..L2: popl %eax lea _GLOBAL_OFFSET_TABLE_+[. - ..L2](%eax), %eax lea static_const_table@GOTOFF(%eax), %eax ret .align 16,0x90 .type static_func,@function .size static_func,.-static_func .data # -- End static_func .text # -- Begin ilogb .text .align 16,0x90 .globl ilogb ilogb: # parameter 1: 8 + %ebp ..B2.1: ..L3: ..B2.2: pushl %ebp movl %esp, %ebp subl $104, %esp movl %ebx, 48(%esp) call static_func movl %eax, %ebx movsd 112(%esp), %xmm0 movsd %xmm0, 8(%esp) psrlq $52, %xmm0 movd %xmm0, %eax andl $2047, %eax subl $1, %eax cmpl $2046, %eax jae .L_2TAG_PACKET_0.0.3 subl $1022, %eax jmp .L_2TAG_PACKET_1.0.3 .L_2TAG_PACKET_0.0.3: movq 8(%esp), %xmm0 movq (%ebx), %xmm1 pxor %xmm2, %xmm2 testl %eax, %eax jg .L_2TAG_PACKET_2.0.3 comisd %xmm2, %xmm0 mulsd %xmm1, %xmm0 je .L_2TAG_PACKET_3.0.3 psrlq $52, %xmm0 movd %xmm0, %eax andl $2047, %eax subl $1078, %eax jmp .L_2TAG_PACKET_1.0.3 .L_2TAG_PACKET_2.0.3: ucomisd %xmm0, %xmm0 movl $2147483647, %eax movl $-2147483648, %edx cmovc %edx, %eax xorpd %xmm0, %xmm0 movq 16(%ebx), %xmm1 mulsd %xmm1, %xmm0 jmp .L_2TAG_PACKET_1.0.3 .L_2TAG_PACKET_3.0.3: movl $-2147483648, %edx movl %edx, (%esp) subl $32, %esp lea 112(%esp), %eax movl %eax, (%esp) lea 112(%esp), %eax movl %eax, 4(%esp) lea 32(%esp), %eax movl %eax, 8(%esp) movl $157, %eax movl %eax, 12(%esp) call __libm_error_support addl $32, %esp movl (%esp), %eax xorpd %xmm0, %xmm0 movq 16(%ebx), %xmm1 mulsd %xmm0, %xmm1 .L_2TAG_PACKET_1.0.3: movl 48(%esp), %ebx movl %ebp, %esp popl %ebp ret ..B2.3: .align 16,0x90 .type ilogb,@function .size ilogb,.-ilogb .data # -- End ilogb .text # -- Begin __libm_error_support .text .align 16,0x90 __libm_error_support: # parameter 1: 4 + %esp # parameter 2: 8 + %esp # parameter 3: 12 + %esp # parameter 4: 16 + %esp ..B3.1: ..L4: ret .align 16,0x90 .type __libm_error_support,@function .size __libm_error_support,.-__libm_error_support .data # -- End __libm_error_support .section .rodata, "a" .align 16 .align 16 static_const_table: .long 0 .long 1130364928 .long 0 .long 1130364928 .long 0 .long 2146435072 .long 0 .long 2146435072 .type static_const_table,@object .size static_const_table,32 .data .section .note.GNU-stack, "" # End