X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fpic%2Fgen.h;h=d83a479c75dcfb110f18e17b5c2f77e36f329471;hb=4464999cca73961d7fd19c9d60ff1305f6ae399e;hp=2989b73466ff23da01646129f164e53489d8c1ff;hpb=773c6338a70b9cd56d206cf4d7994142889970ca;p=fw%2Fsdcc diff --git a/src/pic/gen.h b/src/pic/gen.h index 2989b734..d83a479c 100644 --- a/src/pic/gen.h +++ b/src/pic/gen.h @@ -26,60 +26,77 @@ #ifndef SDCCGENPIC14_H #define SDCCGENPIC14_H +extern int debug_verbose; + +#define FENTRY do { \ + /*fprintf (stderr, "%s:%u:%s: *{*\n", __FILE__, __LINE__, __FUNCTION__);*/ \ + if (options.debug || debug_verbose) { \ + emitpComment ("; %s:%u:%s *{*", __FILE__, __LINE__, __FUNCTION__); \ + } \ +} while (0) +#define FEXIT do { \ + /*fprintf (stderr, "%s:%u:%s: *}*\n", __FILE__, __LINE__, __FUNCTION__);*/ \ + if (options.debug || debug.verbose) { \ + emitpComment ("; %s:%u:%s *}*", __FILE__, __LINE__, __FUNCTION__); \ + } \ +} while (0) + +struct pCodeOp; + enum - { - AOP_LIT = 1, - AOP_REG, AOP_DIR, - AOP_DPTR, AOP_DPTR2, AOP_R0, AOP_R1, - AOP_STK, AOP_IMMD, AOP_STR, - AOP_CRY, AOP_ACC - }; +{ + AOP_LIT = 1, + AOP_REG, AOP_DIR, + AOP_DPTR, AOP_DPTR2, AOP_R0, AOP_R1, + AOP_STK, AOP_IMMD, AOP_STR, + AOP_CRY, AOP_ACC, + AOP_PCODE + +}; /* type asmop : a homogenised type for all the different spaces an operand can be in */ typedef struct asmop +{ + + short type; /* can have values + AOP_LIT - operand is a literal value + AOP_REG - is in registers + AOP_DIR - direct just a name + AOP_DPTR - dptr contains address of operand + AOP_DPTR2 - dptr2 contains address of operand (DS80C390 only). + AOP_R0/R1 - r0/r1 contains address of operand + AOP_STK - should be pushed on stack this + can happen only for the result + AOP_IMMD - immediate value for eg. remateriazable + AOP_CRY - carry contains the value of this + AOP_STR - array of strings + AOP_ACC - result is in the acc:b pair + */ + short coff; /* current offset */ + short size; /* total size */ + unsigned code:1; /* is in Code space */ + unsigned paged:1; /* in paged memory */ + unsigned freed:1; /* already freed */ + union { - - short type; /* can have values - AOP_LIT - operand is a literal value - AOP_REG - is in registers - AOP_DIR - direct just a name - AOP_DPTR - dptr contains address of operand - AOP_DPTR2 - dptr2 contains address of operand (DS80C390 only). - AOP_R0/R1 - r0/r1 contains address of operand - AOP_STK - should be pushed on stack this - can happen only for the result - AOP_IMMD - immediate value for eg. remateriazable - AOP_CRY - carry contains the value of this - AOP_STR - array of strings - AOP_ACC - result is in the acc:b pair - */ - short coff; /* current offset */ - short size; /* total size */ - unsigned code:1; /* is in Code space */ - unsigned paged:1; /* in paged memory */ - unsigned freed:1; /* already freed */ - union - { - value *aop_lit; /* if literal */ - regs *aop_reg[4]; /* array of registers */ - char *aop_dir; /* if direct */ - regs *aop_ptr; /* either -> to r0 or r1 */ - char *aop_immd; /* if immediate others are implied */ - int aop_stk; /* stack offset when AOP_STK */ - char *aop_str[4]; /* just a string array containing the location */ - } - aopu; + value *aop_lit; /* if literal */ + regs *aop_reg[4]; /* array of registers */ + char *aop_dir; /* if direct */ + regs *aop_ptr; /* either -> to r0 or r1 */ + char *aop_immd; /* if immediate others are implied */ + int aop_stk; /* stack offset when AOP_STK */ + char *aop_str[4]; /* just a string array containing the location */ + pCodeOp *pcop; } + aopu; +} asmop; void genpic14Code (iCode *); -//extern char *fReturnpic14[]; -//extern char *fReturn390[]; extern unsigned fReturnSizePic; -//extern char **fReturn; #define AOP(op) op->aop @@ -128,14 +145,20 @@ extern unsigned fReturnSizePic; #define emitCLRZ emitpcode(POC_BCF, popCopyGPR2Bit(PCOP(&pc_status),PIC_Z_BIT)) #define emitCLRC emitpcode(POC_BCF, popCopyGPR2Bit(PCOP(&pc_status),PIC_C_BIT)) #define emitCLRDC emitpcode(POC_BCF, popCopyGPR2Bit(PCOP(&pc_status),PIC_DC_BIT)) +#define emitCLRIRP emitpcode(POC_BCF, popCopyGPR2Bit(PCOP(&pc_status),PIC_IRP_BIT)) #define emitSETZ emitpcode(POC_BSF, popCopyGPR2Bit(PCOP(&pc_status),PIC_Z_BIT)) #define emitSETC emitpcode(POC_BSF, popCopyGPR2Bit(PCOP(&pc_status),PIC_C_BIT)) #define emitSETDC emitpcode(POC_BSF, popCopyGPR2Bit(PCOP(&pc_status),PIC_DC_BIT)) +#define emitSETIRP emitpcode(POC_BSF, popCopyGPR2Bit(PCOP(&pc_status),PIC_IRP_BIT)) int pic14_getDataSize(operand *op); -void emitpcode(PIC_OPCODE poc, pCodeOp *pcop); +void emitpcode_real(PIC_OPCODE poc, pCodeOp *pcop); +#define emitpcode(poc,pcop) do { if (options.debug || debug_verbose) { emitpComment (" >>> %s:%d:%s", __FILE__, __LINE__, __FUNCTION__); } emitpcode_real(poc,pcop); } while(0) +void emitpComment (const char *fmt, ...); +void emitpLabel(int key); void pic14_emitcode (char *inst,char *fmt, ...); void DEBUGpic14_emitcode (char *inst,char *fmt, ...); +void pic14_emitDebuggerSymbol (char *); asmop *newAsmop (short type); bool pic14_sameRegs (asmop *aop1, asmop *aop2 ); char *aopGet (asmop *aop, int offset, bool bit16, bool dname); @@ -155,9 +178,12 @@ pCodeOp *popGetLabel(unsigned int key); pCodeOp *popCopyReg(pCodeOpReg *pc); pCodeOp *popCopyGPR2Bit(pCodeOp *pc, int bitval); pCodeOp *popGetLit(unsigned int lit); -pCodeOp *popGetWithString(char *str); -pCodeOp *popRegFromString(char *str); -pCodeOp *popGet (asmop *aop, int offset, bool bit16, bool dname); +pCodeOp *popGetWithString(char *str, int isExtern); +pCodeOp *popRegFromString(char *str, int size, int offset); +pCodeOp *popGet (asmop *aop, int offset);//, bool bit16, bool dname); +pCodeOp *popGetAddr (asmop *aop, int offset, int index); +pCodeOp *popGetTempReg(void); +void popReleaseTempReg(pCodeOp *pcop); void aopPut (asmop *aop, char *s, int offset); @@ -166,7 +192,10 @@ void aopOp (operand *op, iCode *ic, bool result); void pic14_outBitC(operand *result); void pic14_toBoolean(operand *oper); void freeAsmop (operand *op, asmop *aaop, iCode *ic, bool pop); +void mov2w (asmop *aop, int offset); +const char *pCodeOpType( pCodeOp *pcop); - +int aop_isLitLike (asmop *aop); +int op_isLitLike (operand *op); #endif