procline() problem from in hb3.2 r2017-09-18 17:15

[Miroslav Georgiev]

Hi friends.

Between  r2017-08-25 09:57 and r2017-09-18 17:15

code:

 BEGIN SEQUENCE with { |objErr| objErr:cargo := "Called from " + Procname(  0 ) + "(" + hb_NtoS( ProcLine(  0 ) ) + ") in " + ProcFile(  0 ) ,;
                                Break( objErr ) }
 w++

 RECOVER USING oError
 END SEQUENCE

 ?oError:cargo
 wait

Output from version r2017-08-25 09:57: Called from (b)MAIN(179) in hzemq.prg

Output from version r2017-09-18 17:15: Called from (b)MAIN(179) in  

[vszakats]

Hi Miroslav,

Thanks, fixed in:

https://github.com/harbour/core/commit/29c1b00f55000a2442ee24c330ced6be55a334a0

I accidentally merged a flag with 3.4. In 3.4 the source

filenames are only included in the compiled objects in

debug mode (-b), considering that source filenames may

reveal private  information.

-Viktor

[Miroslav Georgiev]

Thanks, indeed an interesting feature ;)