Initial commit
This commit is contained in:
parent
c73b6c56c7
commit
36825506d6
|
|
@ -1,7 +1,7 @@
|
|||
package System.Storage_Elements
|
||||
with Pure is
|
||||
|
||||
type Storage_Offset is range
|
||||
type Storage_Offset is range
|
||||
-2 ** (Word_Size - 1) ..
|
||||
2 ** (Word_Size - 1) - 1;
|
||||
subtype Storage_Count is Storage_Offset range 0 .. Storage_Offset'Last;
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user