blob: afe44f160acf439d4362307dd9c027fc6795e5d3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
{ Old file: tbs0143.pp }
{ cannot concat string and array of char in $X+ mode OK 0.99.7 (PFV) }
const
string1 : string = 'hello ';
string2 : array[1..5] of char = 'there';
var
s : string;
begin
s:=string1+string2;
writeln(string1+string2);
end.
|
