diff --git a/flang/runtime/character.h b/flang/runtime/character.h --- a/flang/runtime/character.h +++ b/flang/runtime/character.h @@ -105,18 +105,6 @@ const char *sourceFile = nullptr, int sourceLine = 0); void RTNAME(CharacterMin)(Descriptor &accumulator, const Descriptor &x, const char *sourceFile = nullptr, int sourceLine = 0); -void RTNAME(CharacterMaxVal)(Descriptor &result, const Descriptor &x, - int dim = 0, const Descriptor *mask = nullptr, - const char *sourceFile = nullptr, int sourceLine = 0); -void RTNAME(CharacterMinVal)(Descriptor &result, const Descriptor &x, - int dim = 0, const Descriptor *mask = nullptr, - const char *sourceFile = nullptr, int sourceLine = 0); -void RTNAME(CharacterMaxLoc)(Descriptor &result, const Descriptor &x, - int dim = 0, const Descriptor *mask = nullptr, int kind = sizeof(int), - bool back = false, const char *sourceFile = nullptr, int sourceLine = 0); -void RTNAME(CharacterMinLoc)(Descriptor &result, const Descriptor &x, - int dim = 0, const Descriptor *mask = nullptr, int kind = sizeof(int), - bool back = false, const char *sourceFile = nullptr, int sourceLine = 0); std::size_t RTNAME(Index1)(const char *, std::size_t, const char *substring, std::size_t, bool back = false); diff --git a/flang/runtime/character.cpp b/flang/runtime/character.cpp --- a/flang/runtime/character.cpp +++ b/flang/runtime/character.cpp @@ -1024,8 +1024,5 @@ const char *sourceFile, int sourceLine) { MaxMin(accumulator, x, sourceFile, sourceLine); } - -// TODO: Character MAXVAL/MINVAL -// TODO: Character MAXLOC/MINLOC } } // namespace Fortran::runtime