1 -- RUN: %llvmgcc -S %s -I%p/Support 2 package body Var_Size is 3 function A (X : T) return String is 4 begin 5 return X.A; 6 end; 7 end; 8
