added experimental stream handling code

This commit is contained in:
2013-12-28 16:52:31 +00:00
parent de981a1706
commit 3721e3c1a6
10 changed files with 575 additions and 111 deletions

View File

@ -2,7 +2,7 @@ with System.Storage_Pools;
package H2 is
subtype Character is Standard.Wide_Character;
--subtype Character is Standard.Wide_Character;
type Storage_Pool_Pointer is
access all System.Storage_Pools.Root_Storage_Pool'Class;