repo.or.cz
/
llvm
/
avr.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
fix PR4963: folding insertvalue would sometimes turn a packed struct into
[llvm/avr.git]
/
test
/
FrontendAda
/
debug_var_size.ads
blob
ea966fbae0fe878df4886374144ecc6572b368a5
1
-- RUN: %llvmgcc -c -g %s
2
package
Debug_Var_Size
is
3
subtype
Length_Type
is
Positive
range
1
..
64
;
4
type
T
(
Length
:
Length_Type
:=
1
)
is record
5
Varying_Length
:
String
(
1
..
Length
);
6
Fixed_Length
:
Boolean
;
7
end record
;
8
end
;