source: icGREP/icgrep-devel/icgrep/pablo/pablo_compiler.cpp @ 5292

Last change on this file since 5292 was 5292, checked in by nmedfort, 2 years ago

Removed 'function' and 'self' parameters from generateXXXMethod() functions.

File size: 24.2 KB
Line 
1/*
2 *  Copyright (c) 2014-16 International Characters.
3 *  This software is licensed to the public under the Open Software License 3.0.
4 *  icgrep is a trademark of International Characters.
5 */
6
7#include "pablo_compiler.h"
8#include <pablo/pablo_kernel.h>
9#include <pablo/pablo_toolchain.h>
10#include <pablo/codegenstate.h>
11#include <pablo/boolean.h>
12#include <pablo/arithmetic.h>
13#include <pablo/branch.h>
14#include <pablo/pe_advance.h>
15#include <pablo/pe_lookahead.h>
16#include <pablo/pe_matchstar.h>
17#include <pablo/pe_scanthru.h>
18#include <pablo/pe_infile.h>
19#include <pablo/pe_count.h>
20#include <pablo/pe_integer.h>
21#include <pablo/pe_string.h>
22#include <pablo/pe_zeroes.h>
23#include <pablo/pe_ones.h>
24#include <pablo/pe_var.h>
25#include <pablo/ps_assign.h>
26#include <pablo/carry_manager.h>
27#include <IR_Gen/idisa_builder.h>
28#include <llvm/IR/Module.h>
29#include <llvm/Support/raw_os_ostream.h>
30
31using namespace llvm;
32
33namespace pablo {
34
35using TypeId = PabloAST::ClassTypeId;
36
37inline static unsigned getAlignment(const Value * const ptr) {
38    return ptr->getType()->getPrimitiveSizeInBits() / 8;
39}
40
41inline static unsigned getPointerElementAlignment(const Value * const ptr) {
42    return ptr->getType()->getPointerElementType()->getPrimitiveSizeInBits() / 8;
43}
44
45void PabloCompiler::initializeKernelData() {
46    Examine();
47    mCarryManager->initializeCarryData(mKernel);
48}
49   
50void PabloCompiler::compile(Value * const blockNo) {
51
52    mCarryManager->initializeCodeGen();
53     
54    PabloBlock * const entryBlock = mKernel->getEntryBlock(); assert (entryBlock);
55    mMarker.emplace(entryBlock->createZeroes(), iBuilder->allZeroes());
56    mMarker.emplace(entryBlock->createOnes(), iBuilder->allOnes());
57
58    for (unsigned i = 0; i < mKernel->getNumOfInputs(); ++i) {
59        Var * var = mKernel->getInput(i);
60        std::string name = var->getName().str();
61        Value * input = nullptr;
62        if (var->getType()->isSingleValueType()) {
63            input = mKernel->getScalarFieldPtr(name);
64        } else {
65            input = mKernel->getStreamSetPtr(name, blockNo);
66        }
67        mMarker.emplace(var, input);
68    }
69
70    for (unsigned i = 0; i < mKernel->getNumOfOutputs(); ++i) {
71        Var * var = mKernel->getOutput(i);
72        std::string name = var->getName().str();
73        Value * output = nullptr;
74        if (var->getType()->isSingleValueType()) {
75            output = mKernel->getScalarFieldPtr(name);
76        } else {
77            output = mKernel->getStreamSetPtr(name, blockNo);
78        }
79        mMarker.emplace(var, output);
80    }
81
82    compileBlock(entryBlock);
83
84}
85
86inline void PabloCompiler::Examine() {
87    Examine(mKernel->getEntryBlock());
88}
89
90void PabloCompiler::Examine(const PabloBlock * const block) {
91    for (const Statement * stmt : *block) {
92        if (LLVM_UNLIKELY(isa<Lookahead>(stmt))) {
93            const Lookahead * const la = cast<Lookahead>(stmt);
94            assert (isa<Var>(la->getExpr()));
95            if (LLVM_LIKELY(la->getAmount() > mKernel->getLookAhead())) {
96                mKernel->setLookAhead(la->getAmount());
97            }
98        } else if (LLVM_UNLIKELY(isa<Branch>(stmt))) {
99            Examine(cast<Branch>(stmt)->getBody());
100        } else if (LLVM_UNLIKELY(isa<Count>(stmt))) {
101            mAccumulator.insert(std::make_pair(stmt, iBuilder->getInt32(mKernel->addUnnamedScalar(stmt->getType()))));
102        }
103    }   
104}
105
106inline void PabloCompiler::compileBlock(const PabloBlock * const block) {
107    for (const Statement * statement : *block) {
108        compileStatement(statement);
109    }
110}
111
112void PabloCompiler::compileIf(const If * const ifStatement) {
113    //
114    //  The If-ElseZero stmt:
115    //  if <predicate:expr> then <body:stmt>* elsezero <defined:var>* endif
116    //  If the value of the predicate is nonzero, then determine the values of variables
117    //  <var>* by executing the given statements.  Otherwise, the value of the
118    //  variables are all zero.  Requirements: (a) no variable that is defined within
119    //  the body of the if may be accessed outside unless it is explicitly
120    //  listed in the variable list, (b) every variable in the defined list receives
121    //  a value within the body, and (c) the logical consequence of executing
122    //  the statements in the event that the predicate is zero is that the
123    //  values of all defined variables indeed work out to be 0.
124    //
125    //  Simple Implementation with Phi nodes:  a phi node in the if exit block
126    //  is inserted for each variable in the defined variable list.  It receives
127    //  a zero value from the ifentry block and the defined value from the if
128    //  body.
129    //
130
131    BasicBlock * const ifEntryBlock = iBuilder->GetInsertBlock();
132    BasicBlock * const ifBodyBlock = mKernel->CreateBasicBlock("if.body");
133    BasicBlock * const ifEndBlock = mKernel->CreateBasicBlock("if.end");
134   
135    std::vector<std::pair<const Var *, Value *>> incoming;
136
137    for (const Var * var : ifStatement->getEscaped()) {
138        auto f = mMarker.find(var);
139        if (LLVM_UNLIKELY(f == mMarker.end())) {
140            std::string tmp;
141            raw_string_ostream out(tmp);
142            var->print(out);
143            out << " is uninitialized prior to entering ";
144            ifStatement->print(out);
145            llvm::report_fatal_error(out.str());
146        }
147        incoming.emplace_back(var, f->second);
148    }
149
150    const PabloBlock * ifBody = ifStatement->getBody();
151   
152    mCarryManager->enterIfScope(ifBody);
153
154    Value * condition = compileExpression(ifStatement->getCondition());
155    if (condition->getType() == iBuilder->getBitBlockType()) {
156        condition = iBuilder->bitblock_any(mCarryManager->generateSummaryTest(condition));
157    }
158   
159    iBuilder->CreateCondBr(condition, ifBodyBlock, ifEndBlock);
160   
161    // Entry processing is complete, now handle the body of the if.
162    iBuilder->SetInsertPoint(ifBodyBlock);
163
164    mCarryManager->enterIfBody(ifEntryBlock);
165
166    compileBlock(ifBody);
167
168    BasicBlock * ifExitBlock = iBuilder->GetInsertBlock();   
169
170    mCarryManager->leaveIfBody(ifExitBlock);
171
172    iBuilder->CreateBr(ifEndBlock);
173    //End Block
174    iBuilder->SetInsertPoint(ifEndBlock);
175
176    mCarryManager->leaveIfScope(ifEntryBlock, ifExitBlock);
177
178    for (const auto i : incoming) {
179        const Var * var; Value * incoming;
180        std::tie(var, incoming) = i;
181
182        auto f = mMarker.find(var);
183        if (LLVM_UNLIKELY(f == mMarker.end())) {
184            std::string tmp;
185            raw_string_ostream out(tmp);
186            out << "PHINode creation error: ";
187            var->print(out);
188            out << " was not assigned an outgoing value.";
189            llvm::report_fatal_error(out.str());
190        }
191
192        Value * const outgoing = f->second;
193        if (LLVM_UNLIKELY(incoming == outgoing)) {
194            continue;
195        }
196
197        if (LLVM_UNLIKELY(incoming->getType() != outgoing->getType())) {
198            std::string tmp;
199            raw_string_ostream out(tmp);
200            out << "PHINode creation error: incoming type of ";
201            var->print(out);
202            out << " (";
203            incoming->getType()->print(out);
204            out << ") differs from the outgoing type (";
205            outgoing->getType()->print(out);
206            out << ") within ";
207            ifStatement->print(out);
208            llvm::report_fatal_error(out.str());
209        }
210
211        PHINode * phi = iBuilder->CreatePHI(incoming->getType(), 2, var->getName());
212        phi->addIncoming(incoming, ifEntryBlock);
213        phi->addIncoming(outgoing, ifExitBlock);
214        f->second = phi;
215    }   
216}
217
218void PabloCompiler::compileWhile(const While * const whileStatement) {
219
220    const PabloBlock * const whileBody = whileStatement->getBody();
221
222    BasicBlock * whileEntryBlock = iBuilder->GetInsertBlock();
223    BasicBlock * whileBodyBlock = mKernel->CreateBasicBlock("while.body");
224    BasicBlock * whileEndBlock = mKernel->CreateBasicBlock("while.end");
225
226    const auto escaped = whileStatement->getEscaped();
227
228#ifdef ENABLE_BOUNDED_WHILE
229    PHINode * bound_phi = nullptr;  // Needed for bounded while loops.
230#endif
231    // On entry to the while structure, proceed to execute the first iteration
232    // of the loop body unconditionally.   The while condition is tested at the end of
233    // the loop.
234
235    mCarryManager->enterLoopScope(whileBody);
236
237    iBuilder->CreateBr(whileBodyBlock);
238
239    iBuilder->SetInsertPoint(whileBodyBlock);
240
241    //
242    // There are 3 sets of Phi nodes for the while loop.
243    // (1) Carry-ins: (a) incoming carry data first iterations, (b) zero thereafter
244    // (2) Carry-out accumulators: (a) zero first iteration, (b) |= carry-out of each iteration
245    // (3) Next nodes: (a) values set up before loop, (b) modified values calculated in loop.
246#ifdef ENABLE_BOUNDED_WHILE
247    // (4) The loop bound, if any.
248#endif
249
250    std::vector<std::pair<const Var *, PHINode *>> variants;
251
252    // for any Next nodes in the loop body, initialize to (a) pre-loop value.
253    for (const auto var : escaped) {
254        auto f = mMarker.find(var);
255        if (LLVM_UNLIKELY(f == mMarker.end())) {
256            std::string tmp;
257            raw_string_ostream out(tmp);
258            out << "PHINode creation error: ";
259            var->print(out);
260            out << " is uninitialized prior to entering ";
261            whileStatement->print(out);
262            llvm::report_fatal_error(out.str());
263        }
264        Value * entryValue = f->second;
265        PHINode * phi = iBuilder->CreatePHI(entryValue->getType(), 2, var->getName());
266        phi->addIncoming(entryValue, whileEntryBlock);
267        f->second = phi;
268        assert(mMarker[var] == phi);
269        variants.emplace_back(var, phi);
270    }
271#ifdef ENABLE_BOUNDED_WHILE
272    if (whileStatement->getBound()) {
273        bound_phi = iBuilder->CreatePHI(iBuilder->getSizeTy(), 2, "while_bound");
274        bound_phi->addIncoming(iBuilder->getSize(whileStatement->getBound()), whileEntryBlock);
275    }
276#endif
277
278    mCarryManager->enterLoopBody(whileEntryBlock);
279
280    //
281    // Now compile the loop body proper.  Carry-out accumulated values
282    // and iterated values of Next nodes will be computed.
283    compileBlock(whileBody);
284
285    // After the whileBody has been compiled, we may be in a different basic block.
286    BasicBlock * whileExitBlock = iBuilder->GetInsertBlock();
287
288    mCarryManager->leaveLoopBody(whileExitBlock);
289
290    // Terminate the while loop body with a conditional branch back.
291    Value * condition = compileExpression(whileStatement->getCondition());
292    if (condition->getType() == iBuilder->getBitBlockType()) {
293        condition = iBuilder->bitblock_any(condition);
294    }
295#ifdef ENABLE_BOUNDED_WHILE
296    if (whileStatement->getBound()) {
297        Value * new_bound = iBuilder->CreateSub(bound_phi, iBuilder->getSize(1));
298        bound_phi->addIncoming(new_bound, whileExitBlock);
299        condition = iBuilder->CreateAnd(condition, iBuilder->CreateICmpUGT(new_bound, ConstantInt::getNullValue(iBuilder->getSizeTy())));
300    }
301#endif
302
303    // and for any variant nodes in the loop body
304    for (const auto variant : variants) {
305        const Var * var; PHINode * incomingPhi;
306        std::tie(var, incomingPhi) = variant;
307        const auto f = mMarker.find(var);
308        if (LLVM_UNLIKELY(f == mMarker.end())) {
309            std::string tmp;
310            raw_string_ostream out(tmp);
311            out << "PHINode creation error: ";
312            var->print(out);
313            out << " is no longer assigned a value.";
314            llvm::report_fatal_error(out.str());
315        }
316
317        Value * const outgoingValue = f->second;
318
319        if (LLVM_UNLIKELY(incomingPhi->getType() != outgoingValue->getType())) {
320            std::string tmp;
321            raw_string_ostream out(tmp);
322            out << "PHINode creation error: incoming type of ";
323            var->print(out);
324            out << " (";
325            incomingPhi->getType()->print(out);
326            out << ") differs from the outgoing type (";
327            outgoingValue->getType()->print(out);
328            out << ") within ";
329            whileStatement->print(out);
330            llvm::report_fatal_error(out.str());
331        }
332
333        incomingPhi->addIncoming(outgoingValue, whileExitBlock);
334        f->second = incomingPhi;
335    }
336
337    iBuilder->CreateCondBr(condition, whileBodyBlock, whileEndBlock);
338
339    iBuilder->SetInsertPoint(whileEndBlock);
340
341    mCarryManager->leaveLoopScope(whileEntryBlock, whileExitBlock);
342
343}
344
345void PabloCompiler::compileStatement(const Statement * stmt) {
346
347    if (LLVM_UNLIKELY(isa<If>(stmt))) {
348        compileIf(cast<If>(stmt));
349    } else if (LLVM_UNLIKELY(isa<While>(stmt))) {
350        compileWhile(cast<While>(stmt));
351    } else {
352        const PabloAST * expr = stmt;
353        Value * value = nullptr;
354        if (LLVM_UNLIKELY(isa<Assign>(stmt))) {
355
356            expr = cast<Assign>(stmt)->getVariable();
357            value = compileExpression(cast<Assign>(stmt)->getValue());
358
359            bool storeInstRequired = false;
360            if (LLVM_LIKELY(isa<Var>(expr))) {
361                for (unsigned i = 0; i < mKernel->getNumOfOutputs(); ++i) {
362                    if (expr == mKernel->getOutput(i)) {
363                        storeInstRequired = true;
364                        break;
365                    }
366                }
367            }
368
369            if (LLVM_UNLIKELY(storeInstRequired || isa<Extract>(expr))) {
370                const auto f = mMarker.find(expr);
371                if (LLVM_UNLIKELY(f == mMarker.end())) {
372                    std::string tmp;
373                    raw_string_ostream out(tmp);
374                    out << "PabloCompiler: use-before-definition error: ";
375                    expr->print(out);
376                    out << " does not dominate ";
377                    stmt->print(out);
378                    llvm::report_fatal_error(out.str());
379                }
380                Value * const ptr = f->second;
381                iBuilder->CreateAlignedStore(value, ptr, getAlignment(value));
382                value = ptr;
383            }
384
385        } else if (const Extract * extract = dyn_cast<Extract>(stmt)) {
386            Value * array = compileExpression(extract->getArray(), false);
387            Value * index = compileExpression(extract->getIndex());
388            value = iBuilder->CreateGEP(array, {ConstantInt::getNullValue(index->getType()), index}, stmt->getName());
389        } else if (isa<And>(stmt)) {
390            value = compileExpression(stmt->getOperand(0));
391            for (unsigned i = 1; i < stmt->getNumOperands(); ++i) {
392                value = iBuilder->simd_and(value, compileExpression(stmt->getOperand(1)));
393            }
394        } else if (isa<Or>(stmt)) {
395            value = compileExpression(stmt->getOperand(0));
396            for (unsigned i = 1; i < stmt->getNumOperands(); ++i) {
397                value = iBuilder->simd_or(value, compileExpression(stmt->getOperand(1)));
398            }
399        } else if (isa<Xor>(stmt)) {
400            value = compileExpression(stmt->getOperand(0));
401            for (unsigned i = 1; i < stmt->getNumOperands(); ++i) {
402                value = iBuilder->simd_xor(value, compileExpression(stmt->getOperand(1)));
403            }
404        } else if (const Sel * sel = dyn_cast<Sel>(stmt)) {
405            Value* ifMask = compileExpression(sel->getCondition());
406            Value* ifTrue = iBuilder->simd_and(ifMask, compileExpression(sel->getTrueExpr()));
407            Value* ifFalse = iBuilder->simd_and(iBuilder->simd_not(ifMask), compileExpression(sel->getFalseExpr()));
408            value = iBuilder->simd_or(ifTrue, ifFalse);
409        } else if (isa<Not>(stmt)) {
410            value = iBuilder->simd_not(compileExpression(stmt->getOperand(0)));
411        } else if (isa<Advance>(stmt)) {
412            const Advance * const adv = cast<Advance>(stmt);
413            // If our expr is an Extract op on a mutable Var then we need to pass the index value to the carry
414            // manager so that it properly selects the correct carry bit.
415            value = mCarryManager->advanceCarryInCarryOut(adv, compileExpression(adv->getExpression()));
416        } else if (const MatchStar * mstar = dyn_cast<MatchStar>(stmt)) {
417            Value * const marker = compileExpression(mstar->getMarker());
418            Value * const cc = compileExpression(mstar->getCharClass());
419            Value * const marker_and_cc = iBuilder->simd_and(marker, cc);
420            Value * const sum = mCarryManager->addCarryInCarryOut(mstar, marker_and_cc, cc);
421            value = iBuilder->simd_or(iBuilder->simd_xor(sum, cc), marker);
422        } else if (const ScanThru * sthru = dyn_cast<ScanThru>(stmt)) {
423            Value * const marker_expr = compileExpression(sthru->getScanFrom());
424            Value * const cc_expr = compileExpression(sthru->getScanThru());
425            Value * const sum = mCarryManager->addCarryInCarryOut(sthru, marker_expr, cc_expr);
426            value = iBuilder->simd_and(sum, iBuilder->simd_not(cc_expr));
427        } else if (const InFile * e = dyn_cast<InFile>(stmt)) {
428            Value * EOFmask = mKernel->getScalarField("EOFmask");
429            value = iBuilder->simd_xor(compileExpression(e->getExpr()), EOFmask);
430        } else if (const AtEOF * e = dyn_cast<AtEOF>(stmt)) {
431            Value * EOFbit = mKernel->getScalarField("EOFbit");
432            value = iBuilder->simd_and(compileExpression(e->getExpr()), EOFbit);
433        } else if (const Count * c = dyn_cast<Count>(stmt)) {
434            Value * const to_count = compileExpression(c->getExpr());
435            const unsigned counterSize = iBuilder->getSizeTy()->getBitWidth();
436            const auto f = mAccumulator.find(c);
437            if (LLVM_UNLIKELY(f == mAccumulator.end())) {
438                llvm::report_fatal_error("Unknown accumulator: " + c->getName().str());
439            }
440            Value * ptr = mKernel->getScalarFieldPtr(f->second);
441            Value * count = iBuilder->CreateAlignedLoad(ptr, getPointerElementAlignment(ptr));
442            Value * const partial = iBuilder->simd_popcount(counterSize, to_count);
443            if (LLVM_UNLIKELY(counterSize <= 1)) {
444                value = partial;
445            } else {
446                value = iBuilder->mvmd_extract(counterSize, partial, 0);
447                const auto fields = (iBuilder->getBitBlockWidth() / counterSize);
448                for (unsigned i = 1; i < fields; ++i) {
449                    Value * temp = iBuilder->mvmd_extract(counterSize, partial, i);
450                    value = iBuilder->CreateAdd(value, temp);
451                }
452            }
453            value = iBuilder->CreateAdd(value, count);
454            iBuilder->CreateStore(value, ptr);
455
456        } else if (const Lookahead * l = dyn_cast<Lookahead>(stmt)) {
457            PabloAST * const var = l->getExpr();
458            if (LLVM_UNLIKELY(!isa<Var>(var))) {
459                throw std::runtime_error("Lookahead operations may only be applied to input streams");
460            }
461            unsigned index = 0;
462            for (; index < mKernel->getNumOfInputs(); ++index) {
463                if (mKernel->getInput(index) == var) {
464                    break;
465                }
466            }
467            if (LLVM_UNLIKELY(index >= mKernel->getNumOfInputs())) {
468                throw std::runtime_error("Lookahead has an illegal Var operand");
469            }
470            const unsigned bit_shift = (l->getAmount() % iBuilder->getBitBlockWidth());
471            const unsigned block_shift = (l->getAmount() / iBuilder->getBitBlockWidth());
472            std::string inputName = cast<Var>(var)->getName().str();
473            Value * blockNo = mKernel->getBlockNo();
474            Value * lookAhead_blockPtr  = mKernel->getStreamSetPtr(inputName, iBuilder->CreateAdd(blockNo, iBuilder->getSize(block_shift)));
475            Value * lookAhead_inputPtr = iBuilder->CreateGEP(lookAhead_blockPtr, {iBuilder->getInt32(0), iBuilder->getInt32(index)});
476            Value * lookAhead = iBuilder->CreateBlockAlignedLoad(lookAhead_inputPtr);
477            if (bit_shift == 0) {  // Simple case with no intra-block shifting.
478                value = lookAhead;
479            } else { // Need to form shift result from two adjacent blocks.
480                Value * lookAhead_blockPtr1  = mKernel->getStreamSetPtr(inputName, iBuilder->CreateAdd(blockNo, iBuilder->getSize(block_shift + 1)));
481                Value * lookAhead_inputPtr1 = iBuilder->CreateGEP(lookAhead_blockPtr1, {iBuilder->getInt32(0), iBuilder->getInt32(index)});
482                Value * lookAhead1 = iBuilder->CreateBlockAlignedLoad(lookAhead_inputPtr1);
483                if (LLVM_UNLIKELY((bit_shift % 8) == 0)) { // Use a single whole-byte shift, if possible.
484                    value = iBuilder->mvmd_dslli(8, lookAhead1, lookAhead, (bit_shift / 8));
485                } else {
486                    Type  * const streamType = iBuilder->getIntNTy(iBuilder->getBitBlockWidth());
487                    Value * b1 = iBuilder->CreateBitCast(lookAhead1, streamType);
488                    Value * b0 = iBuilder->CreateBitCast(lookAhead, streamType);
489                    Value * result = iBuilder->CreateOr(iBuilder->CreateShl(b1, iBuilder->getBitBlockWidth() - bit_shift), iBuilder->CreateLShr(b0, bit_shift));
490                    value = iBuilder->CreateBitCast(result, iBuilder->getBitBlockType());
491                }
492            }
493
494        } else {
495            std::string tmp;
496            llvm::raw_string_ostream out(tmp);
497            out << "Internal error: ";
498            stmt->print(out);
499            out << " is not a recognized statement in the Pablo compiler.";
500            throw std::runtime_error(out.str());
501        }
502
503        mMarker[expr] = value;
504        if (DebugOptionIsSet(DumpTrace)) {
505            const String & name = isa<Var>(expr) ? cast<Var>(expr)->getName() : cast<Statement>(expr)->getName();
506            if (value->getType()->isVectorTy()) {
507                iBuilder->CallPrintRegister(name.str(), value);
508            } else if (value->getType()->isIntegerTy()) {
509                iBuilder->CallPrintInt(name.str(), value);
510            }
511        }
512    }
513}
514
515Value * PabloCompiler::compileExpression(const PabloAST * expr, const bool ensureLoaded) const {
516    if (LLVM_UNLIKELY(isa<Ones>(expr))) {
517        return iBuilder->allOnes();
518    } else if (LLVM_UNLIKELY(isa<Zeroes>(expr))) {
519        return iBuilder->allZeroes();
520    } else if (LLVM_UNLIKELY(isa<Integer>(expr))) {
521        return iBuilder->getInt64(cast<Integer>(expr)->value());
522    } else if (LLVM_UNLIKELY(isa<Operator>(expr))) {
523        const Operator * op = cast<Operator>(expr);
524        Value * lh = compileExpression(op->getLH());
525        Value * rh = compileExpression(op->getRH());
526        if (LLVM_UNLIKELY(lh->getType() != rh->getType())) {
527            std::string tmp;
528            raw_string_ostream out(tmp);
529            out << "Operator creation error: left hand type of ";
530            expr->print(out);
531            out << " (";
532            lh->getType()->print(out);
533            out << ") differs from right hand type (";
534            rh->getType()->print(out);
535            out << ")";
536            llvm::report_fatal_error(out.str());
537        }
538        switch (op->getClassTypeId()) {
539            case TypeId::Add:
540                return iBuilder->CreateAdd(lh, rh);
541            case TypeId::Subtract:
542                return iBuilder->CreateSub(lh, rh);
543            case TypeId::LessThan:
544                return iBuilder->CreateICmpSLT(lh, rh);
545            case TypeId::LessThanEquals:
546                return iBuilder->CreateICmpSLE(lh, rh);
547            case TypeId::Equals:
548                return iBuilder->CreateICmpEQ(lh, rh);
549            case TypeId::GreaterThanEquals:
550                return iBuilder->CreateICmpSGE(lh, rh);
551            case TypeId::GreaterThan:
552                return iBuilder->CreateICmpSGT(lh, rh);
553            case TypeId::NotEquals:
554                return iBuilder->CreateICmpNE(lh, rh);
555            default: break;
556        }
557        std::string tmp;
558        raw_string_ostream out(tmp);
559        expr->print(out);
560        out << " is not a valid Operator";
561        llvm::report_fatal_error(out.str());
562    }
563    const auto f = mMarker.find(expr);
564    if (LLVM_UNLIKELY(f == mMarker.end())) {
565        std::string tmp;
566        llvm::raw_string_ostream out(tmp);
567        out << "Compilation error: ";
568        expr->print(out);
569        out << " was used before definition!";
570        llvm::report_fatal_error(out.str());
571    }
572    Value * value = f->second;
573    if (LLVM_UNLIKELY(isa<GetElementPtrInst>(value) && ensureLoaded)) {
574        value = iBuilder->CreateAlignedLoad(value, getPointerElementAlignment(value));
575    }
576    return value;
577}
578
579PabloCompiler::PabloCompiler(PabloKernel * kernel)
580: iBuilder(kernel->getBuilder())
581, mKernel(kernel)
582, mCarryManager(new CarryManager(iBuilder)) {
583
584}
585
586PabloCompiler::~PabloCompiler() {
587    delete mCarryManager;
588}
589
590}
Note: See TracBrowser for help on using the repository browser.