Subversion Repositories Kolibri OS

    BSD 2-Clause License

    BSD 2-Clause License

    Copyright (c) 2018, 2019, Anton Krotov

    Copyright (c) 2018-2019, Anton Krotov

    All rights reserved.

    All rights reserved.

*)

*)

        file := NIL

        file := NIL

    END

    END

END close;

END close;

PROCEDURE read* (file: FILE; VAR chunk: ARRAY OF BYTE; bytes: INTEGER): INTEGER;

PROCEDURE read* (file: FILE; VAR chunk: ARRAY OF CHAR; bytes: INTEGER): INTEGER;

VAR

VAR

    res: INTEGER;

    res: INTEGER;