repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
PR debug/66535
[official-gcc.git]
/
gcc
/
testsuite
/
gnat.dg
/
pack13_pkg.ads
blob
afe8bec8f793499f6d205c259ea7521352f22d99
1
generic
2
3
Size
:
Positive
;
4
5
package
Pack13_Pkg
is
6
7
type
Object
is private
;
8
9
private
10
11
type
Bit
is range
0
..
1
;
12
for
Bit
'size
use
1
;
13
14
type
Object
is array
(
1
..
Size
)
of
Bit
;
15
pragma
Pack
(
Object
);
16
17
end
Pack13_Pkg
;