Stream

Librerías

Ada.Streams.Stream_IO

Explicación

Devuelve la referencia del stream asociado al fichero.

Sintaxis

function Stream (File : in File_Type) return Stream_Access;

Ejemplo

with Ada.Streams;           use Ada.Streams;
with Ada.Streams.Stream_IO; use Ada.Streams.Stream_IO;
...
Fichero  : Ada.Streams.Stream_IO.File_Type; 
S1       : String := "Mi_Fichero.dat";
F_Stream : Stream_Access;
...
Open (Fichero, In_File, Name => S1); 
...
Stream := Stream (Fichero);

Véase