added Buffer_Record, Token_Record and related procedures
This commit is contained in:
		@ -21,7 +21,7 @@ procedure scheme is
 | 
			
		||||
	
 | 
			
		||||
 | 
			
		||||
	--File_Name: aliased S.Object_String := "test.adb";
 | 
			
		||||
	File_Name: aliased constant S.Object_String := "test.adb";
 | 
			
		||||
	File_Name: aliased constant S.Object_String := "test.scm";
 | 
			
		||||
	--File_Stream: Stream.File_Stream_Record (File_Name'Unchecked_Access);
 | 
			
		||||
	--File_Stream: Stream.File_Stream_Record := (Name => File_Name'Unchecked_Access);
 | 
			
		||||
	File_Stream: Stream.File_Stream_Record;
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user