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;
|