<table border="1" cellspacing="0" cellpadding="8">
    <tr>
        <th>Issue</th>
        <td>
            <a href=https://github.com/llvm/llvm-project/issues/126966>126966</a>
        </td>
    </tr>

    <tr>
        <th>Summary</th>
        <td>
            [flang] [OpenMP] compilation failure for a computed GOTO with OpenMP SIMD loop (Assertion `isa<To>(Val) && "cast<Ty>() argument of incompatible type!"' failed)
        </td>
    </tr>

    <tr>
      <th>Labels</th>
      <td>
            flang
      </td>
    </tr>

    <tr>
      <th>Assignees</th>
      <td>
      </td>
    </tr>

    <tr>
      <th>Reporter</th>
      <td>
          nsdhaman
      </td>
    </tr>
</table>

<pre>
    Fortran code having a computed `GOTO` statement with `!$OMP SIMD` loop(s) in one or more of the paths fails to compile. 

Reproducer code `test.F`:

```
 PROGRAM MAIN

      INTEGER N,S,E,I
      N=1
      S=1
 E=128

#ifdef ADDGOTOS
      GOTO(100,200,300) N
      GOTO 400
#endif

 100  CONTINUE
!$OMP SIMD
      DO I=S,E
      ENDDO
 GOTO 500

 200  CONTINUE
      GOTO 500
 300  CONTINUE
      GOTO 500
 400  CONTINUE
      GOTO 500
 500  CONTINUE
      RETURN

 END
```

The following compilation fails
`flang -O2 -fopenmp -cpp -DADDGOTOS test.F -o ./a.out  # fails`
with the following error

```
flang: Casting.h:578: decltype(auto) llvm::cast(From*) [with To = llvm::BranchInst; From = llvm::Instruction]: Assertion `isa<To>(Val) && "cast<Ty>() argument of incompatible type!"' failed.
Stack dump:
0. Program arguments: /llvm/Linux_x86_64/llvm-4386/bin/flang -fc1 -triple x86_64-unknown-linux-gnu -emit-obj -cpp -D ADDGOTOS -fcolor-diagnostics -mrelocation-model pic -pic-level 2 -pic-is-pie -target-cpu x86-64 -fopenmp -resource-dir /llvm/Linux_x86_64/llvm-4386/lib/clang/21 -mframe-pointer=none -O2 -o /tmp/test-078f2a.o -x f95-cpp-input test.F
 #0 0x000064e912ca030b llvm::sys::PrintStackTrace(llvm::raw_ostream&, int) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x457130b)
 #1 0x000064e912c9db24 SignalHandler(int, siginfo_t*, void*) Signals.cpp:0:0
 #2 0x00007de285e45320 (/lib/x86_64-linux-gnu/libc.so.6+0x45320)
 #3 0x00007de285e9eb1c __pthread_kill_implementation ./nptl/pthread_kill.c:44:76
 #4 0x00007de285e9eb1c __pthread_kill_internal ./nptl/pthread_kill.c:78:10
 #5 0x00007de285e9eb1c pthread_kill ./nptl/pthread_kill.c:89:10
 #6 0x00007de285e4526e raise ./signal/../sysdeps/posix/raise.c:27:6
 #7 0x00007de285e288ff abort ./stdlib/abort.c:81:7
 #8 0x00007de285e2881b _nl_load_domain ./intl/loadmsgcat.c:1177:9
 #9 0x00007de285e3b507 (/lib/x86_64-linux-gnu/libc.so.6+0x3b507)
#10 0x000064e914d0cfca allocatePrivateVars(llvm::IRBuilderBase&, mlir::LLVM::ModuleTranslation&, llvm::MutableArrayRef<mlir::BlockArgument>, llvm::MutableArrayRef<mlir::omp::PrivateClauseOp>, llvm::MutableArrayRef<mlir::Value>, llvm::SmallVectorImpl<llvm::Value*>&, llvm::IRBuilderBase::InsertPoint const&, llvm::DenseMap<mlir::Value, mlir::Value, llvm::DenseMapInfo<mlir::Value, void>, llvm::detail::DenseMapPair<mlir::Value, mlir::Value>>*) (.isra.0) OpenMPToLLVMIRTranslation.cpp:0:0
#11 0x000064e914d2c20c convertOmpSimd(mlir::Operation&, llvm::IRBuilderBase&, mlir::LLVM::ModuleTranslation&) OpenMPToLLVMIRTranslation.cpp:0:0
#12 0x000064e914d3379a convertHostOrTargetOperation(mlir::Operation*, llvm::IRBuilderBase&, mlir::LLVM::ModuleTranslation&) OpenMPToLLVMIRTranslation.cpp:0:0
#13 0x000064e914d351f6 (anonymous namespace)::OpenMPDialectLLVMIRTranslationInterface::convertOperation(mlir::Operation*, llvm::IRBuilderBase&, mlir::LLVM::ModuleTranslation&) const OpenMPToLLVMIRTranslation.cpp:0:0
#14 0x000064e916b1b60e mlir::LLVM::ModuleTranslation::convertOperation(mlir::Operation&, llvm::IRBuilderBase&, bool) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x83ec60e)
#15 0x000064e916b2fb2d mlir::LLVM::ModuleTranslation::convertBlockImpl(mlir::Block&, bool, llvm::IRBuilderBase&, bool) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x8400b2d)
#16 0x000064e916b30f1d mlir::LLVM::ModuleTranslation::convertOneFunction(mlir::LLVM::LLVMFuncOp) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x8401f1d)
#17 0x000064e916b31964 mlir::LLVM::ModuleTranslation::convertFunctions() (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x8402964)
#18 0x000064e916b33579 mlir::translateModuleToLLVMIR(mlir::Operation*, llvm::LLVMContext&, llvm::StringRef, bool) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x8404579)
#19 0x000064e912e1c6e5 Fortran::frontend::CodeGenAction::generateLLVMIR() (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x46ed6e5)
#20 0x000064e912e1ff00 Fortran::frontend::CodeGenAction::executeAction() (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x46f0f00)
#21 0x000064e912ce794d Fortran::frontend::FrontendAction::execute() (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x45b894d)
#22 0x000064e912cc68db Fortran::frontend::CompilerInstance::executeAction(Fortran::frontend::FrontendAction&) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x45978db)
#23 0x000064e912cf055e Fortran::frontend::executeCompilerInvocation(Fortran::frontend::CompilerInstance*) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x45c155e)
#24 0x000064e9125bee1d fc1_main(llvm::ArrayRef<char const*>, char const*) (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x3e8fe1d)
#25 0x000064e9125be7c9 main (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x3e8f7c9)
#26 0x00007de285e2a1ca __libc_start_call_main ./csu/../sysdeps/nptl/libc_start_call_main.h:74:3
#27 0x00007de285e2a28b call_init ./csu/../csu/libc-start.c:128:20
#28 0x00007de285e2a28b __libc_start_main ./csu/../csu/libc-start.c:347:5
#29 0x000064e9125bcc2e _start (/llvm/Linux_x86_64/llvm-4386/bin/flang+0x3e8dc2e)
flang-21: error: unable to execute command: Aborted
flang-21: error: flang frontend command failed due to signal (use -v to see invocation)
flang version 21.0.0git (https://github.com/llvm/llvm-project b0d782080529cf5d422847e1f91f29bd7c62f691)
```


Eliminating the `!$OMP SIMD` directive or the computed `GOTO` statements allows for a successful compilation. For example, compiling without `-DADDGOTOS` removes the computed `GOTO` and the reproducer compiles.
 
`flang -O2 -fopenmp -cpp test.F -o ./a.out  # builds successfully`

</pre>
<img width="1" height="1" alt="" src="http://email.email.llvm.org/o/eJzEWVtT47gS_jXiReWULN8feDAJmaVqIRSw85qS5XaiHVtySTID__6UZIdcYFgYztkzNaRsqy9ft7pbaokZIzYS4BwlFyhZnLHBbpU-l6beso7Js0rVz-dLpa1mEnNVA96yRyE3mGGuun6wUGOUkm-rhxVKCTaWWehAWvxT2K0bQTRENF5d3-L7q-uFo2mV6hHNDaIFFhIrCVhp3CkNWDXYbgH3zG4NbphoDbbKKxItzDAiJSLlHfRa1QMHPQJCKbFg7GzptEXlSOSex_-kxLd3q2935TW-Lq9uxmHs_13dPFx-u7zDN4jO7xGdXyI6v3oZvUHRInx5u9-9XboHmk9qaCSaGhpcLhbOB_cv9N4jNA8JQXRO_W_kfgt8c0SDY0JGQSBr0UzwQkIwnq9uHq5u_rr0w0de3AlYrPAVihYj9t3Hy5vFYuXevPhkFE9KTE9kHmAYiXD0jxTxP1Ikb1LcXT78dbfz_eXN4mSGECkftoAb1bbqp4uuccqZFUqOcTAyNC2TGxysKA4a1YPsehzwvsfBYud_PIYCDhSeIbpkMzVYjBGNJjFenY9Ne6QQtFb6deh4hSgq8ZwZK-RmtkVRmWS5-1QDb-1zD4jmbLDKTW3bPnYuBKOSM2MRzZdadYiWbgwlF17vg8IoWhyQXmgm-fZKGouiC-w4TgjckB64cwZKFk51aQxo7xyUEmEYiuYPCkWXiObfWeu10RTRFCNKPZJo_vA8jrtBpjeDT1LVYCGdr5kVVQt4NCdElCKaeY9BPUOkvLeM_8D10PVjgpEZvtVqo1n3Iss4XIguPWy6_FPI4Wn9lKfrNJ6-BnGUp4guKyERXU5T2fAQB1aLvgU8UgeD_CHVTxm0TkSwkQMOoBM2UNXfu9l-STcnQLVKB7VgG6mMFdzgoNPQKu6jJ-hUDS3uBcdBL3jQwiO0mI4vwgS9ABxYpjdgA94PDkOQxgfhpcGoQXMIaqE_Zl8rKkSX3EcOXdIQB12jWQdBr4S0oFG0kK7o-TBWTqbtevcLxgYkyxvKZgoHT7gpEmdvIGQ_2CmwXf4gGhFMngghJI2hCClnJCLVQcSYZzM-3GohrZ-9B824C9U9kWY_18pYDazz0TLHQtoxdvLPTiSiF-QpTrIwIhWixYQyPEZZ1BWN8b3YSNb-wWTdgkY090rn2IiNkI1aW58uc_yoRD1lzshhZrx34Uf836iATgqyGmieQJxElOzg-1mYQuollMYBPjNqlk6YI0r2iKNjgQVUIcfrdW-3Gli9_iHadi26vvVr3FieXJmRvW0RXR6SzTiKyjhGUZmlk_D4I8JdhEjWvivW159w54TkLbGHPO_KyotDWempQ2kKWDNhwAsxfiYQXc7827OpoTdOqjLiCdGlp_RiaYaicmd4diyV5nnTYFYpbUepth5ny38aUYXOzIk9f8UeVngt23WrWL2uVcfEOA1Cehvd585sOBtlhWHmwOymuDiWFlUJyT4XM55ljBkX5Ee5GNeEN5xh1voKBLdaPDIL35k2R8l3dXcxiLYGfcEMTOnXtUKPo3_--f16fLpW9dDCg2bSjMvhRLuXdD1YVrVQas2e76BB0Xwv56JV_Ec5VWhf_z_KqcZS7yuIM2DessHAqv-UkO-sHeAVx33H2vY7cKv0Vde3KJrvx0YOWnqmE0OPXbZbGUHbW1dXMVduBT1lWoA0cM36N3Adefzl02vWK9mot9l9jTo1rwbLRHss4pY53o8giC69wHKqwzNhNJv5beOqB3l9-6BcbFzdHUTESV10IRkehyTllHDnoEfQdtX196KrEc33ulc96Lej62tx-jnU9Bh1FGUF26H-Qxm70g9-oT5A-7YN5f_PhujEhiRs3C4sZ1LJ504NBkvWgen9Yly8IJfXtwvBWuD2lZIrtyI0jn7cWE6z-C_7wGfXpzwRH3oircIqJfBBlZ8y9AMBWynVfmVjk0fAUwL7kp8c20abita_YZsvz74GHtrmvx4h_5_bFxNS0XpvX3psX0Sa8HfsW0lYDpK_mr09v3tyJKv-i_jDJjzAn53gD4s0_g38O_Bm6pu-gI8WjmqHLz_BFyVZcYDPTnhggjfl2wdT3RHPlbTw9Ho5vLdayI1bp_87YRMnWbE3qzja70PIU0jwdHg06m-0Aybr8W2uavgGsuR7z29AOrvgxeIvNSQp1CkkLwApOQHYNIR8EiA8AR8slLuo_hq-hjSE7PGdNEyQFXH9Hr7l9PYGwK9CS6q8iPcpRekxNJ7mdfW-6_yhnb6SxjK5W71Ovfdx28Zl6PfNKbK8rvbmRMfmNCRJ4D1zJuB7qx6nA4b3jXjlhZed3W-awcMk2S9E9GiRpUkFENa44eHa9URHDcfBBp1vmd5tl8tp_3r87QsQI8gbOKjFNDmFmPEC-5btKyoyvq879KRrpSzkDK_XrmtbG8u0XXPWtuuXPpGb4XUPOzXIbzH5U7_M9fLRpPG0o2U0r7CnF1LYUyXjo5MceMljW0pdF0-n7RI9bXK9xCMb3oL_puQodv1uMgkuTvzPOQU8ivzKDNScTnHoPwfUdezTMWpU4kEyf6Co8JQ5mKuuYz4vcOn6fKh_xTseDe4Sacc4HUfievBix6MIZ8FgAAeP_hsAFgeZ-YIOP4I2QklMwxmZkY3wpm-t7f05GV0iutwIux2qGVfd3iXeB71WfwO3uCJ1llOSk4QWvEnqmNI8ziBsirChRVVnPKVNWoRTXB4fbyNSXraiE5JZITf-8PnNy5FaaOBWPPo7EUf17i2L8ecMPw1ulMYMm4FzMKYZ2sMD9JmraxieWNe3vuccxxyMn8Ju1WCd7P0RutOgoVOPYH6JwM2HG9OHdzG-1JmZP2d597j-l2f0ldvamgM72ufRg2f1eVQXUcHO4DzMoiIqaBplZ9vzOKzzhtVJTGgYxVlUJ1UR1zGhNE95nBVn4pwSmhAaUkqiLMxmDYubJq7SLGzSkEUNigl0TLQzN9kzpTdnwpgBzkOaFml61rIKWuOvxyidMoCiZHGmz310VMPGoJi0wlizF2GFbf2d2siRLDBKLsbuyb2cXm8MGqYpfHG2v1PxFwYjm48Qf3fmQvffvABAtDgbdHv-uXRBdOn96Err5MrHc_qfAAAA___wnINp">