diff options
Diffstat (limited to 'llvm/test/FrontendAda/Support/element_copy.ads')
| -rw-r--r-- | llvm/test/FrontendAda/Support/element_copy.ads | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/llvm/test/FrontendAda/Support/element_copy.ads b/llvm/test/FrontendAda/Support/element_copy.ads new file mode 100644 index 00000000000..52c6e49275e --- /dev/null +++ b/llvm/test/FrontendAda/Support/element_copy.ads @@ -0,0 +1,8 @@ +package Element_Copy is + type SmallInt is range 1 .. 4; + type SmallStr is array (SmallInt range <>) of Character; + type VariableSizedField (D : SmallInt := 2) is record + S : SmallStr (1 .. D) := "Hi"; + end record; + function F return VariableSizedField; +end; |
