[lazarus] Making FCL with latest compiler

Jeffrey A. Wormsley daworm at cdc.net
Mon Sep 13 17:15:37 EDT 1999


I just built (45 minutes ago) the compiler with no apparent problems.  When
I use it to compile the FCL under Win32 I get the following:

[WINDOZE] E:\pp\source\fcl>make
e:/pp/bin/win32/make.exe -C win32 all
make.exe[1]: Entering directory `e:/pp/source/fcl/win32'
ppc386.exe -Twin32 -S2  -Fue:/pp/source/rtl/win32
-Fue:/pp/source/units/win32 -F
i../inc -Fi../i386 -FE.  -di386 classes.pp
Free Pascal Compiler version 0.99.13 [1999/09/13] for i386
Copyright (c) 1993-99 by Florian Klaempfl
Target OS: Win32 for i386
Compiling classes.pp
Compilation aborted util.inc:5
Run time error  216 at 0xBFF7B457
  0x0049733B
  0x00497BF2
  0x0049772F
  0x004973E8
  0x004928C9
  0x00442101
  0x0042ECB0
  0x0042F68D
  0x0044EFD4
make.exe[1]: *** [classes.ppw] Error 216
make.exe[1]: Leaving directory `e:/pp/source/fcl/win32'
make.exe: *** [all] Error 2

Anyone else have this problem?  Any solutions?  The part of util.inc file
that it is ending on is on the end; statement of the StrToInt function.
That function is simply:

Function IntToStr (I : Longint) : String

begin
  Str(I,Result);
end;

I tried rewriting it on a hunch as :

Function IntToStr (I : Longint) : String
Var S: String;
begin
  Str(I,S);
  Result := S;
end;

and as 

Function IntToStr (I : Longint) : String
Var S: String;
begin
  Str(I,S);
  IntToStr := S;
end;

to no effect.  It always errors out on the end; statement.

Jeff.






More information about the Lazarus mailing list