#ifndef ZCC_COMPILE_H #define ZCC_COMPILE_H struct ZCC_StructWork { ZCC_Struct *strct; PSymbolTreeNode *node; TArray Constants; ZCC_StructWork(ZCC_Struct * s, PSymbolTreeNode *n) { strct = s; node = n; }; ZCC_Struct *operator->() { return strct; } operator ZCC_Struct *() { return strct; } }; struct ZCC_ClassWork { ZCC_Class *cls; PSymbolTreeNode *node; TArray Constants; TArray Structs; ZCC_ClassWork(ZCC_Class * s, PSymbolTreeNode *n) { cls = s; node = n; }; ZCC_Class *operator->() { return cls; } operator ZCC_Class *() { return cls; } }; struct ZCC_ConstantWork { ZCC_ConstantDef *node; PSymbolTable *nodetable; PSymbolTable *outputtable; }; class ZCCCompiler { public: ZCCCompiler(ZCC_AST &tree, DObject *outer, PSymbolTable &symbols, PSymbolTable &outsymbols); int Compile(); private: void ProcessClass(ZCC_Class *node, PSymbolTreeNode *tnode); void ProcessStruct(ZCC_Struct *node, PSymbolTreeNode *tnode); void CreateStructTypes(); void CreateClassTypes(); void AddConstants(TArray &dest, TArray &Constants, PSymbolTable *nt, PSymbolTable *ot); void CompileAllConstants(); void AddConstant(ZCC_ConstantWork &constant); int CompileConstants(const TArray &defs, PSymbolTable *Nodes, PSymbolTable *Output); bool CompileConstant(ZCC_ConstantDef *def, PSymbolTable *Symbols); TArray Constants; TArray Structs; TArray Classes; PSymbolTreeNode *AddNamedNode(ZCC_NamedNode *node, PSymbolTable *parentsym = nullptr); ZCC_Expression *Simplify(ZCC_Expression *root, PSymbolTable *Symbols); ZCC_Expression *SimplifyUnary(ZCC_ExprUnary *unary, PSymbolTable *Symbols); ZCC_Expression *SimplifyBinary(ZCC_ExprBinary *binary, PSymbolTable *Symbols); ZCC_Expression *SimplifyMemberAccess(ZCC_ExprMemberAccess *dotop, PSymbolTable *Symbols); ZCC_Expression *SimplifyFunctionCall(ZCC_ExprFuncCall *callop, PSymbolTable *Symbols); ZCC_OpProto *PromoteUnary(EZCCExprType op, ZCC_Expression *&expr); ZCC_OpProto *PromoteBinary(EZCCExprType op, ZCC_Expression *&left, ZCC_Expression *&right); void PromoteToInt(ZCC_Expression *&expr); void PromoteToUInt(ZCC_Expression *&expr); void PromoteToDouble(ZCC_Expression *&expr); void PromoteToString(ZCC_Expression *&expr); ZCC_Expression *ApplyConversion(ZCC_Expression *expr, const PType::Conversion **route, int routelen); ZCC_Expression *AddCastNode(PType *type, ZCC_Expression *expr); ZCC_Expression *IdentifyIdentifier(ZCC_ExprID *idnode, PSymbolTable *sym); ZCC_Expression *NodeFromSymbol(PSymbol *sym, ZCC_Expression *source, PSymbolTable *table); ZCC_ExprConstant *NodeFromSymbolConst(PSymbolConst *sym, ZCC_Expression *idnode); ZCC_ExprTypeRef *NodeFromSymbolType(PSymbolType *sym, ZCC_Expression *idnode); void Warn(ZCC_TreeNode *node, const char *msg, ...); void Error(ZCC_TreeNode *node, const char *msg, ...); void MessageV(ZCC_TreeNode *node, const char *txtcolor, const char *msg, va_list argptr); DObject *Outer; PSymbolTable *Symbols; PSymbolTable *OutputSymbols; ZCC_AST * int ErrorCount; int WarnCount; }; void ZCC_InitConversions(); #endif