CodeBlock

CodeBlock

Postby Ari » Tue Nov 01, 2022 11:24 am

Hello friends

I need to know what has inside a codeblock: function, field name..

That's possible.

I'm trying to take the TcBrowse Object and know the contents of each column, reverse engineering.
Thanks,
Ari

FWH 2212 - Harbour 3.2.0 - Embarcadero 7.43 - MySQL
São Paulo - SP - Brasil
www.sisrev.com.br
User avatar
Ari
 
Posts: 234
Joined: Fri Feb 03, 2006 4:21 pm
Location: São Paulo, SP - Brazil

Re: CodeBlock

Postby Antonio Linares » Tue Nov 01, 2022 7:31 pm

Dear Ari,

In harbour/include/hbapi.h you find this:
https://github.com/harbour/core/blob/master/include/hbapi.h
typedef struct _HB_CODEBLOCK
{
const HB_BYTE * pCode; /* codeblock pcode */
PHB_SYMB pSymbols; /* codeblocks symbols */
PHB_SYMB pDefSymb; /* symbol where the codeblock was created */
PHB_ITEM pLocals; /* table with referenced local variables */
void * pStatics; /* STATICs base frame */
HB_USHORT uiLocals; /* number of referenced local variables */
HB_SHORT dynBuffer; /* is pcode buffer allocated dynamically, SHORT used instead of HB_BOOL intentionally to force optimal alignment */
} HB_CODEBLOCK, * PHB_CODEBLOCK;

using #define _HB_API_INTERNAL_ before #include <hbapi.h> you can use such structure to query a codeblock retrieved as hb_param( <number_parameter>, HB_IT_BLOCK )
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42120
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: CodeBlock

Postby Ari » Wed Nov 02, 2022 3:40 pm

Obrigado Antonio.
Thanks,
Ari

FWH 2212 - Harbour 3.2.0 - Embarcadero 7.43 - MySQL
São Paulo - SP - Brasil
www.sisrev.com.br
User avatar
Ari
 
Posts: 234
Joined: Fri Feb 03, 2006 4:21 pm
Location: São Paulo, SP - Brazil


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 58 guests