Welcome to the NetCologne GmbH open source mirroring service!

This machine mirrors various open-source projects. 20 Gbit/s uplink.

If there are any issues or you want another project mirrored, please contact mirror-service -=AT=- netcologne DOT de !

lib/codegen/CodeGenRoutine.h

Go to the documentation of this file.

//===-- codegen/CodeGenRoutine.h ------------------------------ -*- C++ -*-===//
//
// This file is distributed under the MIT license. See LICENSE.txt for details.
//
// Copyright (C) 2009-2010, Stephen Wilson
//
//===----------------------------------------------------------------------===//

#ifndef COMMA_CODEGEN_CODEGENROUTINE_HDR_GUARD
#define COMMA_CODEGEN_CODEGENROUTINE_HDR_GUARD

#include "CodeGen.h"
#include "CValue.h"
#include "Frame.h"
#include "comma/ast/Expr.h"

#include "llvm/DerivedTypes.h"
#include "llvm/ADT/DenseMap.h"
#include "llvm/Support/IRBuilder.h"

namespace llvm {

class BasicBlock;
class Function;

} // end namespace llvm;

namespace comma {

class CGContext;

// This class provides for code generation of subroutines.
class CodeGenRoutine {

    CodeGen       &CG;
    CGContext     &CGC;
    CodeGenTypes  &CGT;
    const CommaRT &CRT;

    // The info node for the subroutine we are emitting code for.
    SRInfo *SRI;

    // Builder object used to construct LLVM IR.
    llvm::IRBuilder<> Builder;

    // Frame encapsulating this functions IR.
    SRFrame *SRF;

public:
    CodeGenRoutine(CGContext &CGC, SRInfo *info);

    CodeGen &getCodeGen() { return CG; }

    CGContext &getCGC() { return CGC; }

    SRInfo *getSRInfo() { return SRI; }

    SRFrame *getSRFrame() { return SRF; }

    llvm::Value *getImplicitContext() const {
        return SRF->getImplicitContext();
    }

    void emit();

    CValue emitValue(Expr *expr);
    CValue emitReference(Expr *expr);

    CValue emitArrayExpr(Expr *expr, llvm::Value *dst, bool genTmp);

    CValue emitRecordExpr(Expr *expr, llvm::Value *dst, bool genTmp);

    CValue emitCompositeExpr(Expr *expr, llvm::Value *dst, bool genTmp);

    void emitStmt(Stmt *stmt);

    CValue emitSimpleCall(FunctionCallExpr *expr);
    CValue emitFunctionCall(FunctionCallExpr *expr);

    CValue emitCompositeCall(FunctionCallExpr *expr, llvm::Value *dst);

    CValue emitVStackCall(FunctionCallExpr *expr);

    void emitArrayCopy(llvm::Value *source, llvm::Value *destination,
                       ArrayType *arrTy);

    void emitArrayCopy(llvm::Value *source, llvm::Value *destination,
                       llvm::Value *length, const llvm::Type *componentTy);

    CValue emitIndexedArrayRef(IndexedArrayExpr *expr);
    CValue emitSelectedRef(SelectedExpr *expr);

    Type *resolveType(Type *type);
    Type *resolveType(Expr *expr) {
        return resolveType(expr->getType());
    }

    void emitNullAccessCheck(llvm::Value *pointer, Location loc);

private:
    // Returns the llvm function we are generating code for.
    llvm::Function *getLLVMFunction() const;

    void emitSubroutineBody();

    void emitObjectDecl(ObjectDecl *objDecl);
    void emitRenamedObjectDecl(RenamedObjectDecl *objDecl);

    void emitIfStmt(IfStmt *ite);
    void emitReturnStmt(ReturnStmt *ret);
    void emitVStackReturn(Expr *expr, ArrayType *type);
    void emitStmtSequence(StmtSequence *seq);
    void emitProcedureCallStmt(ProcedureCallStmt *stmt);
    void emitAssignmentStmt(AssignmentStmt *stmt);
    void emitWhileStmt(WhileStmt *stmt);
    void emitForStmt(ForStmt *stmt);
    void emitLoopStmt(LoopStmt *stmt);
    void emitRaiseStmt(RaiseStmt *stmt);
    void emitPragmaStmt(PragmaStmt *stmt);

    llvm::BasicBlock *emitBlockStmt(BlockStmt *block,
                                    llvm::BasicBlock *predecessor = 0);

    CValue emitDeclRefExpr(DeclRefExpr *expr);
    CValue emitPrjExpr(PrjExpr *expr);
    CValue emitInjExpr(InjExpr *expr);
    CValue emitIntegerLiteral(IntegerLiteral *expr);
    CValue emitIndexedArrayValue(IndexedArrayExpr *expr);
    CValue emitConversionValue(ConversionExpr *expr);
    CValue emitAttribExpr(AttribExpr *expr);
    CValue emitSelectedValue(SelectedExpr *expr);
    CValue emitNullExpr(NullExpr *expr);
    CValue emitDereferencedValue(DereferenceExpr *expr);
    CValue emitDefaultValue(Type *type);
    CValue emitAllocatorValue(AllocatorExpr *expr);
    CValue emitCompositeAllocator(AllocatorExpr *expr);

    llvm::Value *emitScalarBoundAE(ScalarBoundAE *expr);
    llvm::Value *emitArrayBoundAE(ArrayBoundAE *expr);

    // Conversion emitters.
    llvm::Value *emitDiscreteConversion(Expr *expr, DiscreteType *target);

    void emitDiscreteRangeCheck(llvm::Value *sourceVal, Location loc,
                                Type *sourceTy, DiscreteType *targetTy);

    SubroutineDecl *resolveAbstractSubroutine(DomainInstanceDecl *instance,
                                              AbstractDomainDecl *abstract,
                                              SubroutineDecl *target);

    void emitPragmaAssert(PragmaAssert *pragma);

    void emitCompositeObjectDecl(ObjectDecl *objDecl);

    llvm::Value *emitExponential(llvm::Value *x, llvm::Value *n);

    std::pair<llvm::Value*, llvm::Value*> emitRangeAttrib(RangeAttrib *attrib);
};

} // end comma namespace

#endif

---