make the asmparser reject function and type redefinitions. 'Merging' hasn't been

[llvm/stm8.git] / test / FrontendAda / element_copy.adb

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