flang/test/Fir/constant.fir

   1 // RUN: fir-opt %s | tco | FileCheck %s
   2
   3 // CHECK-LABEL: define [3 x i8] @x
   4 func.func @x() -> !fir.char<1,3> {
   5   %1 = fir.string_lit "xyz"(3) : !fir.char<1,3>
   6  // CHECK: ret [3 x i8] c"xyz"
   7   return %1 : !fir.char<1,3>
   8 }
   9
  10 // CHECK-LABEL: define i16 @z()
  11 func.func @z() -> !fir.logical<2> {
  12   %1 = arith.constant true
  13   %0 = fir.convert %1 : (i1) -> !fir.logical<2>
  14  // CHECK-LABEL: ret i16 1
  15   return %0 : !fir.logical<2>
  16 }