[Solved] Why FPC don't 'fold' str consts?

[AlexTP]

Code: Pascal  [Select][+][-]

1. {$mode objfpc}{$h+}
2. const
3.   cc0 = 'value0';
4.   cc1 = 'value1';
5. var
6.   s: string;
7. begin
8.   s:= 'text_';
9.   s:= s+ '_prefix_'+cc0+cc1;
10.   writeln(s);
11. end.
12.  

I see that binary file has separate places for all 3 consts:
- '_prefix_'
- 'value0'
- 'value1'
While FPC can fold all 3 to a single one. If I use brackets,

Code: Pascal  [Select][+][-]

1. s+ ('_prefix_'+cc0+cc1);
2.  

I see the single place with all 3 concatenated.

Free Pascal Compiler version 3.2.3-660-g9b2ba834a6 [2022/08/18] for x86_64

[Kays]

Bug was described in issue #38267. Should be fixed in 3.3.1 now.

[AlexTP]

Thanks! Solved.

[PascalDragon]

Please note that this requires at least -O2 (just for the sake of completeness so that no one is surprised).