| Duncan Sands | 53910d9 | 2010-11-25 21:21:59 +0000 | [diff] [blame] | 1 | -- RUN: %llvmgcc -S %s -I%p/Support |
| Chris Lattner | e10988d | 2007-04-03 21:46:22 +0000 | [diff] [blame] | 2 | package body Non_LValue is |
| 3 | function A (Y : U) return String is | ||||
| 4 | begin | ||||
| 5 | return Y.X.B; | ||||
| 6 | end; | ||||
| 7 | end; | ||||