added some input procedures

This commit is contained in:
2014-01-01 14:07:03 +00:00
parent 3721e3c1a6
commit 30990c3aa8
6 changed files with 328 additions and 245 deletions

View File

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