[Lazarus] Division by zero. with fpc r30855
FreeMan
freeman35 at delphiturkiye.com
Thu May 21 16:44:53 CEST 2015
for not fill pain, not pay & hate puzzle.
in terminal
gdb lazarus
run
lazarus IDE started, run or build project, if get error, you can see
which file is raised exception
On 21.05.2015 11:34, FreeMan wrote:
>
>> Do you have ppu files in your include files path?
>> Please test now.
>>
>>
>> Mattias
> I checked all lpk one by one, and all folders I couldn't find any ppu
> in include file path.
> All lpk's "unit output directory (-FU)" like this.
> ../../all_libs/ $(PkgName)/$(TargetCPU)-$(TargetOS)-$(LCLWidgetType)
>
> ERROR in IDE:
> Creating gdb catchable error:
>
> Program received signal SIGFPE, Arithmetic exception.
> 0x0000000100696b71 in RAISEEXCEPTION (MSG=0x0) at ideprocs.pp:2278
> 2278 if (length(Msg) div (length(Msg) div 10000))=0 then ;
> (gdb) bt
> #0 0x0000000100696b71 in RAISEEXCEPTION (MSG=0x0) at ideprocs.pp:2278
> #1 0x0000000100b51c08 in ADD (this=0x118653fa0, SRCFILE=0x1197f38c0,
> PPUFILE=0x0) at ../packager/interpkgconflictfiles.pas:182
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20150521/93980ed6/attachment-0003.html>
-------------- next part --------------
Index: /opt/lazarus/packager/interpkgconflictfiles.pas
===================================================================
--- /opt/lazarus/packager/interpkgconflictfiles.pas (revision 49126)
+++ /opt/lazarus/packager/interpkgconflictfiles.pas (working copy)
@@ -178,8 +178,10 @@
RaiseException('');
if (SrcFile<>nil) and (PPUFile<>nil) and (PPUFile.OwnerInfo<>SrcFile.OwnerInfo) then
RaiseException('');
- if (SrcFile<>nil) and FilenameIsCompiledSource(SrcFile.ShortFilename) then
+ if (SrcFile<>nil) and FilenameIsCompiledSource(SrcFile.ShortFilename) then begin
+ DebugLn('Check this file -->> ', SrcFile.FullFilename);
RaiseException('');
+ end;
if (PPUFile<>nil) and not FilenameIsCompiledSource(PPUFile.ShortFilename) then
RaiseException('');
Result:=length(CompiledFiles);
More information about the Lazarus
mailing list