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

klausler · web-flow · commit bd815a54899d · 2024-06-03T14:37:46.000-07:00
I broke the build, and now I'm fixing it.
diff --git 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();
 }

Original file line number	Diff line number	Diff line change
`@@ -38,7 +38,7 @@ ExternalFileUnit *ExternalFileUnit::LookUpOrCreateAnonymous(int unit,`
`38`	`38`	`Direction direction, Fortran::common::optional<bool>,`
`39`	`39`	`IoErrorHandler &handler) {`
`40`	`40`	`if (direction != Direction::Output) {`
`41`		`- terminator.Crash("ExternalFileUnit only supports output IO");`
	`41`	`+ handler.Crash("ExternalFileUnit only supports output IO");`
`42`	`42`	`}`
`43`	`43`	`return New<ExternalFileUnit>{handler}(unit).release();`
`44`	`44`	`}`