[fpc-pascal]Compiler bug?

Jesus Reyes jesusrmx at yahoo.com.mx
Mon Jul 14 21:18:15 CEST 2003

Hi, the following code results in a error.

program compiler_bug_1;
{$mode objfpc}
  a,b: integer;
  c,d,e,f: boolean;

function Ok: boolean;
        result := ( a = b )
                and c = d
                and e = f;

        r: boolean;
        a := 1;
        b := 2;
        c := false;
        d := true;
        e := false;
        f := true;

        r := Ok;

here is the output

Free Pascal Compiler version 1.1 [2003/07/11] for i386
Copyright (c) 1993-2002 by Florian Klaempfl
Target OS: Linux for i386
Compiling tst.pas
tst.pas(15,2) Note: Local variable "r" is assigned but never used
tst.pas(11,7) Error: Asm: Duplicate label .L3
tst.pas(10,9) Error: Asm: Duplicate label .L4
tst.pas(25,1) Fatal: There were 2 errors compiling module, stopping


Jesus Reyes A.

Do You Yahoo!?
La mejor conexión a internet y 25MB extra a tu correo por $100 al mes. http://net.yahoo.com.mx

More information about the fpc-pascal mailing list