Abstract API of the streams interpreted as sequence of characters.
function Error_Message
(Self : Input_Text_Stream) return VSS.Strings.Virtual_String
Return error message when Has_Error returns True, or 'null' string.
function Error_Message
(Self : Output_Text_Stream) return VSS.Strings.Virtual_String
Return error message when Has_Error returns True, or 'null' string.
procedure Get
(Self : in out Input_Text_Stream;
Item : out VSS.Characters.Virtual_Character'Base;
Success : in out Boolean)
Get character from the input stream.
Text stream itself
Buffer to store character. It should be set to invalid value in case of stream error or unavailable data
Subprogram do nothing when False, and set it to False on failure.
function Has_Error (Self : Input_Text_Stream) return Boolean
Return True when any error is detected.
function Has_Error (Self : Output_Text_Stream) return Boolean
Return True when any error is detected.
type Input_Text_Stream is limited interface;
type Input_Text_Stream_Access is access all Input_Text_Stream'Class;
function Is_End_Of_Data
(Self : Input_Text_Stream) return Boolean
Return True when there is no more data is available now.
function Is_End_Of_Stream
(Self : Input_Text_Stream) return Boolean
Return True when when end of stream is reached.
procedure New_Line
(Self : in out Output_Text_Stream;
Success : in out Boolean)
Output line terminator sequence to the text stream.
Text stream itself
Subprogram do nothing when False, and set it to False on failure.
type Output_Text_Stream is limited interface;
type Output_Text_Stream_Access is access all Output_Text_Stream'Class;
procedure Put
(Self : in out Output_Text_Stream;
Item : VSS.Characters.Virtual_Character;
Success : in out Boolean)
Output character to stream with conversion to the stream's text encoding.
Text stream itself
Character to output
Subprogram do nothing when False, and set it to False on failure.
procedure Put
(Self : in out Output_Text_Stream;
Item : VSS.Strings.Virtual_String;
Success : in out Boolean)
Output string to stream with conversion to the stream's text encoding.
Text stream itself
String to output
Subprogram do nothing when False, and set it to False on failure.
procedure Put_Line
(Self : in out Output_Text_Stream;
Item : VSS.Strings.Virtual_String;
Success : in out Boolean)
Output string to stream with conversion to the stream's text encoding and output line terminator sequence.
Text stream itself
String to output
Subprogram do nothing when False, and set it to False on failure.