| Duncan Sands | 2b5243d | 2010-11-25 21:21:59 +0000 | [diff] [blame] | 1 | -- RUN: %llvmgcc -S %s -I%p/Support |
| Duncan Sands | 338b462 | 2008-01-03 11:53:52 +0000 | [diff] [blame] | 2 | package body Var_Offset is |
| 3 | function F (X : T) return Character is | ||||
| 4 | begin | ||||
| 5 | return X.Bad_Field; | ||||
| 6 | end; | ||||
| 7 | end; | ||||