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
/
parent_ltd_with.ads
blob
637aa7c3beb040680c2b0fa91382f751a74e9aa5
1
limited with
Parent_Ltd_With
.
Child_Full_View
;
2
3
package
Parent_Ltd_With
is
4
5
type
Symbol
is abstract tagged limited private
;
6
7
type
Symbol_Access
is access all
Symbol
'Class
;
8
9
private
10
11
type
Symbol
is abstract tagged limited record
12
Comp
:
Integer
;
13
end record
;
14
15
end
Parent_Ltd_With
;