dragonegg/test/compilator/local/ada/var_size.adb

package body Var_Size is
   function A (X : T) return String is
   begin
      return X.A;
   end;
end;