Test that the size of a view converted object is determined by the target

type, not the source type.

llvm-svn: 35106
This commit is contained in:
Duncan Sands 2007-03-14 20:24:53 +00:00
parent e278f30a52
commit a413e0825f
1 changed files with 7 additions and 0 deletions

View File

@ -0,0 +1,7 @@
-- RUN: %llvmgcc -c %s -o /dev/null
procedure VCE is
S : String (1 .. 2);
B : Character := 'B';
begin
S := 'A' & B;
end;