--- ai05s/ai05-0190-1.txt 2012/01/26 07:43:09 1.21 +++ ai05s/ai05-0190-1.txt 2012/03/27 01:55:20 1.22 @@ -419,9 +419,11 @@ !ASIS -This needs an enumeration literal to be added to the type pragma_kinds for the -new pragma. +Add the following values to the type Pramga_Kinds: + A_Default_Storage_Pool_Pragma +** TBD: add A_Default_Storage_Pool aspect somewhere, for use in some not-yet-defined +query. !appendix