diff options
Diffstat (limited to 'flang-rt/lib/runtime/character.cpp')
-rw-r--r-- | flang-rt/lib/runtime/character.cpp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/flang-rt/lib/runtime/character.cpp b/flang-rt/lib/runtime/character.cpp index 0f9f419..c9ac557 100644 --- a/flang-rt/lib/runtime/character.cpp +++ b/flang-rt/lib/runtime/character.cpp @@ -428,7 +428,8 @@ static RT_API_ATTRS void GeneralCharFunc(Descriptor &result, result.GetDimension(j).SetBounds(1, ub[j]); } if (result.Allocate(kNoAsyncObject) != CFI_SUCCESS) { - terminator.Crash("SCAN/VERIFY: could not allocate storage for result"); + terminator.Crash( + "INDEX/SCAN/VERIFY: could not allocate storage for result"); } std::size_t stringElementChars{string.ElementBytes() >> shift<CHAR>}; std::size_t argElementChars{arg.ElementBytes() >> shift<CHAR>}; |