{ The purpose of this request is to return a pointer to the
{ private read information for the current instance of open
{ of the file.

  FUNCTION [INLINE] bai$pri
    (    file_instance: ^bat$task_file_entry): ^bat$private_read_information;

    bai$pri := file_instance^.private_read_information;

  FUNCEND bai$pri;
