Lines Matching refs:code
54 int code, bool isErrorStop, bool quiet) { in RTNAME()
56 if (Fortran::runtime::executionEnvironment.noStopMessage && code == 0) { in RTNAME()
61 if (code != EXIT_SUCCESS) { in RTNAME()
62 std::fprintf(stderr, ": code %d\n", code); in RTNAME()
67 std::exit(code); in RTNAME()
71 const char *code, std::size_t length, bool isErrorStop, bool quiet) { in RTNAME()
75 std::fprintf(stderr, "%.*s\n", static_cast<int>(length), code); in RTNAME()
78 isErrorStop ? "ERROR STOP" : "STOP", static_cast<int>(length), code); in RTNAME()
113 void RTNAME(PauseStatementInt)(int code) { in RTNAME()
115 std::fprintf(stderr, "Fortran PAUSE %d: hit RETURN to continue:", code); in RTNAME()
120 void RTNAME(PauseStatementText)(const char *code, std::size_t length) { in RTNAME()
124 code); in RTNAME()