| Duncan Sands | 1747440 | 2007-07-23 13:41:53 +0000 | [diff] [blame] | 1 | -- RUN: %llvmgcc -c %s -I%p/Support |
| 2 | -- RUN: %llvmgcc -c %s -I%p/Support -O2 | ||||
| Chris Lattner | 412c70e | 2007-04-03 21:46:22 +0000 | [diff] [blame] | 3 | package body Fat_Fields is |
| 4 | procedure Proc is | ||||
| 5 | begin | ||||
| 6 | if P = null then | ||||
| 7 | null; | ||||
| 8 | end if; | ||||
| 9 | end; | ||||
| 10 | end; | ||||