Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: DynCall no Protheus: Uma Nova Era na Integração com C/C++

_Créditos das imagens: ChatGPT 🚀 **DynCall no Protheus: Uma Nova Era na Integração com C/C++** Do meu ponto de vista, um dos recursos mais interessantes na nova versão do Protheus "Onça Preta" é a possibilidade de uso do **DynCall**. A linguagem AdvPL/TLPP, utilizada no Protheus, pode ser considerada um "superconjunto" de Clipper com FiveWin, mas com características e funcionalidades específicas voltadas para o ecossistema TOTVS. Um dos recursos marcantes do Clipper e de linguagens padrão xBase, como Harbour, é a possibilidade de incorporar código C/C++ diretamente no código-fonte. Até então, o Protheus não suportava isso nativamente. No entanto, com a introdução do **DynCall**, é possível simular essa integração ao carregar e executar funções de bibliotecas dinâmicas (DLLs) escritas em C ou C++. A seguir, comparamos os recursos das linguagens xBase padrão (exemplificadas pelo Harbour) com a implementação no Protheus via DynCall e apresentamos exemplos dos nov...

BlackTDN :: a small memory manager test code (Harbour vs AppServer : round IV fight)

Comparando os resultados do Quarto teste teremos:

Harbour

27/01/2012, 09:01:57, Harbour 3.1.0dev (Rev. 17207), Windows XP 5.1.2600 Service Pack 3

Len( cWSpace ) :      4096

testing single large memory blocks allocation and freeing...

CPU time:    0.8125000000 sec.
real time:      0.8430000000 sec.

Protheus/TotvsAppServer

27/01/2012, 10:22:40, TOTVS APPServer P10 7.00.101202A-20110330 R1, Windows

Len( cWSpace ) :      4096

testing single large memory blocks allocation and freeing...

CPU time:    2.1250000000 sec.
real time:      2.1250000000 sec.

 

testing many large memory blocks allocation and freeing... testing large memory block reallocation with intermediate allocations...
Harbour Protheus/TotvsAppServer

CPU time:   85.4687500000 sec.
real time:     99.2340000000 sec.

CPU time:   96.2030000000 sec.
real time:     96.2030000000 sec.

Harbour Protheus/TotvsAppServer

CPU time:    2.9843750000 sec.
real time:      3.4220000000 sec.

CPU time:   11.5940000000 sec.
real time:      11.5940000000 sec.

Teste 4

27/01/2012, 09:03:44, Harbour 3.1.0dev (Rev. 17207), Windows XP 5.1.2600 Service Pack 3

27/01/2012, 10:24:30, TOTVS APPServer P10 7.00.101202A-20110330 R1, Windows

CPU time (total):   93.2500000000 sec.
real time (total):    107.5150000000 sec.

CPU time (total):  110.0780000000 sec.
real time (total):     110.0780000000 sec.

[]s
иαldσ dj

Comentários

Postagens mais visitadas