llvm-project/llvm/test/Transforms/InstCombine/double-float-shrink-1.ll

; RUN: opt < %s -instcombine -S | FileCheck %s

target datalayout = "e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-s0:64:64-f80:128:128-n8:16:32:64-S128"
target triple = "x86_64-unknown-linux-gnu"

; Check for and against shrinkage when using the
; unsafe-fp-math function attribute on a math lib
; function. This optimization may be overridden by
; the -enable-double-float-shrink option.
; PR17850: http://llvm.org/bugs/show_bug.cgi?id=17850

; FIXME: For all tests where the call shrinks, the 'fast' attribute on the call inst should be propagated to the new call.

define float @acos_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @acos(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: acos_test1
; CHECK: call float @acosf(float %f)
}

define double @acos_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @acos(double %conv)
   ret double %call
; CHECK-LABEL: acos_test2
; CHECK: call fast double @acos(double %conv)
}

define float @acosh_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @acosh(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: acosh_test1
; CHECK: call float @acoshf(float %f)
}

define double @acosh_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @acosh(double %conv)
   ret double %call
; CHECK-LABEL: acosh_test2
; CHECK: call fast double @acosh(double %conv)
}

define float @asin_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @asin(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: asin_test1
; CHECK: call float @asinf(float %f)
}

define double @asin_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @asin(double %conv)
   ret double %call
; CHECK-LABEL: asin_test2
; CHECK: call fast double @asin(double %conv)
}

define float @asinh_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @asinh(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: asinh_test1
; CHECK: call float @asinhf(float %f)
}

define double @asinh_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @asinh(double %conv)
   ret double %call
; CHECK-LABEL: asinh_test2
; CHECK: call fast double @asinh(double %conv)
}

define float @atan_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @atan(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: atan_test1
; CHECK: call float @atanf(float %f)
}

define double @atan_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @atan(double %conv)
   ret double %call
; CHECK-LABEL: atan_test2
; CHECK: call fast double @atan(double %conv)
}

define float @atanh_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @atanh(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: atanh_test1
; CHECK: call float @atanhf(float %f)
}

define double @atanh_test2(float %f)   {
    %conv = fpext float %f to double
    %call = call fast double @atanh(double %conv)
    ret double %call
; CHECK-LABEL: atanh_test2
; CHECK: call fast double @atanh(double %conv)
}

define float @cbrt_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @cbrt(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: cbrt_test1
; CHECK: call float @cbrtf(float %f)
}

define double @cbrt_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast  double @cbrt(double %conv)
   ret double %call
; CHECK-LABEL: cbrt_test2
; CHECK: call fast double @cbrt(double %conv)
}

define float @exp_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @exp(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: exp_test1
; CHECK: call float @expf(float %f)
}

define double @exp_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @exp(double %conv)
   ret double %call
; CHECK-LABEL: exp_test2
; CHECK: call fast double @exp(double %conv)
}

define float @expm1_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @expm1(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: expm1_test1
; CHECK: call float @expm1f(float %f)
}

define double @expm1_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @expm1(double %conv)
   ret double %call
; CHECK-LABEL: expm1_test2
; CHECK: call fast double @expm1(double %conv)
}

; exp10f() doesn't exist for this triple, so it doesn't shrink.

define float @exp10_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @exp10(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: exp10_test1
; CHECK: call fast double @exp10(double %conv)
}

define double @exp10_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @exp10(double %conv)
   ret double %call
; CHECK-LABEL: exp10_test2
; CHECK: call fast double @exp10(double %conv)
}

define float @log_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: log_test1
; CHECK: call float @logf(float %f)
}

define double @log_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log(double %conv)
   ret double %call
; CHECK-LABEL: log_test2
; CHECK: call fast double @log(double %conv)
}

define float @log10_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log10(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: log10_test1
; CHECK: call float @log10f(float %f)
}

define double @log10_test2(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @log10(double %conv)
   ret double %call
; CHECK-LABEL: log10_test2
; CHECK: call fast double @log10(double %conv)
}

define float @log1p_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log1p(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: log1p_test1
; CHECK: call float @log1pf(float %f)
}

define double @log1p_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log1p(double %conv)
   ret double %call
; CHECK-LABEL: log1p_test2
; CHECK: call fast double @log1p(double %conv)
}

define float @log2_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log2(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: log2_test1
; CHECK: call float @log2f(float %f)
}

define double @log2_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @log2(double %conv)
   ret double %call
; CHECK-LABEL: log2_test2
; CHECK: call fast double @log2(double %conv)
}

define float @logb_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @logb(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: logb_test1
; CHECK: call float @logbf(float %f)
}

define double @logb_test2(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @logb(double %conv)
   ret double %call
; CHECK-LABEL: logb_test2
; CHECK: call fast double @logb(double %conv)
}

define float @sin_test1(float %f)   {
   %conv = fpext float %f to double
   %call = call fast double @sin(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: sin_test1
; CHECK: call float @sinf(float %f)
}

define double @sin_test2(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @sin(double %conv)
   ret double %call
; CHECK-LABEL: sin_test2
; CHECK: call fast double @sin(double %conv)
}

define float @sqrt_test1(float %f) {
   %conv = fpext float %f to double
   %call = call double @sqrt(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: sqrt_test1
; CHECK: call float @sqrtf(float %f)
}

define double @sqrt_test2(float %f) {
   %conv = fpext float %f to double
   %call = call double @sqrt(double %conv)
   ret double %call
; CHECK-LABEL: sqrt_test2
; CHECK: call double @sqrt(double %conv)
}

define float @sqrt_int_test1(float %f) {
   %conv = fpext float %f to double
   %call = call double @llvm.sqrt.f64(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: sqrt_int_test1
; CHECK: call float @llvm.sqrt.f32(float %f)
}

define double @sqrt_int_test2(float %f) {
   %conv = fpext float %f to double
   %call = call double @llvm.sqrt.f64(double %conv)
   ret double %call
; CHECK-LABEL: sqrt_int_test2
; CHECK: call double @llvm.sqrt.f64(double %conv)
}

define float @tan_test1(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @tan(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: tan_test1
; CHECK: call float @tanf(float %f)
}

define double @tan_test2(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @tan(double %conv)
   ret double %call
; CHECK-LABEL: tan_test2
; CHECK: call fast double @tan(double %conv)
}
define float @tanh_test1(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @tanh(double %conv)
   %conv1 = fptrunc double %call to float
   ret float %conv1
; CHECK-LABEL: tanh_test1
; CHECK: call float @tanhf(float %f)
}

define double @tanh_test2(float %f) {
   %conv = fpext float %f to double
   %call = call fast double @tanh(double %conv)
   ret double %call
; CHECK-LABEL: tanh_test2
; CHECK: call fast double @tanh(double %conv)
}

declare double @tanh(double) #1
declare double @tan(double) #1

; sqrt is a special case: the shrinking optimization 
; is valid even without unsafe-fp-math.
declare double @sqrt(double) 
declare double @llvm.sqrt.f64(double) 

declare double @sin(double) #1
declare double @log2(double) #1
declare double @log1p(double) #1
declare double @log10(double) #1
declare double @log(double) #1
declare double @logb(double) #1
declare double @exp10(double) #1
declare double @expm1(double) #1
declare double @exp(double) #1
declare double @cbrt(double) #1
declare double @atanh(double) #1
declare double @atan(double) #1
declare double @acos(double) #1
declare double @acosh(double) #1
declare double @asin(double) #1
declare double @asinh(double) #1

attributes #1 = { "unsafe-fp-math"="true" }