[flang-commits] [flang] 1293b5f - [flang] turn fatal error into a TODO for FORALL edge-case

[Jean Perier via flang-commits]

Author: Jean Perier
Date: 2022-12-07T09:47:33+01:00
New Revision: 1293b5fe5aa31015f1928e60b399b70f034eccff

URL: https://github.com/llvm/llvm-project/commit/1293b5fe5aa31015f1928e60b399b70f034eccff
DIFF: https://github.com/llvm/llvm-project/commit/1293b5fe5aa31015f1928e60b399b70f034eccff.diff

LOG: [flang] turn fatal error into a TODO for FORALL edge-case

See https://github.com/llvm/llvm-project/issues/59337.
This TODO will be implemented as part of HLFIR work
(see https://github.com/llvm/llvm-project/blob/main/flang/docs/HighLevelFIR.md).

Differential Revision: https://reviews.llvm.org/D139410

Added: 
    

Modified: 
    flang/lib/Lower/ConvertExpr.cpp

Removed: 
    


################################################################################
diff  --git a/flang/lib/Lower/ConvertExpr.cpp b/flang/lib/Lower/ConvertExpr.cpp
index 25696c8f392b5..6883bcd68a6ed 100644
--- a/flang/lib/Lower/ConvertExpr.cpp
+++ b/flang/lib/Lower/ConvertExpr.cpp
@@ -5833,7 +5833,7 @@ class ArrayExprLowering {
 
   CC genarr(const Fortran::evaluate::StaticDataObject::Pointer &,
             ComponentPath &components) {
-    fir::emitFatalError(getLoc(), "substring of static array object");
+    TODO(getLoc(), "substring of static object inside FORALL");
   }
 
   /// Substrings (see 9.4.1)