source: icGREP/icgrep-devel/icgrep/generate_predefined_ucd_functions.cpp @ 4829

Last change on this file since 4829 was 4814, checked in by nmedfort, 4 years ago

Added union/diff/intersection functionality to RE_Compiler. Removed toUTF8 pass in favour of using the UCD_Compiler.

File size: 22.8 KB
Line 
1/*
2 *  Copyright (c) 2015 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 <cc/cc_compiler.h>
8#include <UCD/unicode_set.h>
9#include <UCD/PropertyObjectTable.h>
10#include <UCD/ucd_compiler.hpp>
11#include <pablo/pablo_compiler.h>
12#include <pablo/builder.hpp>
13#include <pablo/function.h>
14#include <llvm/Support/CommandLine.h>
15#include <utf_encoding.h>
16#include <pablo/analysis/pabloverifier.hpp>
17#include <pablo/optimizers/pablo_simplifier.hpp>
18#include <pablo/optimizers/pablo_codesinking.hpp>
19#ifdef ENABLE_MULTIPLEXING
20#include <pablo/optimizers/pablo_bddminimization.h>
21#include <pablo/optimizers/pablo_automultiplexing.hpp>
22#endif
23#include <pablo/optimizers/booleanreassociationpass.h>
24#include <llvm/IR/Verifier.h>
25#include <llvm/Support/Debug.h>
26#include <llvm/Support/TargetRegistry.h>
27#include <llvm/Support/TargetSelect.h>
28#include <llvm/Target/TargetLibraryInfo.h>
29#include <llvm/Target/TargetMachine.h>
30#include <llvm/Support/Host.h>
31#include <llvm/ADT/Triple.h>
32#include <llvm/Support/ToolOutputFile.h>
33#include <llvm/Pass.h>
34#include <llvm/PassManager.h>
35#include <llvm/ADT/STLExtras.h>
36#include <llvm/Target/TargetSubtargetInfo.h>
37#include <llvm/Support/FormattedStream.h>
38#include "llvm/Support/FileSystem.h"
39#include <llvm/Transforms/Scalar.h>
40#include <llvm/Support/raw_ostream.h>
41#include <llvm/Analysis/DependenceAnalysis.h>
42#include <boost/container/flat_map.hpp>
43#include <queue>
44#include <unordered_map>
45#include <pablo/printer_pablos.h>
46#include <llvm/Analysis/PostDominators.h>
47
48using namespace pablo;
49using namespace UCD;
50using namespace cc;
51using namespace llvm;
52using namespace boost::container;
53
54enum IfHierarchy {DefaultIfHierarchy, NoIfHierarchy};
55
56static cl::opt<std::string>
57ObjectFilename("o", cl::desc("Output object filename"), cl::value_desc("filename"), cl::Required);
58
59static cl::opt<std::string>
60UCDSourcePath("dir", cl::desc("UCD source code directory"), cl::value_desc("directory"), cl::Required);
61
62static cl::opt<std::string>
63PrintLongestDependenceChain("ldc", cl::desc("print longest dependency chain metrics."), cl::value_desc("filename"));
64
65static cl::opt<IfHierarchy> IfHierarchyStrategy(cl::desc("If Hierarchy strategy:"),
66                                                cl::values(clEnumVal(DefaultIfHierarchy, "Default"),
67                                                           clEnumVal(NoIfHierarchy, "None"),
68                                                           clEnumValEnd));
69
70static cl::opt<bool> EnableReassociation("reassoc", cl::init(false),
71                                      cl::desc("Enable reassociation and distribution optimization of Boolean functions."), cl::Optional);
72
73
74static raw_fd_ostream * LongestDependenceChainFile = nullptr;
75
76#ifdef ENABLE_MULTIPLEXING
77static cl::opt<bool> EnableMultiplexing("multiplexing", cl::init(false),
78    cl::desc("combine Advances whose inputs are mutual exclusive into the fewest number of advances possible (expensive)."));
79
80static cl::opt<std::string>
81MultiplexingDistribution("multiplexing-dist",
82    cl::desc("Generate a CSV containing the # of Advances found in each UCD function before and after applying multiplexing."),
83    cl::value_desc("filename"));
84
85static raw_fd_ostream * MultiplexingDistributionFile = nullptr;
86#else
87const bool EnableMultiplexing = false;
88#endif
89
90using property_list = std::vector<std::string>;
91
92/** ------------------------------------------------------------------------------------------------------------- *
93 * @brief getNumOfAdvances
94 ** ------------------------------------------------------------------------------------------------------------- */
95unsigned getNumOfAdvances(const PabloBlock & entry) {
96    unsigned advances = 0;
97    for (const Statement * stmt : entry ) {
98        if (isa<Advance>(stmt)) {
99            ++advances;
100        }
101        else if (LLVM_UNLIKELY(isa<If>(stmt) || isa<While>(stmt))) {
102            advances += getNumOfAdvances(isa<If>(stmt) ? cast<If>(stmt)->getBody() : cast<While>(stmt)->getBody());
103        }
104    }
105    return advances;
106}
107
108/** ------------------------------------------------------------------------------------------------------------- *
109 * @brief computePabloDependencyMetrics
110 ** ------------------------------------------------------------------------------------------------------------- */
111unsigned computePabloDependencyChainMetrics(const PabloBlock & b, std::unordered_map<const PabloAST *, unsigned> & G) {
112    unsigned lpl = 0;
113    flat_map<const PabloAST *, unsigned> L;
114    for (const Statement * stmt : b) {
115        unsigned local_lpl = 0;
116        unsigned global_lpl = 0;
117        for (unsigned i = 0; i != stmt->getNumOperands(); ++i) {
118            const PabloAST * const op = stmt->getOperand(i);
119            if (isa<String>(op) || isa<Integer>(op)) {
120                continue;
121            }
122            const auto l = L.find(op);
123            if (l != L.end()) {
124                local_lpl = std::max<unsigned>(local_lpl, l->second);
125            }
126            const auto g = G.find(op);
127            if (LLVM_UNLIKELY(g == G.end())) {
128                throw std::runtime_error("Could not find dependency chain length for all operands!");
129            }
130            global_lpl = std::max<unsigned>(global_lpl, g->second);
131        }
132        L.emplace(stmt, local_lpl + 1);
133        G.insert(std::make_pair(stmt, global_lpl + 1));
134        if (LLVM_UNLIKELY(isa<If>(stmt) || isa<While>(stmt))) {
135            for (const auto & l : L) {
136                lpl = std::max(lpl, l.second);
137            }
138            L.clear();
139            lpl = std::max(lpl, computePabloDependencyChainMetrics(isa<If>(stmt) ? cast<If>(stmt)->getBody() : cast<While>(stmt)->getBody(), G));
140        }
141    }
142    return lpl;
143}
144
145/** ------------------------------------------------------------------------------------------------------------- *
146 * @brief computePabloDependencyMetrics
147 ** ------------------------------------------------------------------------------------------------------------- */
148std::pair<unsigned, unsigned> computePabloDependencyChainMetrics(const PabloFunction * f) {
149    std::unordered_map<const PabloAST *, unsigned> G;
150    G.insert(std::make_pair(PabloBlock::createZeroes(), 0));
151    G.insert(std::make_pair(PabloBlock::createOnes(), 0));
152    for (unsigned i = 0; i != f->getNumOfParameters(); ++i) {
153        G.insert(std::make_pair(f->getParameter(i), 0));
154    }
155    const unsigned local_lpl = computePabloDependencyChainMetrics(f->getEntryBlock(), G);
156    unsigned global_lpl = 0;
157    for (unsigned i = 0; i != f->getNumOfResults(); ++i) {
158        const auto e = G.find(f->getResult(i));
159        if (e == G.end()) {
160            throw std::runtime_error("No result computed!");
161        }
162        global_lpl = std::max<unsigned>(global_lpl, e->second);
163    }
164    return std::make_pair(global_lpl, local_lpl);
165}
166
167/** ------------------------------------------------------------------------------------------------------------- *
168 * @brief computeLLVMDependencyMetrics
169 ** ------------------------------------------------------------------------------------------------------------- */
170unsigned computeLLVMDependencyChainMetrics(const DomTreeNode * t, std::unordered_map<const Value *, unsigned> & G) {
171    unsigned lpl = 0;
172    if (true) {
173        flat_map<const Value *, unsigned> L;
174        const BasicBlock * b = t->getBlock();
175        for (auto itr = b->rbegin(); itr != b->rend(); ++itr) {
176            unsigned local_lpl = 0;
177            unsigned global_lpl = 0;
178            const Instruction & inst = *itr;
179            for (const Value * user : inst.users()) {
180                if (LLVM_LIKELY(isa<Instruction>(user))) {
181                    const auto l = L.find(user);
182                    if (l != L.end()) {
183                        local_lpl = std::max<unsigned>(local_lpl, l->second);
184                    }
185                    const auto g = G.find(user);
186                    if (LLVM_UNLIKELY(g == G.end())) {
187                        throw std::runtime_error("Could not find chain length for all users!");
188                    }
189                    global_lpl = std::max<unsigned>(global_lpl, g->second);
190                }
191            }
192            L.emplace(&inst, local_lpl + 1);
193            G.insert(std::make_pair(&inst, global_lpl + 1));
194            lpl = std::max(lpl, local_lpl + 1);
195        }
196    }
197    for (const DomTreeNode * pt : *t) {
198        lpl = std::max(lpl, computeLLVMDependencyChainMetrics(pt, G));
199    }
200    return lpl;
201}
202
203/** ------------------------------------------------------------------------------------------------------------- *
204 * @brief computeLLVMDependencyMetrics
205 ** ------------------------------------------------------------------------------------------------------------- */
206std::pair<unsigned, unsigned> computeLLVMDependencyChainMetrics(llvm::Function * f) {
207    std::unordered_map<const llvm::Value *, unsigned> G;
208
209    auto itr = f->getArgumentList().begin();
210    const Argument & input = *itr++;
211    const Argument & output = *itr;
212    for (const User * user : output.users()) {
213        G.insert(std::make_pair(user, 0));
214    }
215
216    PostDominatorTree dt;
217    dt.runOnFunction(*f);
218    const unsigned local_lpl = computeLLVMDependencyChainMetrics(dt.getRootNode(), G);
219    dt.releaseMemory();
220
221    unsigned global_lpl = 0;
222    for (const User * user : input.users()) {
223        const auto e = G.find(user);
224        if (e == G.end()) {
225            throw std::runtime_error("No result computed!");
226        }
227        global_lpl = std::max<unsigned>(global_lpl, e->second);
228    }
229    return std::make_pair(global_lpl, local_lpl);
230}
231
232/** ------------------------------------------------------------------------------------------------------------- *
233 * @brief compileUnicodeSet
234 ** ------------------------------------------------------------------------------------------------------------- */
235void compileUnicodeSet(std::string name, UnicodeSet && set, PabloCompiler & pc, Module * module) {
236    #ifdef ENABLE_MULTIPLEXING
237    if (MultiplexingDistributionFile) {
238        (*MultiplexingDistributionFile) << name;
239    }
240    #endif
241    if (LongestDependenceChainFile) {
242        (*LongestDependenceChainFile) << name;
243    }
244    #ifndef NDEBUG
245    std::cerr << name << std::endl;
246    #endif
247    PabloFunction * function = PabloFunction::Create(std::move(name), 8, 1);
248    Encoding encoding(Encoding::Type::UTF_8, 8);
249    CC_Compiler ccCompiler(*function, encoding);
250    UCDCompiler ucdCompiler(ccCompiler);
251    PabloBuilder builder(function->getEntryBlock());
252    // Build the unicode set function
253    PabloAST * result = nullptr;
254    if (IfHierarchyStrategy == IfHierarchy::DefaultIfHierarchy) {
255        result = ucdCompiler.generateWithDefaultIfHierarchy(&set, builder);
256    } else if (IfHierarchyStrategy == IfHierarchy::NoIfHierarchy) {
257        result = ucdCompiler.generateWithoutIfHierarchy(&set, builder);
258    } else {
259        throw std::runtime_error("Unknown if hierarchy strategy!");
260    }
261    function->setResult(0, builder.createAssign("matches", result));
262    // Optimize it at the pablo level
263    PabloVerifier::verify(*function, "creation");
264    Simplifier::optimize(*function);
265    CodeSinking::optimize(*function);
266    #ifdef ENABLE_MULTIPLEXING
267    BDDMinimizationPass::optimize(*function);
268    if (EnableMultiplexing) {
269        if (LongestDependenceChainFile) {
270            const auto pablo_metrix = computePabloDependencyChainMetrics(function);
271            (*LongestDependenceChainFile) << ',' << pablo_metrix.first << ',' << pablo_metrix.second;
272            Module module("tmp", getGlobalContext());
273            llvm::Function * func = pc.compile(function, &module);
274            const auto llvm_metrix = computeLLVMDependencyChainMetrics(func);
275            (*LongestDependenceChainFile) << ',' << llvm_metrix.first << ',' << llvm_metrix.second;
276        }
277
278        if (MultiplexingDistributionFile) {
279            (*MultiplexingDistributionFile) << ',' << getNumOfAdvances(function->getEntryBlock());
280        }
281        AutoMultiplexing::optimize(*function);
282        if (MultiplexingDistributionFile) {
283            (*MultiplexingDistributionFile) << ',' << getNumOfAdvances(function->getEntryBlock()) << '\n';
284        }
285    }
286    #endif
287    if (EnableReassociation) {
288        BooleanReassociationPass::optimize(*function);       
289    }
290
291    // Now compile the function ...
292    llvm::Function * func = pc.compile(function, module);
293    releaseSlabAllocatorMemory();
294
295    if (LongestDependenceChainFile) {
296        const auto pablo_metrix = computePabloDependencyChainMetrics(function);
297        (*LongestDependenceChainFile) << ',' << pablo_metrix.first << ',' << pablo_metrix.second;
298        const auto llvm_metrix = computeLLVMDependencyChainMetrics(func);
299        (*LongestDependenceChainFile) << ',' << llvm_metrix.first << ',' << llvm_metrix.second << '\n';
300    }
301
302}
303
304/** ------------------------------------------------------------------------------------------------------------- *
305 * @brief writePropertyInstaller
306 ** ------------------------------------------------------------------------------------------------------------- */
307
308void writePrecompiledProperties(property_list && properties) {
309
310    const std::string headerFilename = UCDSourcePath + "/precompiled_properties.h";
311    #ifdef USE_LLVM_3_5
312    std::string error;
313    raw_fd_ostream header(headerFilename.c_str(), error, sys::fs::F_None);
314    if (!error.empty()) {
315        throw std::runtime_error(error);
316    }
317    #else
318    std::error_code error;
319    raw_fd_ostream header(headerFilename, error, sys::fs::F_None);
320    if (error) {
321        throw std::runtime_error(error.message());
322    }
323    #endif
324
325    header << "#ifndef PRECOMPILED_PROPERTIES\n";
326    header << "#define PRECOMPILED_PROPERTIES\n\n";
327    header << "#include <string>\n\n";
328    header << "#include <tuple>\n";
329    header << "namespace UCD {\n\n";
330    header << "using ExternalProperty = std::tuple<void *, unsigned, unsigned>;\n\n";
331    header << "const ExternalProperty & resolveExternalProperty(const std::string & name);\n\n";
332    header << "}\n\n";
333    header << "#endif\n";
334    header.close();
335
336    const std::string cppFilename = UCDSourcePath + "/precompiled_properties.cpp";
337    #ifdef USE_LLVM_3_5
338    raw_fd_ostream cpp(cppFilename.c_str(), error, sys::fs::F_None);
339    if (!error.empty()) {
340        throw std::runtime_error(error);
341    }
342    #else
343    raw_fd_ostream cpp(cppFilename, error, sys::fs::F_None);
344    if (error) {
345        throw std::runtime_error(error.message());
346    }
347    #endif
348
349    cpp << "#include \"precompiled_properties.h\"\n";
350    cpp << "#include <include/simd-lib/bitblock.hpp>\n";
351    cpp << "#include <stdexcept>\n";
352    cpp << "#include <unordered_map>\n\n";
353    cpp << "namespace UCD {\nnamespace {\n\n";
354    cpp << "struct Input {\n    BitBlock bit[8];\n};\n\n";
355    cpp << "struct Output {\n    BitBlock bit[1];\n};\n\n";
356    for (auto prop : properties) {
357        cpp << "extern \"C\" void " + prop + "(const Input &, Output &);\n";
358    }
359
360    cpp << "\nconst static std::unordered_map<std::string, ExternalProperty> EXTERNAL_UCD_PROPERTY_MAP = {\n";
361    for (auto itr = properties.begin(); itr != properties.end(); ) {
362        cpp << "    {\"" + *itr + "\", std::make_tuple(reinterpret_cast<void *>(&" + *itr + "), 8, 1)}";
363        if (++itr != properties.end()) {
364            cpp << ",";
365        }
366        cpp << "\n";
367    }
368    cpp << "};\n\n} // end of anonymous namespace\n\n";
369
370    cpp << "const ExternalProperty & resolveExternalProperty(const std::string & name) {\n";
371    cpp << "    auto f = EXTERNAL_UCD_PROPERTY_MAP.find(name);\n";
372    cpp << "    if (f == EXTERNAL_UCD_PROPERTY_MAP.end())\n";
373    cpp << "        throw std::runtime_error(\"No external property named \\\"\" + name + \"\\\" found!\");\n";
374    cpp << "    return f->second;\n";
375    cpp << "}\n\n} // end of UCD namespace\n";
376
377    cpp.close();
378
379}
380
381/** ------------------------------------------------------------------------------------------------------------- *
382 * @brief generateUCDModule
383 ** ------------------------------------------------------------------------------------------------------------- */
384Module * generateUCDModule() {
385
386    property_list properties;
387
388    PabloCompiler pc;
389    Module * module = new Module("ucd", getGlobalContext());
390    for (PropertyObject * obj : property_object_table) {
391        if (EnumeratedPropertyObject * enumObj = dyn_cast<EnumeratedPropertyObject>(obj)) {
392            for (const std::string value : *enumObj) {
393                UnicodeSet set = enumObj->GetCodepointSet(canonicalize_value_name(value));
394                std::string name = "__get_" + property_enum_name[enumObj->getPropertyCode()] + "_" + value;
395                compileUnicodeSet(name, std::move(set), pc, module);
396                properties.emplace_back(name);
397            }
398        }
399        else if (ExtensionPropertyObject * extObj = dyn_cast<ExtensionPropertyObject>(obj)) {
400            for (const std::string value : *extObj) {
401                UnicodeSet set = extObj->GetCodepointSet(canonicalize_value_name(value));
402                std::string name = "__get_" + property_enum_name[extObj->getPropertyCode()] + "_" + value;
403                compileUnicodeSet(name, std::move(set), pc, module);
404                properties.emplace_back(name);
405            }
406        }
407        else if (BinaryPropertyObject * binObj = dyn_cast<BinaryPropertyObject>(obj)) {
408            UnicodeSet set = binObj->GetCodepointSet(Binary_ns::Y);
409            std::string name = "__get_" + property_enum_name[binObj->getPropertyCode()] + "_Y";
410            compileUnicodeSet(name, std::move(set), pc, module);
411            properties.emplace_back(name);
412        }
413    }
414
415    // Print an error message if our module is malformed in any way.
416    verifyModule(*module, &dbgs());
417
418    writePrecompiledProperties(std::move(properties));
419
420    return module;
421}
422
423/** ------------------------------------------------------------------------------------------------------------- *
424 * @brief compileUCDModule
425 ** ------------------------------------------------------------------------------------------------------------- */
426void compileUCDModule(Module * module) {
427    Triple TheTriple;
428
429    TheTriple.setTriple(sys::getDefaultTargetTriple());
430
431    // Get the target specific parser.
432    std::string msg;
433    const Target * TheTarget = TargetRegistry::lookupTarget(TheTriple.getTriple(), msg);
434    if (TheTarget == nullptr) {
435        throw std::runtime_error(msg);
436    }
437
438    TargetOptions Options;
439
440    std::unique_ptr<TargetMachine> Target(
441                TheTarget->createTargetMachine(TheTriple.getTriple(), sys::getHostCPUName(), "", Options,
442                                               Reloc::Default, CodeModel::Small, CodeGenOpt::Aggressive));
443
444    if (Target == nullptr) {
445        throw std::runtime_error("Could not allocate target machine!");
446    }
447
448    #ifdef USE_LLVM_3_5
449    std::string error;
450    std::unique_ptr<tool_output_file> out = make_unique<tool_output_file>(ObjectFilename.c_str(), error, sys::fs::F_None);
451    if (!error.empty()) {
452        throw std::runtime_error(error);
453    }
454    #else
455    std::error_code error;
456    std::unique_ptr<tool_output_file> out = make_unique<tool_output_file>(ObjectFilename, error, sys::fs::F_None);
457    if (error) {
458        throw std::runtime_error(error.message());
459    }
460    #endif
461
462    // Build up all of the passes that we want to do to the module.
463    PassManager PM;
464
465    // Add an appropriate TargetLibraryInfo pass for the module's triple.
466    PM.add(new TargetLibraryInfo(TheTriple));
467
468    // Add the target data from the target machine, if it exists, or the module.
469    #ifdef USE_LLVM_3_5
470    const DataLayout * DL = Target->getDataLayout();
471    #else
472    const DataLayout * DL = Target->getSubtargetImpl()->getDataLayout();
473    #endif
474    if (DL) {
475        module->setDataLayout(DL);
476    }
477    #ifdef USE_LLVM_3_5
478    PM.add(new DataLayoutPass(module));
479    #else
480    PM.add(new DataLayoutPass());
481    #endif   
482    PM.add(createReassociatePass());
483    PM.add(createInstructionCombiningPass());
484    PM.add(createSinkingPass());
485
486    formatted_raw_ostream outStream(out->os());
487    // Ask the target to add backend passes as necessary.
488    if (Target->addPassesToEmitFile(PM, outStream, TargetMachine::CGFT_ObjectFile)) {
489        throw std::runtime_error("Target does not support generation of object file type!\n");
490    }
491
492    PM.run(*module);
493
494
495    out->keep();
496}
497
498/** ------------------------------------------------------------------------------------------------------------- *
499 * @brief main
500 ** ------------------------------------------------------------------------------------------------------------- */
501int main(int argc, char *argv[]) {
502    // Initialize targets first, so that --version shows registered targets.
503    InitializeAllTargets();
504    InitializeAllTargetMCs();
505    InitializeAllAsmPrinters();
506    InitializeAllAsmParsers();
507    cl::ParseCommandLineOptions(argc, argv, "UCD Compiler\n");
508
509
510    #ifdef ENABLE_MULTIPLEXING
511    if (MultiplexingDistribution.length() > 0) {
512        #ifdef USE_LLVM_3_5
513        std::string error;
514        MultiplexingDistributionFile = new raw_fd_ostream(MultiplexingDistribution.c_str(), error, sys::fs::F_Text);
515        if (!error.empty()) {
516            throw std::runtime_error(error);
517        }
518        #else
519        std::error_code error;
520        MultiplexingDistributionFile = new raw_fd_ostream(MultiplexingDistribution, error, sys::fs::F_Text);
521        if (error) {
522            throw std::runtime_error(error.message());
523        }
524        #endif
525    }
526    #endif
527
528    if (PrintLongestDependenceChain.length() > 0) {
529        #ifdef USE_LLVM_3_5
530        std::string error;
531        LongestDependenceChainFile = new raw_fd_ostream(PrintLongestDependenceChain.c_str(), error, sys::fs::F_Text);
532        if (!error.empty()) {
533            throw std::runtime_error(error);
534        }
535        #else
536        std::error_code error;
537        LongestDependenceChainFile = new raw_fd_ostream(PrintLongestDependenceChain, error, sys::fs::F_Text);
538        if (error) {
539            throw std::runtime_error(error.message());
540        }
541        #endif
542
543        if (LongestDependenceChainFile) {
544            if (EnableMultiplexing) {
545                (*LongestDependenceChainFile) << ",Pre-Multiplexing,,,,Post-Multiplexing\n";
546            }
547            (*LongestDependenceChainFile) << ",Pablo,,LLVM,";
548            if (EnableMultiplexing) {
549                (*LongestDependenceChainFile) << ",Pablo,,LLVM,";
550            }
551            (*LongestDependenceChainFile) << "\nName,Global,Max Local,Global,Max Local";
552            if (EnableMultiplexing) {
553                (*LongestDependenceChainFile) << ",Global,Max Local,Global,Max Local";
554            }
555            (*LongestDependenceChainFile) << "\n";
556        }
557    }
558
559    Module * module = generateUCDModule();
560    #ifdef ENABLE_MULTIPLEXING
561    if (MultiplexingDistributionFile) {
562        MultiplexingDistributionFile->close();
563        delete MultiplexingDistributionFile;
564    }   
565    #endif
566    if (LongestDependenceChainFile) {
567        LongestDependenceChainFile->close();
568        delete LongestDependenceChainFile;
569    }
570    compileUCDModule(module);
571    return 0;
572}
Note: See TracBrowser for help on using the repository browser.