Home
last modified time | relevance | path

Searched refs:oneBasedRec (Results 1 – 1 of 1) sorted by relevance

/llvm-project-15.0.7/flang/runtime/
H A Dunit.cpp679 std::int64_t oneBasedRec, IoErrorHandler &handler) { in SetDirectRec() argument
688 if (oneBasedRec < 1) { in SetDirectRec()
690 "REC=%zd is invalid", static_cast<std::intmax_t>(oneBasedRec)); in SetDirectRec()
693 currentRecordNumber = oneBasedRec; in SetDirectRec()
694 SetPosition((oneBasedRec - 1) * *openRecl, handler); in SetDirectRec()