mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-10-22 04:22:57 +02:00
9 lines
206 B
Ada
9 lines
206 B
Ada
-- RUN: %llvmgcc -S -O2 %s -I%p/Support -o - | grep 105 | count 2
|
|
package body Element_Copy is
|
|
function F return VariableSizedField is
|
|
X : VariableSizedField;
|
|
begin
|
|
return X;
|
|
end;
|
|
end;
|