mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-10-20 19:42:54 +02:00
9 lines
200 B
Ada
9 lines
200 B
Ada
-- RUN: %llvmgcc -S -O2 %s -I%p/Support -o - | grep 6899714
|
|
package body Element_Copy is
|
|
function F return VariableSizedField is
|
|
X : VariableSizedField;
|
|
begin
|
|
return X;
|
|
end;
|
|
end;
|