[Lazarus] -FcUTF8,-dEnableUTF8 create problem

[FreeMan]

Sorry I been late.

var wProgram :string;

params:

-dUseCThreads

-FcUTF8

-dEnableUTF8

-al


result:
# [634] wFileStr.Read(ar, 4);
     leaq    -24(%rbp),%r14
     movq    -16(%rbp),%r13
     movl    $4,%r12d
     movq    -16(%rbp),%rbx
     testq    %rbx,%rbx
     jne    Lj2643
     movl    $210,%edi
     call    fpc_handleerror
Lj2643:
     movq    (%rbx),%rbx
     movq    %rbx,%rdi
     call    fpc_check_object
     movl    %r12d,%edx
     movq    %r13,%rdi
     movq    %r14,%rsi
     call    *256(%rbx)
Lj2634:
     call    FPC_POPADDRSTACK
# [637] wFileStr.Free

params:

-dUseCThreads

-al
results:# [634] wFileStr.Read(ar, 4);
     leaq    -24(%rbp),%r14
     movq    -16(%rbp),%r13
     movl    $4,%r12d
     movq    -16(%rbp),%rbx
     testq    %rbx,%rbx
     jne    Lj2515
     movl    $210,%edi
     call    fpc_handleerror
Lj2515:
     movq    (%rbx),%rbx
     movq    %rbx,%rdi
     call    fpc_check_object
     movl    %r12d,%edx
     movq    %r13,%rdi
     movq    %r14,%rsi
     call    *256(%rbx)
Lj2506:
     call    FPC_POPADDRSTACK
# [637] wFileStr.Free;


On 19.02.2015 13:59, luiz americo pereira camara wrote:
> I have two more tips to try to see where the problem is:
>
> What is the type of wProgram?
>
> Compile with the option -al (without debug info to get smaller files) 
> and look to the generated asm file (has .s extension and lives the 
> same dir the units are store)
>
> look at the generated code for
>
> wFileStr := TFileStream.Create(wProgram, fmOpenRead);
>
> and
>
> wFileStr.Read(ar, 4);
>
> BTW: the compiler are being recompiled with those options "-FcUTF8 , 
> -dEnableUTF8" or only LCL?
>
> Luiz
>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20150220/3a3ef4a7/attachment-0003.html>