Lines Matching +defs:n +defs:digits
42 static constexpr char terminator{'\n'};
204 all << '\n' << uses_.str();
213 all << "contains\n" << str;
215 all << "end\n";
351 uses_ << s->name() << '\n';
352 useExtraAttrs_ << "private::" << rename << '\n';
376 << (ref->owner().IsIntrinsicModules() ? " i " : " n ")
377 << ref->name().ToString() << '\n';
399 decls_ << ")\n";
439 decls_ << "contains\n" << str;
477 << "=>" << proc.name() << '\n';
501 typeBindings << '\n';
510 decls_ << '\n';
512 decls_ << "private::" << symbol.name() << '\n';
522 decls_ << '\n';
526 decls_ << "::/" << symbol.name() << "/\n";
559 decls_ << '\n';
561 decls_ << "sequence\n";
571 decls_ << '\n';
574 decls_ << "end type\n";
613 decls_ << '\n';
615 decls_ << "end structure\n";
667 os << "\n";
699 decls_ << ss.str().substr(1) << "::" << symbol.name() << '\n';
704 os << (isAbstract ? "abstract " : "") << "interface\n";
734 int n = 0;
736 if (n++ > 0) {
754 os << '\n';
769 decls_ << "import::" << import << "\n";
773 os << "end\n";
775 os << "end interface\n";
790 PutGenericName(decls_ << "interface ", symbol) << '\n';
793 decls_ << "procedure::" << specific.name() << '\n';
796 decls_ << "end interface\n";
798 PutGenericName(decls_ << "private::", symbol) << '\n';
819 uses_ << '\n';
823 PutGenericName(useExtraAttrs_ << "private::", symbol) << '\n';
833 useExtraAttrs_ << local.name() << '\n';
963 os << '\n';
989 os << ") " << symbol.name() << '\n';
993 << ") " << symbol.name() << '\n';
999 os << "pointer(" << symbol.name() << "," << pointee << ")\n";
1008 os << "intrinsic::" << symbol.name() << '\n';
1010 os << "private::" << symbol.name() << '\n';
1032 os << '\n';
1052 os << '\n';
1164 os << symbol.name() << ")\n";
1170 os << "!$omp threadprivate(" << symbol.name() << ")\n";
1224 llvm::dbgs() << "module unchanged, not writing\n";
1240 llvm::dbgs() << "module written\n";
1268 // return it as a string of hex digits.
1280 static const char *digits = "0123456789abcdef";
1283 result[--i] = digits[hash & 0xf];
1338 } else if (str.substr(j, 3) != " n ") {
1343 for (; j < limit && str.at(j) != '\n'; ++j) {
1345 if (j > start && j < limit && str.at(j) == '\n') {