376d8f96d4
Original-commit: flang-compiler/f18@bae9199f62 Reviewed-on: https://github.com/flang-compiler/f18/pull/61 Tree-same-pre-rewrite: false
19 lines
353 B
C++
19 lines
353 B
C++
#include "char-set.h"
|
|
|
|
namespace Fortran {
|
|
namespace parser {
|
|
|
|
std::string SetOfChars::ToString() const {
|
|
std::string result;
|
|
std::uint64_t set{bits_};
|
|
for (char ch{' '}; set != 0; ++ch) {
|
|
if (IsCharInSet(set, ch)) {
|
|
set -= EncodeChar(ch);
|
|
result += ch;
|
|
}
|
|
}
|
|
return result;
|
|
}
|
|
|
|
} // namespace parser
|
|
} // namespace Fortran
|