TRTime name collision/variant record problem ? (Internal error 200104141)
Original Reporter info from Mantis: dtoman
-
Reporter name: Dalibor Toman
Original Reporter info from Mantis: dtoman
- Reporter name: Dalibor Toman
Description:
The problem was observed when I was trying to compile (a rather large) Deplhi7 project using actual stable latest Lazarus (2.4.0 FPC).
If I rename the TRTime (in example placed in 'steps to reproduce') for example to TA (and lines which use the type are changed too) the FPC is able to compile the sources. If I use Project1.TRTime when referencing the TRTime type the FPC is able to compile too.
So it looks like TRTime is some internal type name (unknown for me) but when I tried to us it (Type A = TRTime) it raised 'Identifier not found' error.
Steps to reproduce:
sample source:
--
program project1;
TYPE
TRTime = Record
rtDay : Integer;
end;
TTimeRange = Record
trFlags : Integer;
trTime : TRTime;
case trType : Integer of
0 : (trTime2 : TRTime);
1 : (trMinutes : Integer);
end;
begin
end.
--
line starting with 0: causes internal 'error 200104141' occurs:
c:\Source\test\0main>c:\lazarus\fpc\2.4.0\bin\i386-win32\fpc.exe project1.pas
Free Pascal Compiler version 2.4.0 [2010/01/26] for i386
Copyright (c) 1993-2009 by Florian Klaempfl
Target OS: Win32 for i386
Compiling project1.pas
project1.pas(14,23) Fatal: Internal error 200104141
Fatal: Compilation aborted
Error: c:\lazarus\fpc\2.4.0\bin\i386-win32\ppc386.exe returned an error exitcode
(normal if you did not specify a source file to be compiled)
Mantis conversion info:
- Mantis ID: 15592
- OS: WindowsXP
- OS Build: WindowsXP
- Platform: win32
- Version: 2.4.0
- Fixed in version: 2.6.0
- Fixed in revision: 14910 (#674cdaf3)