Lines Matching refs:Current_In

139       if File_Type (File) = Current_In then
140          Current_In := null;
242       return Current_In;
247       return Current_In.Self'Access;
330       return End_Of_File (Current_In);
364       return End_Of_Line (Current_In);
414       return End_Of_Page (Current_In);
467       Get (Current_In, Item);
482       Get (Current_In, Item);
570       Get_Immediate (Current_In, Item);
611       Get_Immediate (Current_In, Item, Available);
707       Get_Line (Current_In, Item, Last);
759       return Get_Line (Current_In);
1044       Look_Ahead (Current_In, Item, End_Of_Line);
1394       if (File = Current_In or else
1513       Current_In := File;
1739       Skip_Line (Current_In, Spacing);
1800       Skip_Page (Current_In);