"Source: Text/System/IO.text";
"Line: 1955";
"Date: Thu Sep 25 14:47:43 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/System/IO.text, line: 1955
// Example: H3E15 ()
print "Example: H3E15";
ei := GetEchoInput();
SetEchoInput(true);
// no-test
function LineCount(F)
    FP := Open(F, "r");
    count := 0;
    while true do
        line := Gets(FP);
        if IsEof(line) then
            break;
        end if;
        count +:= 1;
    end while;
    return count;
end function;
LineCount("/etc/passwd");
SetEchoInput(ei);
