blob: a7a48d6a2c21ad80f3e0baf6d0c887530e996d42 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
generic
S : String;
package Nested_Generic2_G1 is
procedure Debug (Msg : String; Prefix : String);
generic
Prefix : String;
package Nested is
procedure Debug (Msg : String);
end Nested;
end Nested_Generic2_G1;
|