eof

Имя

eof — Проверка условия конца файла на канале

Синопсис

eof channelId

Описание

Возвращает 1, если во время последней операции ввода на канале channelId (например, gets) возникло условие конца файла, в противном случае — 0.

ChannelId должен быть идентификатором открытого канала, например, стандартного канала Tcl (stdin, stdout или stderr), возвращаемого значением вызова open или socket, или результатом команды создания канала, предоставленной расширением Tcl.

Примеры

Чтение и вывод содержимого файла построчно:

set f [open somefile.txt]
while {1} {
    set line [gets $f]
    if {[eof $f]} {
        close $f
        break
    }
    puts "Read line: $line"
}

Чтение и вывод содержимого файла фиксированными записями:

set f [open somefile.dat]
fconfigure $f -translation binary
set recordSize 40
while {1} {
    set record [read $f $recordSize]
    if {[eof $f]} {
        close $f
        break
    }
    puts "Read record: $record"
}

См. также

file, open, close, fblocked, Tcl_StandardChannels

Licensed under Tcl/Tk terms
https://www.tcl.tk/man/tcl/TclCmd/eof.htm