[flang-commits] [flang] bd815a5 - [flang][runtime][CUDA] Fix build error (#94281)

[via flang-commits]

Author: Peter Klausler
Date: 2024-06-03T14:37:46-07:00
New Revision: bd815a54899d7fa83f6fb49d86c417e1e2e4d2ef

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

LOG: [flang][runtime][CUDA] Fix build error (#94281)

I broke the build, and now I'm fixing it.

Added: 
    

Modified: 
    flang/runtime/pseudo-unit.cpp

Removed: 
    


################################################################################
diff  --git a/flang/runtime/pseudo-unit.cpp b/flang/runtime/pseudo-unit.cpp
index 5a8696312d7ee..70e70eec6a77e 100644
--- a/flang/runtime/pseudo-unit.cpp
+++ b/flang/runtime/pseudo-unit.cpp
@@ -38,7 +38,7 @@ ExternalFileUnit *ExternalFileUnit::LookUpOrCreateAnonymous(int unit,
     Direction direction, Fortran::common::optional<bool>,
     IoErrorHandler &handler) {
   if (direction != Direction::Output) {
-    terminator.Crash("ExternalFileUnit only supports output IO");
+    handler.Crash("ExternalFileUnit only supports output IO");
   }
   return New<ExternalFileUnit>{handler}(unit).release();
 }