mirror of
https://github.com/RPCSX/llvm.git
synced 2024-12-04 10:04:33 +00:00
411c285404
copied field by LLVM field if the record has a variable sized field in it. The problem is that the LLVM field will not completely cover the variable sized gcc field. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@65463 91177308-0d34-0410-b5e6-96231b3b80d8
9 lines
273 B
Ada
9 lines
273 B
Ada
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;
|