Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2015-10

First fatal error on el capitan

5 messages · 3 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

FreeMan

Hello,
svn fpc r31922 lazarus r49919 qtx64 osx 10.11(el capitan) xcode 7.0.1

Copyright (c) 1993-2015 by Florian Klaempfl and others /opt/lazarus/ide/advancedipc.pp(227,49) Error: (3284) Operator is not overloaded: "Int64" xor "TThreadID"
advancedipc.pp(688) Fatal: (10026) There were 1 errors compiling module, stopping
Fatal: (1018) Compilation aborted
make[2]: *** [lazarus] Error 1
make[1]: *** [ide] Error 2
make: *** [ide] Error 2

Reply by email

Ondrej Pokorny
to FreeMan
FreeMan wrote 12 lines
Hello, svn fpc r31922 lazarus r49919 qtx64 osx 10.11(el capitan) xcode 7.0.1 Copyright (c) 1993-2015 by Florian Klaempfl and others /opt/lazarus/ide/advancedipc.pp(227,49) Error: (3284) Operator is not overloaded: "Int64" xor "TThreadID" advancedipc.pp(688) Fatal: (10026) There were 1 errors compiling module, stopping Fatal: (1018) Compilation aborted make[2]: *** [lazarus] Error 1 make[1]: *** [ide] Error 2 make: *** [ide] Error 2

Please test the attached patch.

Ondrej
-------------- next part --------------
Index: ide/advancedipc.pp
===================================================================
--- ide/advancedipc.pp	(revision 49918)
+++ ide/advancedipc.pp	(working copy)
@@ -224,7 +224,7 @@
   repeat
     //if Randomize/Random is started from 2 processes at exactly same moment, it returns the same number! -> prevent duplicates by xor GetCurrentThreadId
     //the result must be of range 0..$7FFFFFFF (High(Integer))
-    Result := Integer((Int64(Random($7FFFFFFF)) xor GetCurrentThreadId) and $7FFFFFFF);
+    Result := Integer((PtrInt(Random($7FFFFFFF)) xor PtrInt(GetCurrentThreadId)) and $7FFFFFFF);
     outFileName := GetRequestFileName(Result);
   until not RequestExists(outFileName);
 end;
Index: ide/ideinstances.pas
===================================================================
--- ide/ideinstances.pas	(revision 49918)
+++ ide/ideinstances.pas	(working copy)
@@ -501,7 +501,7 @@
         {$IFNDEF MSWINDOWS}
         //this code is not slowing up IDE start because if there was highest client found (the normal way), we close anyway
         Randomize;  //random sleep in order to prevent double file locks on unix
-        Sleep(Random( PtrInt(($3F+GetCurrentThreadId) and $3F) ));
+        Sleep((PtrInt(Random($3F)) + PtrInt(GetCurrentThreadId)) and $3F);
         {$ENDIF}
         if not (xServer.StartServer(False) and (xServer.GetPendingRequestCount > 0)) then
           Exit;//server is already running or there are no pending message -> close

Reply by email

FreeMan
to Ondrej Pokorny

Thank you Ondrej,
This patch fixed this problem. Is this patch apply to Trunk? Thank you

Ondrej Pokorny wrote 24 lines
On 03.10.2015 13:39, FreeMan wrote: > Hello, > svn fpc r31922 lazarus r49919 qtx64 osx 10.11(el capitan) xcode 7.0.1 > > Copyright (c) 1993-2015 by Florian Klaempfl and others > /opt/lazarus/ide/advancedipc.pp(227,49) Error: (3284) Operator is not > overloaded: "Int64" xor "TThreadID" > advancedipc.pp(688) Fatal: (10026) There were 1 errors compiling > module, stopping > Fatal: (1018) Compilation aborted > make[2]: *** [lazarus] Error 1 > make[1]: *** [ide] Error 2 > make: *** [ide] Error 2 Please test the attached patch. Ondrej -- _______________________________________________ Lazarus mailing list http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20151003/bcfd5f61/attachment.html>

Reply by email

Mattias Gaertner
to Ondrej Pokorny: Please test the attached patch. Ondrej -------------- next part -------------- Index:…
Show quoted text 15 lines
On 03.10.2015 13:39, FreeMan wrote: > Hello, > svn fpc r31922 lazarus r49919 qtx64 osx 10.11(el capitan) xcode 7.0.1 > > Copyright (c) 1993-2015 by Florian Klaempfl and others > /opt/lazarus/ide/advancedipc.pp(227,49) Error: (3284) Operator is not > overloaded: "Int64" xor "TThreadID" > advancedipc.pp(688) Fatal: (10026) There were 1 errors compiling > module, stopping > Fatal: (1018) Compilation aborted > make[2]: *** [lazarus] Error 1 > make[1]: *** [ide] Error 2 > make: *** [ide] Error 2 Please test the attached patch.

Thanks. Applied.

Mattias

Reply by email