According to comment in tree-nested.c, these frames should be only introduced in case of debug or OpenMP lowering:<br><br>/* A subroutine of convert_nonlocal_reference_op. Create a local variable<br> in the nested function with DECL_VALUE_EXPR set to reference the true<br>
variable in the parent function. This is used both for debug info<br> and in OpenMP lowering. */<br><br>However, in this code example we don't have neither debugging, nor OpenMP.<br><br>How do you think, is it possible to disable those FRAME-s? Important for accurate CLooG/Polly handling.<br>
<br>- D.<br><br><div class="gmail_quote">2012/7/31 Dmitry N. Mikushin <span dir="ltr"><<a href="mailto:maemarcus@gmail.com" target="_blank">maemarcus@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hi Duncan,<br><br>A DragonEgg/GCC-related question: do you know where these strange FRAME tokens originate from (e.g. %struct.FRAME.matmul)? Compiling simple Fortran code with DragonEgg:<br><br>> cat matmul.f90<br><br>
subroutine matmul(nx, ny, nz)<br>
implicit none<br><br> integer :: nx, ny, nz<br> real, dimension(nx, ny) :: A<br> real, dimension(ny, nz) :: B<br> real, dimension(nx, nz) :: C<br><br> integer :: i, j, k<br> real, volatile :: start, finish<br><br>
call init_array<br><br> call cpu_time(start)<br><br> do i = 1, nx<br> do j = 1, nz<br> C(i,j) = 0<br> do k = 1, ny<br> C(i, j) = C(i, j) + A(i, k) * B(k, j)<br> enddo<br> enddo<br> enddo<br>
<br> call cpu_time(finish)<br><br> print *, sum(C), maxval(C), minval(C)<br> call flush()<br><br> contains<br><br> subroutine init_array<br> implicit none<br><br> integer :: i, j<br><br> do i = 1, nx<br> do j = 1, ny<br>
A(i, j) = (1 + mod((i * j), 1024)) / 2.0<br> enddo<br> enddo<br><br> do i = 1, ny<br> do j = 1, nz<br> B(i, j) = (1 + mod((i * j), 1024)) / 2.0<br> enddo<br> enddo<br><br> end subroutine init_array<br>
<br> end subroutine matmul<br><br>> kernelgen-dragonegg matmul.f90 -o -<br><br>; ModuleID = 'matmul.f90'<br>target datalayout = "e-p:64:64:64-S128-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f16:16:16-f32:32:32-f64:64:64-f128:128:128-v64:64:64-v128:128:128-a0:0:64-s0:64:64-f80:128:128-n8:16:32:64"<br>
target triple = "x86_64-unknown-linux-gnu"<br><br>%struct.FRAME.matmul = type { i64, i64, [0 x float]*, i64, i64, i32*, i64, i64, [0 x float]*, i64, i64, i32*, i32* }<br>%struct.__st_parameter_dt = type { %struct.__st_parameter_common, i64, i64*, i64*, i8*, i8*, i32, i32, i8*, i8*, i32, i32, i8*, [256 x i8], i32*, i64, i8*, i32, i32, i8*, i8*, i32, i32, i8*, i8*, i32, i32, i8*, i8*, i32, [4 x i8] }<br>
%struct.__st_parameter_common = type { i32, i32, i8*, i32, i32, i8*, i32* }<br><br>@.cst = linker_private constant [11 x i8] c"matmul.f90\00", align 8<br><br>define internal void @init_array.1535(%struct.FRAME.matmul* nest %CHAIN.41) nounwind uwtable {<br>
entry:<br> %CHAIN.41_addr = alloca %struct.FRAME.matmul*, align 8<br> %i = alloca i32<br> %j = alloca i32<br> %D.1539 = alloca i32<br> %D.1553 = alloca i32<br> %D.1542 = alloca i32<br> %D.1552 = alloca i32<br> %D.1554 = alloca i32<br>
%D.1568 = alloca i32<br> %D.1557 = alloca i32<br> %D.1567 = alloca i32<br> %"alloca point" = bitcast i32 0 to i32<br> store %struct.FRAME.matmul* %CHAIN.41, %struct.FRAME.matmul** %CHAIN.41_addr<br> %0 = load %struct.FRAME.matmul** %CHAIN.41_addr, align 64<br>
%"ssa point" = bitcast i32 0 to i32<br> br label %"2"<br><br>"2": ; preds = %entry<br> %1 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 12<br>
%2 = load i32** %1, align 8<br> %3 = load i32* %2, align 4<br> %4 = icmp sle i32 1, %3<br> br i1 %4, label %"3", label %"8"<br><br>"3": ; preds = %"7", %"2"<br>
%5 = phi i32 [ %33, %"7" ], [ 1, %"2" ]<br> %6 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 11<br> %7 = load i32** %6, align 8<br> %8 = load i32* %7, align 4<br> %9 = icmp sle i32 1, %8<br>
br i1 %9, label %"4", label %"6"<br><br>"4": ; preds = %"5", %"3"<br> %10 = phi i32 [ %30, %"5" ], [ 1, %"3" ]<br>
%11 = sext i32 %5 to i64<br> %12 = sext i32 %10 to i64<br> %13 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 10<br> %14 = load i64* %13, align 8<br> %15 = mul i64 %12, %14<br> %16 = add i64 %11, %15<br>
%17 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 9<br> %18 = load i64* %17, align 8<br> %19 = add i64 %16, %18<br> %20 = mul i32 %5, %10<br> %21 = srem i32 %20, 1024<br> %22 = add i32 %21, 1<br> %23 = sitofp i32 %22 to float<br>
%24 = fdiv float %23, 2.000000e+00<br> %25 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 8<br> %26 = load [0 x float]** %25, align 8<br> %27 = bitcast [0 x float]* %26 to float*<br> %28 = getelementptr float* %27, i64 %19<br>
store float %24, float* %28, align 4<br> %29 = icmp eq i32 %10, %8<br> %30 = add i32 %10, 1<br> %31 = icmp ne i1 %29, false<br> br i1 %31, label %"6", label %"5"<br><br>"5": ; preds = %"4"<br>
br label %"4"<br><br>"6": ; preds = %"4", %"3"<br> %32 = icmp eq i32 %5, %3<br> %33 = add i32 %5, 1<br> %34 = icmp ne i1 %32, false<br>
br i1 %34, label %"8", label %"7"<br><br>"7": ; preds = %"6"<br> br label %"3"<br><br>"8": ; preds = %"6", %"2"<br>
%35 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 11<br> %36 = load i32** %35, align 8<br> %37 = load i32* %36, align 4<br> %38 = icmp sle i32 1, %37<br> br i1 %38, label %"9", label %"14"<br>
<br>"9": ; preds = %"13", %"8"<br> %39 = phi i32 [ %67, %"13" ], [ 1, %"8" ]<br> %40 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 5<br>
%41 = load i32** %40, align 8<br> %42 = load i32* %41, align 4<br> %43 = icmp sle i32 1, %42<br> br i1 %43, label %"10", label %"12"<br><br>"10": ; preds = %"11", %"9"<br>
%44 = phi i32 [ %64, %"11" ], [ 1, %"9" ]<br> %45 = sext i32 %39 to i64<br> %46 = sext i32 %44 to i64<br> %47 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 4<br> %48 = load i64* %47, align 8<br>
%49 = mul i64 %46, %48<br> %50 = add i64 %45, %49<br> %51 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 3<br> %52 = load i64* %51, align 8<br> %53 = add i64 %50, %52<br> %54 = mul i32 %39, %44<br> %55 = srem i32 %54, 1024<br>
%56 = add i32 %55, 1<br> %57 = sitofp i32 %56 to float<br> %58 = fdiv float %57, 2.000000e+00<br> %59 = getelementptr inbounds %struct.FRAME.matmul* %0, i32 0, i32 2<br> %60 = load [0 x float]** %59, align 8<br> %61 = bitcast [0 x float]* %60 to float*<br>
%62 = getelementptr float* %61, i64 %53<br> store float %58, float* %62, align 4<br> %63 = icmp eq i32 %44, %42<br> %64 = add i32 %44, 1<br> %65 = icmp ne i1 %63, false<br> br i1 %65, label %"12", label %"11"<br>
<br>"11": ; preds = %"10"<br> br label %"10"<br><br>"12": ; preds = %"10", %"9"<br>
%66 = icmp eq i32 %39, %37<br> %67 = add i32 %39, 1<br> %68 = icmp ne i1 %66, false<br> br i1 %68, label %"14", label %"13"<br><br>"13": ; preds = %"12"<br>
br label %"9"<br><br>"14": ; preds = %"12", %"8"<br> br label %return<br><br>return: ; preds = %"14"<br>
ret void<br>}<br><br>define void @matmul_(i32* noalias %nx, i32* noalias %ny, i32* noalias %nz) nounwind uwtable {<br>entry:<br> %nx_addr = alloca i32*, align 8<br> %ny_addr = alloca i32*, align 8<br> %nz_addr = alloca i32*, align 8<br>
%ubound.0 = alloca i64<br> %ubound.1 = alloca i64<br> %stride.2 = alloca i64<br> %offset.3 = alloca i64<br> %size.4 = alloca i64<br> %a = alloca [0 x float]*<br> %ubound.5 = alloca i64<br> %ubound.6 = alloca i64<br>
%stride.7 = alloca i64<br> %offset.8 = alloca i64<br> %size.9 = alloca i64<br> %b = alloca [0 x float]*<br> %ubound.10 = alloca i64<br> %ubound.11 = alloca i64<br> %stride.12 = alloca i64<br> %offset.13 = alloca i64<br>
%size.14 = alloca i64<br> %c = alloca [0 x float]*<br> %finish = alloca float<br> %i = alloca i32<br> %j = alloca i32<br> %k = alloca i32<br> %start = alloca float<br> %D.1630 = alloca i64<br> %D.1631 = alloca i64<br>
%D.1632 = alloca i64<br> %D.1636 = alloca i64<br> %D.1637 = alloca i64<br> %D.1638 = alloca i64<br> %D.1642 = alloca i64<br> %D.1643 = alloca i64<br> %D.1644 = alloca i64<br> %a.31 = alloca i8*<br> %D.1645 = alloca i64<br>
%b.34 = alloca i8*<br> %D.1639 = alloca i64<br> %c.37 = alloca i8*<br> %D.1633 = alloca i64<br> %FRAME.40 = alloca %struct.FRAME.matmul<br> %D.1582 = alloca i32<br> %D.1593 = alloca i32<br> %D.1585 = alloca i32<br>
%D.1592 = alloca i32<br> %D.1588 = alloca i32<br> %D.1591 = alloca i32<br> %dt_parm.15 = alloca %struct.__st_parameter_dt<br> %D.1604 = alloca float<br> %D.1598 = alloca i64<br> %D.1597 = alloca i64<br> %D.1596 = alloca i64<br>
%val.16 = alloca float<br> %S.17 = alloca i64<br> %D.1601 = alloca i64<br> %S.18 = alloca i64<br> %D.1616 = alloca float<br> %fast.21 = alloca i32<br> %nonempty.20 = alloca i32<br> %D.1608 = alloca i64<br> %D.1607 = alloca i64<br>
%D.1606 = alloca i64<br> %limit.19 = alloca float<br> %S.22 = alloca i64<br> %D.1613 = alloca i64<br> %S.23 = alloca i64<br> %D.1628 = alloca float<br> %fast.26 = alloca i32<br> %nonempty.25 = alloca i32<br> %D.1620 = alloca i64<br>
%D.1619 = alloca i64<br> %D.1618 = alloca i64<br> %limit.24 = alloca float<br> %S.27 = alloca i64<br> %D.1625 = alloca i64<br> %S.28 = alloca i64<br> %D.1635 = alloca i8*<br> %D.1641 = alloca i8*<br> %D.1647 = alloca i8*<br>
%"alloca point" = bitcast i32 0 to i32<br> store i32* %nx, i32** %nx_addr<br> store i32* %ny, i32** %ny_addr<br> store i32* %nz, i32** %nz_addr<br> %0 = load i32** %nx_addr, align 64<br> %1 = load i32** %ny_addr, align 64<br>
%2 = load i32** %nz_addr, align 64<br> %"ssa point" = bitcast i32 0 to i32<br> br label %"2"<br><br>"2": ; preds = %entry<br> %3 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 12<br>
store i32* %0, i32** %3, align 8<br> %4 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 11<br> store i32* %1, i32** %4, align 8<br> %5 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 5<br>
store i32* %2, i32** %5, align 8<br> %6 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 12<br> %7 = load i32** %6, align 8<br> %8 = load i32* %7, align 4<br> %9 = sext i32 %8 to i64<br> %10 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 6<br>
store i64 %9, i64* %10, align 8<br> %11 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 6<br> %12 = load i64* %11, align 8<br> %13 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br>
store i64 %12, i64* %13, align 8<br> %14 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br> %15 = load i64* %14, align 8<br> %16 = icmp sge i64 %15, 0<br> %17 = select i1 %16, i64 %15, i64 0<br>
%18 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br> store i64 %17, i64* %18, align 8<br> %19 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 11<br> %20 = load i32** %19, align 8<br>
%21 = load i32* %20, align 4<br> %22 = sext i32 %21 to i64<br> %23 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 7<br> store i64 %22, i64* %23, align 8<br> %24 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br>
%25 = load i64* %24, align 8<br> %26 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 7<br> %27 = load i64* %26, align 8<br> %28 = mul i64 %25, %27<br> %29 = icmp sge i64 %28, 0<br> %30 = select i1 %29, i64 %28, i64 0<br>
%31 = add i64 %30, -1<br> %32 = mul i64 %30, 32<br> %33 = mul i64 %30, 4<br> %34 = mul i64 %30, 4<br> %35 = icmp uge i64 %34, 1<br> %36 = select i1 %35, i64 %34, i64 1<br> %37 = call noalias i8* @malloc(i64 %36) nounwind<br>
%38 = bitcast i8* %37 to [0 x float]*<br> %39 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 8<br> store [0 x float]* %38, [0 x float]** %39, align 8<br> %40 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br>
%41 = load i64* %40, align 8<br> %not = xor i64 %41, -1<br> %42 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 9<br> store i64 %not, i64* %42, align 8<br> %43 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 11<br>
%44 = load i32** %43, align 8<br> %45 = load i32* %44, align 4<br> %46 = sext i32 %45 to i64<br> %47 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 0<br> store i64 %46, i64* %47, align 8<br> %48 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 0<br>
%49 = load i64* %48, align 8<br> %50 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br> store i64 %49, i64* %50, align 8<br> %51 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br>
%52 = load i64* %51, align 8<br> %53 = icmp sge i64 %52, 0<br> %54 = select i1 %53, i64 %52, i64 0<br> %55 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br> store i64 %54, i64* %55, align 8<br>
%56 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 5<br> %57 = load i32** %56, align 8<br> %58 = load i32* %57, align 4<br> %59 = sext i32 %58 to i64<br> %60 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 1<br>
store i64 %59, i64* %60, align 8<br> %61 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br> %62 = load i64* %61, align 8<br> %63 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 1<br>
%64 = load i64* %63, align 8<br> %65 = mul i64 %62, %64<br> %66 = icmp sge i64 %65, 0<br> %67 = select i1 %66, i64 %65, i64 0<br> %68 = add i64 %67, -1<br> %69 = mul i64 %67, 32<br> %70 = mul i64 %67, 4<br> %71 = mul i64 %67, 4<br>
%72 = icmp uge i64 %71, 1<br> %73 = select i1 %72, i64 %71, i64 1<br> %74 = call noalias i8* @malloc(i64 %73) nounwind<br> %75 = bitcast i8* %74 to [0 x float]*<br> %76 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 2<br>
store [0 x float]* %75, [0 x float]** %76, align 8<br> %77 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br> %78 = load i64* %77, align 8<br> %not1 = xor i64 %78, -1<br> %79 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 3<br>
store i64 %not1, i64* %79, align 8<br> %80 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 12<br> %81 = load i32** %80, align 8<br> %82 = load i32* %81, align 4<br> %83 = sext i32 %82 to i64<br>
%84 = icmp sge i64 %83, 0<br> %85 = select i1 %84, i64 %83, i64 0<br> %86 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 5<br> %87 = load i32** %86, align 8<br> %88 = load i32* %87, align 4<br>
%89 = sext i32 %88 to i64<br> %90 = mul i64 %85, %89<br> %91 = icmp sge i64 %90, 0<br> %92 = select i1 %91, i64 %90, i64 0<br> %93 = add i64 %92, -1<br> %94 = mul i64 %92, 32<br> %95 = mul i64 %92, 4<br> %96 = mul i64 %92, 4<br>
%97 = icmp uge i64 %96, 1<br> %98 = select i1 %97, i64 %96, i64 1<br> %99 = call noalias i8* @malloc(i64 %98) nounwind<br> %100 = bitcast i8* %99 to [0 x float]*<br> %not2 = xor i64 %85, -1<br> call void @init_array.1535(%struct.FRAME.matmul* nest %FRAME.40) nounwind<br>
call void bitcast (void (...)* @_gfortran_cpu_time_4 to void (float*)*)(float* %start) nounwind<br> %101 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 12<br> %102 = load i32** %101, align 8<br>
%103 = load i32* %102, align 4<br>
%104 = icmp sle i32 1, %103<br> br i1 %104, label %"3", label %"11"<br><br>"3": ; preds = %"10", %"2"<br> %105 = phi i32 [ %175, %"10" ], [ 1, %"2" ]<br>
%106 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 5<br> %107 = load i32** %106, align 8<br> %108 = load i32* %107, align 4<br> %109 = icmp sle i32 1, %108<br> br i1 %109, label %"4", label %"9"<br>
<br>"4": ; preds = %"8", %"3"<br> %110 = phi i32 [ %172, %"8" ], [ 1, %"3" ]<br> %111 = sext i32 %105 to i64<br> %112 = sext i32 %110 to i64<br>
%113 = mul i64 %112, %85<br> %114 = add i64 %111, %113<br> %115 = add i64 %114, %not2<br> %116 = bitcast [0 x float]* %100 to float*<br> %117 = getelementptr float* %116, i64 %115<br> store float 0.000000e+00, float* %117, align 4<br>
%118 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 11<br> %119 = load i32** %118, align 8<br> %120 = load i32* %119, align 4<br> %121 = icmp sle i32 1, %120<br> br i1 %121, label %"5", label %"7"<br>
<br>"5": ; preds = %"6", %"4"<br> %122 = phi i32 [ %169, %"6" ], [ 1, %"4" ]<br> %123 = sext i32 %105 to i64<br> %124 = sext i32 %110 to i64<br>
%125 = mul i64 %124, %85<br> %126 = add i64 %123, %125<br> %127 = add i64 %126, %not2<br> %128 = sext i32 %105 to i64<br> %129 = sext i32 %110 to i64<br> %130 = mul i64 %129, %85<br> %131 = add i64 %128, %130<br>
%132 = add i64 %131, %not2<br>
%133 = bitcast [0 x float]* %100 to float*<br> %134 = getelementptr float* %133, i64 %132<br> %135 = load float* %134, align 4<br> %136 = sext i32 %105 to i64<br> %137 = sext i32 %122 to i64<br> %138 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 10<br>
%139 = load i64* %138, align 8<br> %140 = mul i64 %137, %139<br> %141 = add i64 %136, %140<br> %142 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 9<br> %143 = load i64* %142, align 8<br> %144 = add i64 %141, %143<br>
%145 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 8<br> %146 = load [0 x float]** %145, align 8<br> %147 = bitcast [0 x float]* %146 to float*<br> %148 = getelementptr float* %147, i64 %144<br>
%149 = load float* %148, align 4<br> %150 = sext i32 %122 to i64<br> %151 = sext i32 %110 to i64<br> %152 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 4<br> %153 = load i64* %152, align 8<br>
%154 = mul i64 %151, %153<br> %155 = add i64 %150, %154<br> %156 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 3<br> %157 = load i64* %156, align 8<br> %158 = add i64 %155, %157<br> %159 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 2<br>
%160 = load [0 x float]** %159, align 8<br> %161 = bitcast [0 x float]* %160 to float*<br> %162 = getelementptr float* %161, i64 %158<br> %163 = load float* %162, align 4<br> %164 = fmul float %149, %163<br> %165 = fadd float %135, %164<br>
%166 = bitcast [0 x float]* %100 to float*<br> %167 = getelementptr float* %166, i64 %127<br> store float %165, float* %167, align 4<br> %168 = icmp eq i32 %122, %120<br> %169 = add i32 %122, 1<br> %170 = icmp ne i1 %168, false<br>
br i1 %170, label %"7", label %"6"<br><br>"6": ; preds = %"5"<br> br label %"5"<br><br>"7": ; preds = %"5", %"4"<br>
%171 = icmp eq i32 %110, %108<br> %172 = add i32 %110, 1<br> %173 = icmp ne i1 %171, false<br> br i1 %173, label %"9", label %"8"<br><br>"8": ; preds = %"7"<br>
br label %"4"<br><br>"9": ; preds = %"7", %"3"<br> %174 = icmp eq i32 %105, %103<br> %175 = add i32 %105, 1<br> %176 = icmp ne i1 %174, false<br>
br i1 %176, label %"11", label %"10"<br><br>"10": ; preds = %"9"<br> br label %"3"<br><br>"11": ; preds = %"9", %"2"<br>
call void bitcast (void (...)* @_gfortran_cpu_time_4 to void (float*)*)(float* %finish) nounwind<br> %177 = getelementptr inbounds %struct.__st_parameter_dt* %dt_parm.15, i32 0, i32 0<br> %178 = getelementptr inbounds %struct.__st_parameter_common* %177, i32 0, i32 2<br>
store i8* getelementptr inbounds ([11 x i8]* @.cst, i64 0, i64 0), i8** %178, align 8<br> %179 = getelementptr inbounds %struct.__st_parameter_dt* %dt_parm.15, i32 0, i32 0<br> %180 = getelementptr inbounds %struct.__st_parameter_common* %179, i32 0, i32 3<br>
store i32 27, i32* %180, align 4<br> %181 = getelementptr inbounds %struct.__st_parameter_dt* %dt_parm.15, i32 0, i32 0<br> %182 = getelementptr inbounds %struct.__st_parameter_common* %181, i32 0, i32 0<br> store i32 128, i32* %182, align 4<br>
%183 = getelementptr inbounds %struct.__st_parameter_dt* %dt_parm.15, i32 0, i32 0<br> %184 = getelementptr inbounds %struct.__st_parameter_common* %183, i32 0, i32 1<br> store i32 6, i32* %184, align 4<br> call void @_gfortran_st_write(%struct.__st_parameter_dt* %dt_parm.15) nounwind<br>
br label %"12"<br><br>"12": ; preds = %"16", %"11"<br> %185 = phi float [ %190, %"16" ], [ 0.000000e+00, %"11" ]<br>
%186 = phi i64 [ %199, %"16" ], [ 1, %"11" ]<br> %187 = icmp sgt i64 %186, %89<br> br i1 %187, label %"17", label %"13"<br><br>"13": ; preds = %"12"<br>
%188 = mul i64 %186, %85<br> %189 = add i64 %188, %not2<br> br label %"14"<br><br>"14": ; preds = %"15", %"13"<br> %190 = phi float [ %197, %"15" ], [ %185, %"13" ]<br>
%191 = phi i64 [ %198, %"15" ], [ 1, %"13" ]<br> %192 = icmp sgt i64 %191, %83<br> br i1 %192, label %"16", label %"15"<br><br>"15": ; preds = %"14"<br>
%193 = add i64 %191, %189<br> %194 = bitcast [0 x float]* %100 to float*<br> %195 = getelementptr float* %194, i64 %193<br> %196 = load float* %195, align 4<br> %197 = fadd float %196, %190<br> %198 = add i64 %191, 1<br>
br label %"14"<br><br>"16": ; preds = %"14"<br> %199 = add i64 %186, 1<br> br label %"12"<br><br>"17": ; preds = %"12"<br>
store float %185, float* %D.1604, align 4<br> call void bitcast (void (%struct.__st_parameter_dt*, i8*, i32)* @_gfortran_transfer_real_write to void (%struct.__st_parameter_dt*, float*, i32)*)(%struct.__st_parameter_dt* %dt_parm.15, float* %D.1604, i32 4) nounwind<br>
br label %"18"<br><br>"18": ; preds = %"27", %"17"<br> %200 = phi float [ %207, %"27" ], [ 0xFFF0000000000000, %"17" ]<br>
%201 = phi i1 [ %208, %"27" ], [ false, %"17" ]<br> %202 = phi i1 [ %209, %"27" ], [ false, %"17" ]<br> %203 = phi i64 [ %237, %"27" ], [ 1, %"17" ]<br> %204 = icmp sgt i64 %203, %89<br>
br i1 %204, label %"28", label %"19"<br><br>"19": ; preds = %"18"<br> %205 = mul i64 %203, %85<br> %206 = add i64 %205, %not2<br> br label %"20"<br>
<br>"20": ; preds = %"26", %"19"<br> %207 = phi float [ %233, %"26" ], [ %200, %"19" ]<br> %208 = phi i1 [ %234, %"26" ], [ %201, %"19" ]<br>
%209 = phi i1 [ %235, %"26" ], [ %202, %"19" ]<br> %210 = phi i64 [ %236, %"26" ], [ 1, %"19" ]<br> %211 = icmp sgt i64 %210, %83<br> br i1 %211, label %"27", label %"21"<br>
<br>"21": ; preds = %"20"<br> %212 = icmp ne i1 %209, false<br> br i1 %212, label %"22", label %"24"<br><br>"22": ; preds = %"21"<br>
%213 = add i64 %210, %206<br> %214 = bitcast [0 x float]* %100 to float*<br> %215 = getelementptr float* %214, i64 %213<br> %216 = load float* %215, align 4<br> %217 = fcmp ogt float %216, %207<br> %218 = icmp ne i1 %217, false<br>
br i1 %218, label %"23", label %"26"<br><br>"23": ; preds = %"22"<br> %219 = add i64 %210, %206<br> %220 = bitcast [0 x float]* %100 to float*<br>
%221 = getelementptr float* %220, i64 %219<br> %222 = load float* %221, align 4<br> br label %"26"<br><br>"24": ; preds = %"21"<br> %223 = add i64 %210, %206<br>
%224 = bitcast [0 x float]* %100 to float*<br> %225 = getelementptr float* %224, i64 %223<br> %226 = load float* %225, align 4<br> %227 = fcmp oge float %226, %207<br> %228 = icmp ne i1 %227, false<br> br i1 %228, label %"25", label %"26"<br>
<br>"25": ; preds = %"24"<br> %229 = add i64 %210, %206<br> %230 = bitcast [0 x float]* %100 to float*<br> %231 = getelementptr float* %230, i64 %229<br>
%232 = load float* %231, align 4<br>
br label %"26"<br><br>"26": ; preds = %"25", %"24", %"23", %"22"<br> %233 = phi float [ %232, %"25" ], [ %207, %"24" ], [ %222, %"23" ], [ %207, %"22" ]<br>
%234 = phi i1 [ true, %"25" ], [ true, %"24" ], [ %208, %"23" ], [ %208, %"22" ]<br> %235 = phi i1 [ true, %"25" ], [ %209, %"24" ], [ %209, %"23" ], [ %209, %"22" ]<br>
%236 = add i64 %210, 1<br> br label %"20"<br><br>"27": ; preds = %"20"<br> %237 = add i64 %203, 1<br> br label %"18"<br><br>"28": ; preds = %"18"<br>
%238 = icmp ne i1 %202, false<br> br i1 %238, label %"33", label %"29"<br><br>"29": ; preds = %"28"<br> %239 = icmp ne i1 %201, false<br>
br i1 %239, label %"30", label %"31"<br><br>"30": ; preds = %"29"<br> br label %"32"<br><br>"31": ; preds = %"29"<br>
br label %"32"<br><br>"32": ; preds = %"31", %"30"<br> %240 = phi float [ 0xC7EFFFFFE0000000, %"31" ], [ 0x7FF8000000000000, %"30" ]<br>
br label %"33"<br><br>"33": ; preds = %"32", %"28"<br> %241 = phi float [ %240, %"32" ], [ %200, %"28" ]<br> store float %241, float* %D.1616, align 4<br>
call void bitcast (void (%struct.__st_parameter_dt*, i8*, i32)* @_gfortran_transfer_real_write to void (%struct.__st_parameter_dt*, float*, i32)*)(%struct.__st_parameter_dt* %dt_parm.15, float* %D.1616, i32 4) nounwind<br>
br label %"34"<br><br>"34": ; preds = %"43", %"33"<br> %242 = phi float [ %249, %"43" ], [ 0x7FF0000000000000, %"33" ]<br>
%243 = phi i1 [ %250, %"43" ], [ false, %"33" ]<br> %244 = phi i1 [ %251, %"43" ], [ false, %"33" ]<br> %245 = phi i64 [ %279, %"43" ], [ 1, %"33" ]<br> %246 = icmp sgt i64 %245, %89<br>
br i1 %246, label %"44", label %"35"<br><br>"35": ; preds = %"34"<br> %247 = mul i64 %245, %85<br> %248 = add i64 %247, %not2<br> br label %"36"<br>
<br>"36": ; preds = %"42", %"35"<br> %249 = phi float [ %275, %"42" ], [ %242, %"35" ]<br> %250 = phi i1 [ %276, %"42" ], [ %243, %"35" ]<br>
%251 = phi i1 [ %277, %"42" ], [ %244, %"35" ]<br> %252 = phi i64 [ %278, %"42" ], [ 1, %"35" ]<br> %253 = icmp sgt i64 %252, %83<br> br i1 %253, label %"43", label %"37"<br>
<br>"37": ; preds = %"36"<br> %254 = icmp ne i1 %251, false<br> br i1 %254, label %"38", label %"40"<br><br>"38": ; preds = %"37"<br>
%255 = add i64 %252, %248<br> %256 = bitcast [0 x float]* %100 to float*<br> %257 = getelementptr float* %256, i64 %255<br> %258 = load float* %257, align 4<br> %259 = fcmp olt float %258, %249<br> %260 = icmp ne i1 %259, false<br>
br i1 %260, label %"39", label %"42"<br><br>"39": ; preds = %"38"<br> %261 = add i64 %252, %248<br> %262 = bitcast [0 x float]* %100 to float*<br>
%263 = getelementptr float* %262, i64 %261<br> %264 = load float* %263, align 4<br> br label %"42"<br><br>"40": ; preds = %"37"<br> %265 = add i64 %252, %248<br>
%266 = bitcast [0 x float]* %100 to float*<br> %267 = getelementptr float* %266, i64 %265<br> %268 = load float* %267, align 4<br> %269 = fcmp ole float %268, %249<br> %270 = icmp ne i1 %269, false<br> br i1 %270, label %"41", label %"42"<br>
<br>"41": ; preds = %"40"<br> %271 = add i64 %252, %248<br> %272 = bitcast [0 x float]* %100 to float*<br> %273 = getelementptr float* %272, i64 %271<br>
%274 = load float* %273, align 4<br>
br label %"42"<br><br>"42": ; preds = %"41", %"40", %"39", %"38"<br> %275 = phi float [ %274, %"41" ], [ %249, %"40" ], [ %264, %"39" ], [ %249, %"38" ]<br>
%276 = phi i1 [ true, %"41" ], [ true, %"40" ], [ %250, %"39" ], [ %250, %"38" ]<br> %277 = phi i1 [ true, %"41" ], [ %251, %"40" ], [ %251, %"39" ], [ %251, %"38" ]<br>
%278 = add i64 %252, 1<br> br label %"36"<br><br>"43": ; preds = %"36"<br> %279 = add i64 %245, 1<br> br label %"34"<br><br>"44": ; preds = %"34"<br>
%280 = icmp ne i1 %244, false<br> br i1 %280, label %"49", label %"45"<br><br>"45": ; preds = %"44"<br> %281 = icmp ne i1 %243, false<br>
br i1 %281, label %"46", label %"47"<br><br>"46": ; preds = %"45"<br> br label %"48"<br><br>"47": ; preds = %"45"<br>
br label %"48"<br><br>"48": ; preds = %"47", %"46"<br> %282 = phi float [ 0x47EFFFFFE0000000, %"47" ], [ 0x7FF8000000000000, %"46" ]<br>
br label %"49"<br><br>"49": ; preds = %"48", %"44"<br> %283 = phi float [ %282, %"48" ], [ %242, %"44" ]<br> store float %283, float* %D.1628, align 4<br>
call void bitcast (void (%struct.__st_parameter_dt*, i8*, i32)* @_gfortran_transfer_real_write to void (%struct.__st_parameter_dt*, float*, i32)*)(%struct.__st_parameter_dt* %dt_parm.15, float* %D.1628, i32 4) nounwind<br>
call void @_gfortran_st_write_done(%struct.__st_parameter_dt* %dt_parm.15) nounwind<br> call void bitcast (void (...)* @_gfortran_flush_i4 to void (i8*)*)(i8* null) nounwind<br> %284 = bitcast [0 x float]* %100 to i8*<br>
%285 = icmp ne i8* %284, null<br> br i1 %285, label %"50", label %"51"<br><br>"50": ; preds = %"49"<br> call void @free(i8* %284) nounwind<br>
br label %"51"<br><br>"51": ; preds = %"50", %"49"<br> %286 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 2<br>
%287 = load [0 x float]** %286, align 8<br> %288 = bitcast [0 x float]* %287 to i8*<br> %289 = icmp ne i8* %288, null<br> br i1 %289, label %"52", label %"53"<br><br>"52": ; preds = %"51"<br>
call void @free(i8* %288) nounwind<br> br label %"53"<br><br>"53": ; preds = %"52", %"51"<br> %290 = getelementptr inbounds %struct.FRAME.matmul* %FRAME.40, i32 0, i32 8<br>
%291 = load [0 x float]** %290, align 8<br> %292 = bitcast [0 x float]* %291 to i8*<br> %293 = icmp ne i8* %292, null<br> br i1 %293, label %"54", label %"55"<br><br>"54": ; preds = %"53"<br>
call void @free(i8* %292) nounwind<br> br label %"55"<br><br>"55": ; preds = %"54", %"53"<br> br label %return<br><br>return: ; preds = %"55"<br>
ret void<br>}<br><br>declare noalias i8* @malloc(i64) nounwind<br><br>declare void @_gfortran_cpu_time_4(...)<br><br>declare void @_gfortran_st_write(%struct.__st_parameter_dt*)<br><br>declare void @_gfortran_transfer_real_write(%struct.__st_parameter_dt*, i8*, i32)<br>
<br>declare void @_gfortran_st_write_done(%struct.__st_parameter_dt*)<br><br>declare void @_gfortran_flush_i4(...)<br><br>declare void @free(i8*) nounwind<br><br>
</blockquote></div><br>