| 12345678910111213141516171819202122 |
- { %FAIL }
- { Source provided for Free Pascal Bug Report 1858 }
- { Submitted by "Mattias Gaertner" on 2002-03-07 }
- { e-mail: [email protected] }
- { expanded for more testing... }
- { Should be tested on systems which detect reads of nil pointers }
- unit tw1858;
- interface
- const
- a : char = '#';
- b = a + 'panic';
- c : set of byte = [0,1,2,3];
- d = c + [4,5,6];
- implementation
- end.
|
