Lines Matching refs:unit
195 ExternalFileUnit &unit, const char *sourceFile, int sourceLine) in ExternalIoStatementBase() argument
196 : IoStatementBase{sourceFile, sourceLine}, unit_{unit} {} in ExternalIoStatementBase()
210 asynchronousID_ = unit().GetAsynchronousId(*this); in SetAsynchronous()
238 unit().OpenUnit(status_, action_, position_.value_or(Position::AsIs), in CompleteOperation()
241 unit().OpenAnonymousUnit( in CompleteOperation()
245 if (*access_ != unit().access) { in CompleteOperation()
252 unit().access = *access_; in CompleteOperation()
255 if (!unit().isUnformatted) { in CompleteOperation()
256 unit().isUnformatted = isUnformatted_; in CompleteOperation()
258 if (isUnformatted_ && *isUnformatted_ != *unit().isUnformatted) { in CompleteOperation()
262 unit().isUnformatted = *isUnformatted_; in CompleteOperation()
264 if (!unit().isUnformatted) { in CompleteOperation()
266 unit().isUnformatted = unit().access != Access::Sequential; in CompleteOperation()
270 unit().CloseUnit(CloseStatus::Delete, *this); in CompleteOperation()
271 unit().DestroyClosed(); in CompleteOperation()
284 unit().CloseUnit(status_, *this); in EndIoStatement()
285 unit().DestroyClosed(); in EndIoStatement()
303 ExternalFileUnit &unit, const char *sourceFile, int sourceLine) in ExternalIoStatementState() argument
304 : ExternalIoStatementBase{unit, sourceFile, sourceLine}, mutableModes_{ in ExternalIoStatementState()
305 unit.modes} {
311 unit.furthestPositionInRecord =
312 std::max(unit.furthestPositionInRecord, unit.positionInRecord);
324 unit().leftTabLimit = unit().furthestPositionInRecord; in CompleteOperation()
331 std::int64_t n{unit().positionInRecord - unit().furthestPositionInRecord}; in CompleteOperation()
332 while (n-- > 0 && unit().Emit(" ", 1, 1, *this)) { in CompleteOperation()
334 unit().leftTabLimit = unit().positionInRecord; in CompleteOperation()
336 unit().AdvanceRecord(*this); in CompleteOperation()
338 unit().FlushIfTerminal(*this); in CompleteOperation()
354 return unit().Emit(data, bytes, elementBytes, *this); in Emit()
362 return unit().Emit(data, bytes, 0, *this); in Emit()
372 return unit().Emit(reinterpret_cast<const char *>(data), chars * sizeof *data, in Emit()
383 return unit().Emit(reinterpret_cast<const char *>(data), chars * sizeof *data, in Emit()
389 return unit().GetNextInputBytes(p, *this); in GetNextInputBytes()
395 if (!unit().AdvanceRecord(*this)) { in AdvanceRecord()
403 unit().BackspaceRecord(*this); in BackspaceRecord()
408 return unit().HandleAbsolutePosition(n); in HandleAbsolutePosition()
413 return unit().HandleRelativePosition(n); in HandleRelativePosition()
419 return unit().BeginReadingRecord(*this); in BeginReadingRecord()
430 unit().FinishReadingRecord(*this); in FinishReadingRecord()
439 ExternalFileUnit &unit, const CHAR *format, std::size_t formatLength, in ExternalFormattedIoStatementState() argument
441 : ExternalIoStatementState<DIR>{unit, sourceFile, sourceLine}, in ExternalFormattedIoStatementState()
891 return this->unit().Receive(data, bytes, elementBytes, *this); in Receive()
1021 ExternalFileUnit &ext{unit()}; in CompleteOperation()
1048 ExternalFileUnit &unit, const char *sourceFile, int sourceLine) in InquireUnitState() argument
1049 : ExternalIoStatementBase{unit, sourceFile, sourceLine} {} in InquireUnitState()
1053 if (unit().createdForInternalChildIo()) { in Inquire()
1062 if (!unit().IsConnected()) { in Inquire()
1065 switch (unit().access) { in Inquire()
1079 str = !unit().IsConnected() ? "UNDEFINED" in Inquire()
1080 : unit().mayWrite() ? unit().mayRead() ? "READWRITE" : "WRITE" in Inquire()
1084 str = !unit().IsConnected() ? "UNDEFINED" in Inquire()
1085 : unit().mayAsynchronous() ? "YES" in Inquire()
1089 str = !unit().IsConnected() || unit().isUnformatted.value_or(true) in Inquire()
1091 : unit().modes.editingFlags & blankZero ? "ZERO" in Inquire()
1098 str = unit().swapEndianness() ? "SWAP" : "NATIVE"; in Inquire()
1101 str = !unit().IsConnected() || unit().isUnformatted.value_or(true) in Inquire()
1103 : unit().modes.editingFlags & decimalComma ? "COMMA" in Inquire()
1107 if (!unit().IsConnected() || unit().isUnformatted.value_or(true)) { in Inquire()
1110 switch (unit().modes.delim) { in Inquire()
1124 str = !unit().IsConnected() ? "UNKNOWN" in Inquire()
1125 : unit().access == Access::Direct || in Inquire()
1126 (unit().mayPosition() && unit().openRecl) in Inquire()
1131 str = !unit().IsConnected() ? "UNKNOWN" in Inquire()
1132 : unit().isUnformatted.value_or(true) ? "UNDEFINED" in Inquire()
1133 : unit().isUTF8 ? "UTF-8" in Inquire()
1137 str = !unit().IsConnected() || !unit().isUnformatted ? "UNDEFINED" in Inquire()
1138 : *unit().isUnformatted ? "UNFORMATTED" in Inquire()
1142 str = !unit().IsConnected() ? "UNDEFINED" in Inquire()
1143 : !unit().isUnformatted ? "UNKNOWN" in Inquire()
1144 : *unit().isUnformatted ? "NO" in Inquire()
1148 str = unit().path(); in Inquire()
1154 str = !unit().IsConnected() || unit().isUnformatted.value_or(true) in Inquire()
1156 : unit().modes.pad ? "YES" in Inquire()
1160 if (!unit().IsConnected() || unit().access == Access::Direct) { in Inquire()
1163 switch (unit().InquirePosition()) { in Inquire()
1177 str = !unit().IsConnected() ? "UNDEFINED" : unit().mayRead() ? "YES" : "NO"; in Inquire()
1180 str = !unit().IsConnected() ? "UNDEFINED" in Inquire()
1181 : unit().mayRead() && unit().mayWrite() ? "YES" in Inquire()
1185 if (!unit().IsConnected() || unit().isUnformatted.value_or(true)) { in Inquire()
1188 switch (unit().modes.round) { in Inquire()
1210 str = !unit().IsConnected() ? "UNKNOWN" in Inquire()
1211 : unit().access == Access::Sequential ? "YES" in Inquire()
1215 str = !unit().IsConnected() || unit().isUnformatted.value_or(true) in Inquire()
1217 : unit().modes.editingFlags & signPlus ? "PLUS" in Inquire()
1221 str = !unit().IsConnected() ? "UNKNOWN" in Inquire()
1222 : unit().access == Access::Stream ? "YES" in Inquire()
1226 str = !unit().IsConnected() || !unit().isUnformatted ? "UNKNOWN" in Inquire()
1227 : *unit().isUnformatted ? "YES" in Inquire()
1231 str = !unit().IsConnected() ? "UNKNOWN" : unit().mayWrite() ? "YES" : "NO"; in Inquire()
1249 result = unit().path() != nullptr; in Inquire()
1252 result = unit().IsConnected(); in Inquire()
1279 if (unit().access == Access::Direct) { in Inquire()
1280 result = unit().currentRecordNumber; in Inquire()
1284 result = unit().unitNumber(); in Inquire()
1287 result = unit().InquirePos(); in Inquire()
1290 if (!unit().IsConnected()) { in Inquire()
1292 } else if (unit().access == Access::Stream) { in Inquire()
1294 } else if (unit().openRecl) { in Inquire()
1295 result = *unit().openRecl; in Inquire()
1302 if (unit().IsConnected()) { in Inquire()
1303 if (auto size{unit().knownSize()}) { in Inquire()