Sign in
gnu
/
gcc
/
93ac832f1846e4867aa6537f76f510fab8e3e87d
/
.
/
gcc
/
testsuite
/
gnat.dg
/
namet.ads
blob: 01e4002fbcf1f6ca6559012ec116c68722b23326 [
file
] [
log
] [
blame
]
package
Namet
is
Hash_Num
:
constant
Integer
:=
2
**
12
;
subtype
Hash_Index_Type
is
Integer
range
0
..
Hash_Num
-
1
;
Name_Buffer
:
String
(
1
..
16
*
1024
);
Name_Len
:
Natural
;
end
Namet
;