Duncan Sands | 411c285 | 2009-02-25 18:10:49 +0000 | [diff] [blame^] | 1 | -- RUN: %llvmgcc -S -O2 %s -I%p/Support -o - | grep 105 | count 2 |
2 | package body Element_Copy is | ||||
3 | function F return VariableSizedField is | ||||
4 | X : VariableSizedField; | ||||
5 | begin | ||||
6 | return X; | ||||
7 | end; | ||||
8 | end; |