The compiler

../FichierCommun/Sysdict.txt

../FichierCommun/Systoken.txt

The EndUser4gl compiler has 2 cycles:  

Cycle 1:  It is the reading of the user's program * Eu4glExe and  creation of the symbols

table, syntactic analyzer, aso.  

You can develop executions codes to create variables, to control  instructions, aso

1)  These possible executions codes are included in the  section from 20000 to 21000:  

creation of only these variables :  integer, char, string,  float, double

2)  These possible codes executions are included in the  section from 21001 to 32500:  

creation of controls or else

Cycle 2:  It is the second reading ofthe user's program *  Eu4glExe and execution of your actions  

through your executions codes.  

The number section of the executions codes must be > to 32500 up to  2,147,483,647

(it is a long type)

Instructions

 ../FichierCommun/EndUserRules.txt

It is practically the most difficult exercise.  

Reflexion on the creation of an instruction:  its goal, its  utility, its optimization.  

EndUsergl has the role to be an OPTIMUM language without being  restricted.  There are

enoughdata-processing languages on the market able to satisfy our data  processing specialists in case of

complex progamming.  

EndUser4gl:  It is the art of mastering a function synthesis or  several functions through one instruction

.......  

SUMMARY :

ENDUSERCOMPIL.CPP

OPCCODEX.H

ENDUSERGL.H

EXECUTE.CPP

* create your token : EndUserCompil.cpp : #TOKEN xxxxx

* create your instructions and/or key words :EndUsercompil.cpp:

#DEFINE-INST  <identifying for the rule >   follow-up <key word of language> or

#DEFINE-MCLE    <identifying for the rule >   follow-up <key word of language> or

* create your syntactic rule : EndUsercompil.cpp :

T_INSTRUCTION :    ",

"                 T_DECLARE_PROCFUNC   ",

"               |  M_BEGIN  T_INST_LIST M_ENDBEGIN    ",

* create your execution codes :  EndUsercompil.cpp + opccodex.h

"#define CodeCreateVarInteger   20000",

+ your program source cpp :To create the function which will be called by EXECUTE.CPP  

* ADD in Class ENDUSER4GL.H : to add your new function

To create the function which will be called by EXECUTE.CPP:

EndUser4glApp::OPCExecute_user(long OPCcodeExe) :

* To add in EXECUTE.CPP your code execution while adding to it the above created function

the fonctions of

compilater

Type of the variable :

P_INTEGER

P_FLOAT

P_DOUBLE

P_STRING

P_ALNUM

P_NAMEVAR : Name of the variable

../FichierCommun/Opcsysh.txt

../FichierCommun/Opcdefineh.txt

see you Depile fonctions   above

Update of the symbols  table  :   Ex :   a := b;  

OPC_Update_TableSymbole( variable name (a), &adress of value) ../FichierCommun/Excalculcpp.txt

OPC_Update_TableSymboleString( variable (a), &adress of value) ../FichierCommun/Exmovecpp.txt

OPC_CreateGlobalVar_TableSymbole(P_INTEGER,data1,(int)NULL);

 OPC_CreateLocalVar_TableSymbole(P_INTEGER,0,data,(int)NULL);   ../FichierCommun/Exvarcpp.txt

To recover the index one of dialogue box :

int NumDialog = OPC_Return_NumDialog(data1);../FichierCommun/Exewinob.txt

To recover index of the windows :./FichierCommun/Exewinob.txt

Dialog[NumDialog].TabCoordWin[Ival].hWnd

Instruction EndUser4gl :  M_SETNEWPARENTWIN  M_PO L_WIN M_2PP L_WIN   M_PF   { CodeExeSetNewParentWin } ",

case CodeExeSetNewParentWin :

                                OPCF_Pile_Depile( P_NAMEVAR, (void *)zone1 );

                                OPCF_Pile_Depile( P_INTEGER, (void *)&Ival )  ;

                                NumDialog  = OPC_Return_NumDialog(zone1);

                                OPCF_Pile_Depile( P_NAMEVAR, (void *)zone2 );

                                OPCF_Pile_Depile( P_INTEGER, (void *)&Ival2 )  ;

                                NumDialog2 = OPC_Return_NumDialog(zone2);

                                        OPC_Depile_All();

        SetParent(Dialog[NumDialog2].TabCoordWin[Ival2].hWnd,

                Dialog[NumDialog].TabCoordWin[Ival].hWnd);// child,new parent

To empty the piles of variables : OPC_Depile_All();

After each execution of a code, the pile must be empty.  To  use in the event of precaution...

Codes Sources

calcul.cpp : calculette ordinaire

if.cpp

move.cpp

sql.cpp

ExeSynListView.cpp

ExeWinOb.cpp   etc....

The   execution codes of EnUser4gl ( not includedexewin.cpp,sql.cpp,query.cpp,gif.cpp,grid.cpp....)