Re: [fpc-pascal] FPC buildbot

[Joost van der Sluis]

Op 16-07-2020 om 08:37 schreef Darius Blaszyk via fpc-pascal:


I was looking for the sources of a buildbot suitable for an FPC project. I 
would like to keep it as simple as possible, so no webserver hassle for 
instance. Just simply repo sync, build, run test suite and upload to ftp. I 
know buildbot.net but I was hoping on finding something specifically suited for 
FPC. Does anything like that already exists? Any help would be appreciated.


Well, there are the buildagents used by the fppkg-repository. You can 
use them to build fppkg-packages. Try for yourself at: 
https://fppkg.cnoc.nl/build (Login with your mantis or forum-account)


The code of these buildagents is here, but it's not 'simple': 
svn.freepascal.org/FPC/svn/fpcprojects/fppkgreposerver/trunk/buildagent


Easiest way is to use an existing build-environment like Jenkins. But 
you can also use gitlab.


Look for example here: 
https://gitlab.freepascal.org/Joost/fpdserver/pipelines/293/builds


That one is automatically build after each commit. That's done with an 
easy CI-script, and a kubernetes-cluster with a container with fpc 
installed. (It's the same kubernetes-cluster as the fppkg-repository 
above uses)


There are so many options...

Regards,

Joost.

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

[fpc-pascal] FPC 3.2.1 gdeque Erase(0) hangs forever

[Alexey Tor. via fpc-pascal]

CudaText for linux x64. gdeque (fcl-stl) method Erase(0) (list has 
single item) hangs. I made workaround- replaced Erase(i) with Clear 
(erase all items).


deque items - not managed.

  PATAdapterCacheItem = ^TATAdapterCacheItem;
  TATAdapterCacheItem = packed record
    LineIndex, CharIndex, LineLen: integer;
    ColorAfterEol: TColor;
    Parts: TATLineParts;
  end;
  TATAdapterCacheItems = specialize TDeque;

turned optimization off. didn't help. Asm listing in debugger until 
hanged line-


atsynedit_adapter_cache.pas:181   FList.Erase(i);
0097AE96 486345e4 movslq -0x1c(%rbp),%rax
0097AE9A 488945d8 mov    %rax,-0x28(%rbp)
0097AE9E 488b45f0 mov    -0x10(%rbp),%rax
0097AEA2 488b4008 mov    0x8(%rax),%rax
0097AEA6 488945d0 mov    %rax,-0x30(%rbp)
0097AEAA 488b4010 mov    0x10(%rax),%rax
0097AEAE 483b45d8 cmp    -0x28(%rbp),%rax
0097AEB2 0f82f400 jb 0x97afac 


0097AEB8 488b55d8 mov    -0x28(%rbp),%rdx
0097AEBC 488b45d0 mov    -0x30(%rbp),%rax
0097AEC0 4c8b4010 mov    0x10(%rax),%r8
0097AEC4 4983e802 sub    $0x2,%r8
0097AEC8 4939d0   cmp    %rdx,%r8
0097AECB 0f82c700 jb 0x97af98 


0097AED1 488955c8 mov    %rdx,-0x38(%rbp)
0097AED5 4889d0   mov    %rdx,%rax
0097AED8 4883e801 sub    $0x1,%rax
0097AEDC 488945c8 mov    %rax,-0x38(%rbp)
0097AEE0 488b45c8 mov    -0x38(%rbp),%rax
0097AEE4 4883c001 add    $0x1,%rax
0097AEE8 488945c8 mov    %rax,-0x38(%rbp)
0097AEEC 4883c001 add    $0x1,%rax
0097AEF0 48898550d3   mov %rax,-0x2cb0(%rbp)
0097AEF7 488b45d0 mov    -0x30(%rbp),%rax
0097AEFB 488b7008 mov    0x8(%rax),%rsi
0097AEFF 488b45d0 mov    -0x30(%rbp),%rax
0097AF03 488b5020 mov    0x20(%rax),%rdx
0097AF07 488b8550d3   mov -0x2cb0(%rbp),%rax
0097AF0E 4801d0   add    %rdx,%rax
0097AF11 488b4dd0 mov    -0x30(%rbp),%rcx
0097AF15 31d2 xor    %edx,%edx
0097AF17 48f77118 divq   0x18(%rcx)
0097AF1B 4869c23616   imul   $0x1636,%rdx,%rax
0097AF22 488dbd58d3   lea -0x2ca8(%rbp),%rdi
0097AF29 4801c6   add    %rax,%rsi
0097AF2C b9c602   mov    $0x2c6,%ecx
0097AF31 f348a5   rep movsq %ds:(%rsi),%es:(%rdi)
0097AF34 a5   movsl %ds:(%rsi),%es:(%rdi)
0097AF35 66a5 movsw %ds:(%rsi),%es:(%rdi)
0097AF37 488dbd90e9   lea -0x1670(%rbp),%rdi
0097AF3E 488db558d3   lea -0x2ca8(%rbp),%rsi
0097AF45 b9c602   mov    $0x2c6,%ecx
0097AF4A f348a5   rep movsq %ds:(%rsi),%es:(%rdi)
0097AF4D a5   movsl %ds:(%rsi),%es:(%rdi)
0097AF4E 66a5 movsw %ds:(%rsi),%es:(%rdi)
0097AF50 488b45d0 mov    -0x30(%rbp),%rax
0097AF54 488b7008 mov    0x8(%rax),%rsi
0097AF58 488b45d0 mov    -0x30(%rbp),%rax
0097AF5C 488b5020 mov    0x20(%rax),%rdx
0097AF60 488b45c8 mov    -0x38(%rbp),%rax
0097AF64 4801d0   add    %rdx,%rax
0097AF67 488b4dd0 mov    -0x30(%rbp),%rcx
0097AF6B 31d2 xor    %edx,%edx
0097AF6D 48f77118 divq   0x18(%rcx)
0097AF71 4869c23616   imul   $0x1636,%rdx,%rax
0097AF78 488d3c06 lea (%rsi,%rax,1),%rdi
0097AF7C 488db590e9   lea -0x1670(%rbp),%rsi
0097AF83 b9c602   mov    $0x2c6,%ecx
0097AF88 f348a5   rep movsq %ds:(%rsi),%es:(%rdi)

Alexey Torgashin

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal