projects
/
oota-llvm.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Add "feature" testcase for new switch lowering code
[oota-llvm.git]
/
test
/
AdaFrontend
/
non_lvalue.ads
1
package Non_LValue is
2
type T (Length : Natural) is record
3
A : String (1 .. Length);
4
B : String (1 .. Length);
5
end record;
6
type T_Ptr is access all T;
7
type U is record
8
X : T_Ptr;
9
end record;
10
function A (Y : U) return String;
11
end;