3. 万花筒:代码生成到 LLVM IR

3.1. 第 3 章 简介

欢迎来到“使用 LLVM 实现语言”教程的第 3 章。本章将向您展示如何将第 2 章中构建的抽象语法树转换为 LLVM IR。这将使您对 LLVM 的工作原理有所了解,并展示其易用性。构建词法分析器和解析器比生成 LLVM IR 代码要复杂得多。 :)

请注意:本章及以后的代码需要 LLVM 3.7 或更高版本。LLVM 3.6 及更早版本无法使用它。另请注意,您需要使用与您的 LLVM 版本匹配的本教程版本:如果您使用的是官方 LLVM 版本,请使用随您的版本一起提供的或在llvm.org 发布页面上的文档版本。

3.2. 代码生成设置

为了生成 LLVM IR,我们需要一些简单的设置来开始。首先,我们在每个 AST 类中定义虚拟代码生成 (codegen) 方法

/// ExprAST - Base class for all expression nodes.
class ExprAST {
public:
  virtual ~ExprAST() = default;
  virtual Value *codegen() = 0;
};

/// NumberExprAST - Expression class for numeric literals like "1.0".
class NumberExprAST : public ExprAST {
  double Val;

public:
  NumberExprAST(double Val) : Val(Val) {}
  Value *codegen() override;
};
...

codegen() 方法表示为该 AST 节点发出 IR 以及它所依赖的所有内容,它们都返回一个 LLVM Value 对象。“Value”是用于表示 LLVM 中“静态单赋值 (SSA)寄存器”或“SSA 值”的类。SSA 值最显著的特点是其值在相关指令执行时计算,并且在指令重新执行之前(以及如果重新执行)不会获得新值。换句话说,无法“更改”SSA 值。有关更多信息,请阅读静态单赋值 - 一旦您理解了这些概念,它们实际上就非常自然了。

请注意,除了向 ExprAST 类层次结构添加虚拟方法外,使用访问者模式或其他一些方法来建模这一点也可能很有意义。同样,本教程不会详细介绍良好的软件工程实践:出于我们的目的,添加虚拟方法最简单。

我们想要的第二件事是类似于我们用于解析器的“LogError”方法,它将用于报告在代码生成期间发现的错误(例如,使用未声明的参数)

static std::unique_ptr<LLVMContext> TheContext;
static std::unique_ptr<IRBuilder<>> Builder(TheContext);
static std::unique_ptr<Module> TheModule;
static std::map<std::string, Value *> NamedValues;

Value *LogErrorV(const char *Str) {
  LogError(Str);
  return nullptr;
}

静态变量将在代码生成期间使用。TheContext 是一个不透明对象,它拥有许多核心 LLVM 数据结构,例如类型和常量值表。我们不需要详细了解它,只需要一个实例传递给需要它的 API。

Builder 对象是一个辅助对象,它使生成 LLVM 指令变得容易。IRBuilder 类模板的实例跟踪当前插入指令的位置,并具有创建新指令的方法。

TheModule 是一个 LLVM 结构,包含函数和全局变量。在许多方面,它是 LLVM IR 用于包含代码的顶级结构。它将拥有我们生成的所有 IR 的内存,这就是为什么 codegen() 方法返回原始 Value* 而不是 unique_ptr<Value> 的原因。

NamedValues 映射跟踪当前作用域中定义了哪些值以及它们的 LLVM 表示是什么。(换句话说,它是代码的符号表)。在此形式的万花筒中,唯一可以引用的内容是函数参数。因此,在为其函数体生成代码时,函数参数将在此映射中。

有了这些基础,我们就可以开始讨论如何为每个表达式生成代码了。请注意,这假设Builder 已设置为生成某个内容中的代码。目前,我们将假设这已经完成,并且我们将只使用它来发出代码。

3.3. 表达式代码生成

为表达式节点生成 LLVM 代码非常简单:所有四个表达式节点的注释代码不到 45 行。首先,我们将处理数字文字

Value *NumberExprAST::codegen() {
  return ConstantFP::get(*TheContext, APFloat(Val));
}

在 LLVM IR 中,数值常量由ConstantFP 类表示,该类在内部保存APFloat 中的数值(APFloat 能够保存任意精度的浮点常量)。此代码基本上只是创建并返回一个ConstantFP。请注意,在 LLVM IR 中,所有常量都将唯一地组合在一起并共享。因此,API 使用“foo::get(…)”惯用法而不是“new foo(..)”或“foo::Create(..)”。

Value *VariableExprAST::codegen() {
  // Look this variable up in the function.
  Value *V = NamedValues[Name];
  if (!V)
    LogErrorV("Unknown variable name");
  return V;
}

使用 LLVM 对变量的引用也很简单。在万花筒的简单版本中,我们假设变量已经在某个地方发出,并且其值可用。实际上,唯一可能在NamedValues 映射中的值是函数参数。此代码简单地检查指定的名称是否在映射中(如果不在,则正在引用未知变量),并返回其值。在后面的章节中,我们将向符号表中添加对循环归纳变量的支持,以及对局部变量的支持。

Value *BinaryExprAST::codegen() {
  Value *L = LHS->codegen();
  Value *R = RHS->codegen();
  if (!L || !R)
    return nullptr;

  switch (Op) {
  case '+':
    return Builder->CreateFAdd(L, R, "addtmp");
  case '-':
    return Builder->CreateFSub(L, R, "subtmp");
  case '*':
    return Builder->CreateFMul(L, R, "multmp");
  case '<':
    L = Builder->CreateFCmpULT(L, R, "cmptmp");
    // Convert bool 0/1 to double 0.0 or 1.0
    return Builder->CreateUIToFP(L, Type::getDoubleTy(TheContext),
                                 "booltmp");
  default:
    return LogErrorV("invalid binary operator");
  }
}

二元运算符开始变得更有意思。这里的基本思想是我们递归地为表达式的左侧发出代码,然后是右侧,然后我们计算二元表达式的结果。在此代码中,我们对操作码执行简单的切换以创建正确的 LLVM 指令。

在上面的示例中,LLVM 构建器类开始显示其价值。IRBuilder 知道在哪里插入新创建的指令,您只需指定要创建哪个指令(例如,使用CreateFAdd),使用哪些操作数(此处为LR),并可以选择为生成的指令提供名称。

LLVM 的一个优点是名称只是一个提示。例如,如果上面的代码发出多个“addtmp”变量,LLVM 将自动为每个变量提供一个递增的唯一数字后缀。指令的局部值名称是完全可选的,但它使读取 IR 转储变得容易得多。

LLVM 指令 受严格规则的约束:例如,加法指令的左操作数和右操作数必须具有相同的类型,并且加法的结果类型必须与操作数类型匹配。因为万花筒中的所有值都是双精度数,所以这使得加法、减法和乘法的代码非常简单。

另一方面,LLVM 指定fcmp 指令 始终返回一个“i1”值(一个一位整数)。问题在于万花筒希望该值为 0.0 或 1.0 值。为了获得这些语义,我们将 fcmp 指令与uitofp 指令结合起来。此指令通过将输入视为无符号值将其输入整数转换为浮点值。相反,如果我们使用sitofp 指令,则万花筒“<”运算符将返回 0.0 和 -1.0,具体取决于输入值。

Value *CallExprAST::codegen() {
  // Look up the name in the global module table.
  Function *CalleeF = TheModule->getFunction(Callee);
  if (!CalleeF)
    return LogErrorV("Unknown function referenced");

  // If argument mismatch error.
  if (CalleeF->arg_size() != Args.size())
    return LogErrorV("Incorrect # arguments passed");

  std::vector<Value *> ArgsV;
  for (unsigned i = 0, e = Args.size(); i != e; ++i) {
    ArgsV.push_back(Args[i]->codegen());
    if (!ArgsV.back())
      return nullptr;
  }

  return Builder->CreateCall(CalleeF, ArgsV, "calltmp");
}

函数调用的代码生成使用 LLVM 非常简单。上面的代码最初在 LLVM 模块的符号表中进行函数名称查找。回想一下,LLVM 模块是保存我们正在 JIT 的函数的容器。通过为每个函数提供与用户指定的相同的名称,我们可以使用 LLVM 符号表为我们解析函数名称。

一旦我们有了要调用的函数,我们就会递归地为要传入的每个参数生成代码,并创建一个 LLVM 调用指令。请注意,LLVM 默认使用本机 C 调用约定,允许这些调用也调用标准库函数(如“sin”和“cos”),而无需任何额外工作。

这结束了我们对万花筒中迄今为止的四个基本表达式的处理。随意添加更多。例如,通过浏览LLVM 语言参考,您会发现一些其他有趣的指令,这些指令非常容易插入到我们的基本框架中。

3.4. 函数代码生成

原型和函数的代码生成必须处理许多细节,这使得它们的代码不如表达式代码生成美观,但使我们能够说明一些要点。首先,让我们讨论原型代码的生成:它们既用于函数体也用于外部函数声明。代码以以下内容开头

Function *PrototypeAST::codegen() {
  // Make the function type:  double(double,double) etc.
  std::vector<Type*> Doubles(Args.size(),
                             Type::getDoubleTy(*TheContext));
  FunctionType *FT =
    FunctionType::get(Type::getDoubleTy(*TheContext), Doubles, false);

  Function *F =
    Function::Create(FT, Function::ExternalLinkage, Name, TheModule.get());

此代码在几行代码中包含了强大的功能。首先请注意,此函数返回“Function*”而不是“Value*”。因为“原型”实际上谈论的是函数的外部接口(而不是表达式计算的值),所以它在代码生成时返回它对应的 LLVM 函数是有意义的。

FunctionType::get 的调用创建了应用于给定原型的FunctionType。由于万花筒中的所有函数参数都是双精度数,因此第一行创建了一个“N”个 LLVM 双精度数类型的向量。然后,它使用Functiontype::get 方法创建一个函数类型,该类型将“N”个双精度数作为参数,返回一个双精度数作为结果,并且不是可变参数(false 参数表示这一点)。请注意,LLVM 中的类型就像常量一样是唯一的,因此您不会“新建”类型,而是“获取”类型。

上面最后一行实际上创建了与原型对应的 IR 函数。这指示了要使用的类型、链接和名称,以及要插入哪个模块。“外部链接”表示该函数可以在当前模块之外定义和/或可被模块外部的函数调用。传递的名称是用户指定的名称:由于指定了“TheModule”,因此此名称将在“TheModule”的符号表中注册。

// Set names for all arguments.
unsigned Idx = 0;
for (auto &Arg : F->args())
  Arg.setName(Args[Idx++]);

return F;

最后,我们根据原型中给出的名称设置每个函数参数的名称。此步骤并非严格必要,但保持名称一致可以使 IR 更具可读性,并允许后续代码直接引用参数的名称,而不是必须在原型 AST 中查找它们。

此时我们有一个没有函数体的函数原型。这就是 LLVM IR 表示函数声明的方式。对于 Kaleidoscope 中的 extern 语句,到这里就足够了。但是对于函数定义,我们需要生成代码并附加函数体。

Function *FunctionAST::codegen() {
    // First, check for an existing function from a previous 'extern' declaration.
  Function *TheFunction = TheModule->getFunction(Proto->getName());

  if (!TheFunction)
    TheFunction = Proto->codegen();

  if (!TheFunction)
    return nullptr;

  if (!TheFunction->empty())
    return (Function*)LogErrorV("Function cannot be redefined.");

对于函数定义,我们首先在 TheModule 的符号表中搜索此函数的现有版本,以防它已经使用 ‘extern’ 语句创建。如果 Module::getFunction 返回 null,则表示不存在以前的版本,因此我们将根据原型生成一个。在任何一种情况下,我们都希望在开始之前断言该函数为空(即还没有函数体)。

// Create a new basic block to start insertion into.
BasicBlock *BB = BasicBlock::Create(*TheContext, "entry", TheFunction);
Builder->SetInsertPoint(BB);

// Record the function arguments in the NamedValues map.
NamedValues.clear();
for (auto &Arg : TheFunction->args())
  NamedValues[std::string(Arg.getName())] = &Arg;

现在我们到了设置 Builder 的地方。第一行创建一个新的基本块(名为“entry”),它被插入到 TheFunction 中。第二行然后告诉构建器应将新指令插入到新基本块的末尾。LLVM 中的基本块是定义控制流图的函数的重要组成部分。由于我们没有任何控制流,因此我们的函数此时只会包含一个块。我们将在第 5 章中修复此问题 :)。

接下来,我们将函数参数添加到 NamedValues 映射中(首先将其清空),以便它们可供 VariableExprAST 节点访问。

if (Value *RetVal = Body->codegen()) {
  // Finish off the function.
  Builder->CreateRet(RetVal);

  // Validate the generated code, checking for consistency.
  verifyFunction(*TheFunction);

  return TheFunction;
}

设置插入点并填充 NamedValues 映射后,我们调用函数根表达式的 codegen() 方法。如果没有发生错误,这将发出代码以将表达式计算到入口块中并返回计算出的值。假设没有错误,然后我们创建一个 LLVM ret 指令,它完成了函数。构建函数后,我们调用 LLVM 提供的 verifyFunction。此函数对生成的代码执行各种一致性检查,以确定我们的编译器是否一切正常。使用此功能非常重要:它可以捕获许多错误。函数完成并验证后,我们将其返回。

  // Error reading body, remove function.
  TheFunction->eraseFromParent();
  return nullptr;
}

这里唯一剩下的部分是错误情况的处理。为简单起见,我们通过使用 eraseFromParent 方法简单地删除我们生成的函数来处理此问题。这允许用户重新定义他们之前输入错误的函数:如果我们不删除它,它将保留在符号表中,并带有函数体,从而阻止将来重新定义。

但是,此代码确实存在一个错误:如果 FunctionAST::codegen() 方法找到现有的 IR 函数,则它不会根据定义自己的原型验证其签名。这意味着较早的 ‘extern’ 声明将优先于函数定义的签名,这可能导致代码生成失败,例如,如果函数参数的命名不同。有多种方法可以修复此错误,看看你能想出什么!这是一个测试用例

extern foo(a);     # ok, defines foo.
def foo(b) b;      # Error: Unknown variable name. (decl using 'a' takes precedence).

3.5. 驱动程序更改和结束语

目前,LLVM 的代码生成并没有真正给我们带来太多好处,除了我们可以查看漂亮的 IR 调用之外。示例代码将对 codegen 的调用插入到“HandleDefinition”、“HandleExtern”等函数中,然后转储 LLVM IR。这提供了一种查看简单函数的 LLVM IR 的好方法。例如

ready> 4+5;
Read top-level expression:
define double @0() {
entry:
  ret double 9.000000e+00
}

请注意,解析器如何将顶层表达式转换为匿名函数。当我们在下一章中添加JIT 支持时,这将非常方便。另请注意,代码被非常逐字地转录,除了 IRBuilder 执行的简单常量折叠外,没有执行任何优化。我们将在下一章中显式添加优化

ready> def foo(a b) a*a + 2*a*b + b*b;
Read function definition:
define double @foo(double %a, double %b) {
entry:
  %multmp = fmul double %a, %a
  %multmp1 = fmul double 2.000000e+00, %a
  %multmp2 = fmul double %multmp1, %b
  %addtmp = fadd double %multmp, %multmp2
  %multmp3 = fmul double %b, %b
  %addtmp4 = fadd double %addtmp, %multmp3
  ret double %addtmp4
}

这显示了一些简单的算术运算。注意它与我们用来创建指令的 LLVM 构建器调用的惊人相似之处。

ready> def bar(a) foo(a, 4.0) + bar(31337);
Read function definition:
define double @bar(double %a) {
entry:
  %calltmp = call double @foo(double %a, double 4.000000e+00)
  %calltmp1 = call double @bar(double 3.133700e+04)
  %addtmp = fadd double %calltmp, %calltmp1
  ret double %addtmp
}

这显示了一些函数调用。请注意,如果您调用此函数,它将需要很长时间才能执行。将来,我们将添加条件控制流以使递归真正有用 :)。

ready> extern cos(x);
Read extern:
declare double @cos(double)

ready> cos(1.234);
Read top-level expression:
define double @1() {
entry:
  %calltmp = call double @cos(double 1.234000e+00)
  ret double %calltmp
}

这显示了 libm “cos” 函数的 extern,以及对它的调用。

ready> ^D
; ModuleID = 'my cool jit'

define double @0() {
entry:
  %addtmp = fadd double 4.000000e+00, 5.000000e+00
  ret double %addtmp
}

define double @foo(double %a, double %b) {
entry:
  %multmp = fmul double %a, %a
  %multmp1 = fmul double 2.000000e+00, %a
  %multmp2 = fmul double %multmp1, %b
  %addtmp = fadd double %multmp, %multmp2
  %multmp3 = fmul double %b, %b
  %addtmp4 = fadd double %addtmp, %multmp3
  ret double %addtmp4
}

define double @bar(double %a) {
entry:
  %calltmp = call double @foo(double %a, double 4.000000e+00)
  %calltmp1 = call double @bar(double 3.133700e+04)
  %addtmp = fadd double %calltmp, %calltmp1
  ret double %addtmp
}

declare double @cos(double)

define double @1() {
entry:
  %calltmp = call double @cos(double 1.234000e+00)
  ret double %calltmp
}

退出当前演示(通过在 Linux 上发送 CTRL+D 或在 Windows 上发送 CTRL+Z 和 ENTER 来发送 EOF)时,它会转储生成的整个模块的 IR。在这里,您可以看到包含所有函数相互引用的全局图。

这总结了 Kaleidoscope 教程的第三章。接下来,我们将介绍如何添加 JIT 代码生成和优化器支持,以便我们实际上可以开始运行代码!

3.6. 完整代码清单

这是我们正在运行的示例的完整代码清单,并增强了 LLVM 代码生成器。因为这使用了 LLVM 库,所以我们需要将它们链接进来。为此,我们使用llvm-config工具来告知我们的 makefile/命令行要使用哪些选项

# Compile
clang++ -g -O3 toy.cpp `llvm-config --cxxflags --ldflags --system-libs --libs core` -o toy
# Run
./toy

以下是代码

#include "llvm/ADT/APFloat.h"
#include "llvm/ADT/STLExtras.h"
#include "llvm/IR/BasicBlock.h"
#include "llvm/IR/Constants.h"
#include "llvm/IR/DerivedTypes.h"
#include "llvm/IR/Function.h"
#include "llvm/IR/IRBuilder.h"
#include "llvm/IR/LLVMContext.h"
#include "llvm/IR/Module.h"
#include "llvm/IR/Type.h"
#include "llvm/IR/Verifier.h"
#include <algorithm>
#include <cctype>
#include <cstdio>
#include <cstdlib>
#include <map>
#include <memory>
#include <string>
#include <vector>

using namespace llvm;

//===----------------------------------------------------------------------===//
// Lexer
//===----------------------------------------------------------------------===//

// The lexer returns tokens [0-255] if it is an unknown character, otherwise one
// of these for known things.
enum Token {
  tok_eof = -1,

  // commands
  tok_def = -2,
  tok_extern = -3,

  // primary
  tok_identifier = -4,
  tok_number = -5
};

static std::string IdentifierStr; // Filled in if tok_identifier
static double NumVal;             // Filled in if tok_number

/// gettok - Return the next token from standard input.
static int gettok() {
  static int LastChar = ' ';

  // Skip any whitespace.
  while (isspace(LastChar))
    LastChar = getchar();

  if (isalpha(LastChar)) { // identifier: [a-zA-Z][a-zA-Z0-9]*
    IdentifierStr = LastChar;
    while (isalnum((LastChar = getchar())))
      IdentifierStr += LastChar;

    if (IdentifierStr == "def")
      return tok_def;
    if (IdentifierStr == "extern")
      return tok_extern;
    return tok_identifier;
  }

  if (isdigit(LastChar) || LastChar == '.') { // Number: [0-9.]+
    std::string NumStr;
    do {
      NumStr += LastChar;
      LastChar = getchar();
    } while (isdigit(LastChar) || LastChar == '.');

    NumVal = strtod(NumStr.c_str(), nullptr);
    return tok_number;
  }

  if (LastChar == '#') {
    // Comment until end of line.
    do
      LastChar = getchar();
    while (LastChar != EOF && LastChar != '\n' && LastChar != '\r');

    if (LastChar != EOF)
      return gettok();
  }

  // Check for end of file.  Don't eat the EOF.
  if (LastChar == EOF)
    return tok_eof;

  // Otherwise, just return the character as its ascii value.
  int ThisChar = LastChar;
  LastChar = getchar();
  return ThisChar;
}

//===----------------------------------------------------------------------===//
// Abstract Syntax Tree (aka Parse Tree)
//===----------------------------------------------------------------------===//

namespace {

/// ExprAST - Base class for all expression nodes.
class ExprAST {
public:
  virtual ~ExprAST() = default;

  virtual Value *codegen() = 0;
};

/// NumberExprAST - Expression class for numeric literals like "1.0".
class NumberExprAST : public ExprAST {
  double Val;

public:
  NumberExprAST(double Val) : Val(Val) {}

  Value *codegen() override;
};

/// VariableExprAST - Expression class for referencing a variable, like "a".
class VariableExprAST : public ExprAST {
  std::string Name;

public:
  VariableExprAST(const std::string &Name) : Name(Name) {}

  Value *codegen() override;
};

/// BinaryExprAST - Expression class for a binary operator.
class BinaryExprAST : public ExprAST {
  char Op;
  std::unique_ptr<ExprAST> LHS, RHS;

public:
  BinaryExprAST(char Op, std::unique_ptr<ExprAST> LHS,
                std::unique_ptr<ExprAST> RHS)
      : Op(Op), LHS(std::move(LHS)), RHS(std::move(RHS)) {}

  Value *codegen() override;
};

/// CallExprAST - Expression class for function calls.
class CallExprAST : public ExprAST {
  std::string Callee;
  std::vector<std::unique_ptr<ExprAST>> Args;

public:
  CallExprAST(const std::string &Callee,
              std::vector<std::unique_ptr<ExprAST>> Args)
      : Callee(Callee), Args(std::move(Args)) {}

  Value *codegen() override;
};

/// PrototypeAST - This class represents the "prototype" for a function,
/// which captures its name, and its argument names (thus implicitly the number
/// of arguments the function takes).
class PrototypeAST {
  std::string Name;
  std::vector<std::string> Args;

public:
  PrototypeAST(const std::string &Name, std::vector<std::string> Args)
      : Name(Name), Args(std::move(Args)) {}

  Function *codegen();
  const std::string &getName() const { return Name; }
};

/// FunctionAST - This class represents a function definition itself.
class FunctionAST {
  std::unique_ptr<PrototypeAST> Proto;
  std::unique_ptr<ExprAST> Body;

public:
  FunctionAST(std::unique_ptr<PrototypeAST> Proto,
              std::unique_ptr<ExprAST> Body)
      : Proto(std::move(Proto)), Body(std::move(Body)) {}

  Function *codegen();
};

} // end anonymous namespace

//===----------------------------------------------------------------------===//
// Parser
//===----------------------------------------------------------------------===//

/// CurTok/getNextToken - Provide a simple token buffer.  CurTok is the current
/// token the parser is looking at.  getNextToken reads another token from the
/// lexer and updates CurTok with its results.
static int CurTok;
static int getNextToken() { return CurTok = gettok(); }

/// BinopPrecedence - This holds the precedence for each binary operator that is
/// defined.
static std::map<char, int> BinopPrecedence;

/// GetTokPrecedence - Get the precedence of the pending binary operator token.
static int GetTokPrecedence() {
  if (!isascii(CurTok))
    return -1;

  // Make sure it's a declared binop.
  int TokPrec = BinopPrecedence[CurTok];
  if (TokPrec <= 0)
    return -1;
  return TokPrec;
}

/// LogError* - These are little helper functions for error handling.
std::unique_ptr<ExprAST> LogError(const char *Str) {
  fprintf(stderr, "Error: %s\n", Str);
  return nullptr;
}

std::unique_ptr<PrototypeAST> LogErrorP(const char *Str) {
  LogError(Str);
  return nullptr;
}

static std::unique_ptr<ExprAST> ParseExpression();

/// numberexpr ::= number
static std::unique_ptr<ExprAST> ParseNumberExpr() {
  auto Result = std::make_unique<NumberExprAST>(NumVal);
  getNextToken(); // consume the number
  return std::move(Result);
}

/// parenexpr ::= '(' expression ')'
static std::unique_ptr<ExprAST> ParseParenExpr() {
  getNextToken(); // eat (.
  auto V = ParseExpression();
  if (!V)
    return nullptr;

  if (CurTok != ')')
    return LogError("expected ')'");
  getNextToken(); // eat ).
  return V;
}

/// identifierexpr
///   ::= identifier
///   ::= identifier '(' expression* ')'
static std::unique_ptr<ExprAST> ParseIdentifierExpr() {
  std::string IdName = IdentifierStr;

  getNextToken(); // eat identifier.

  if (CurTok != '(') // Simple variable ref.
    return std::make_unique<VariableExprAST>(IdName);

  // Call.
  getNextToken(); // eat (
  std::vector<std::unique_ptr<ExprAST>> Args;
  if (CurTok != ')') {
    while (true) {
      if (auto Arg = ParseExpression())
        Args.push_back(std::move(Arg));
      else
        return nullptr;

      if (CurTok == ')')
        break;

      if (CurTok != ',')
        return LogError("Expected ')' or ',' in argument list");
      getNextToken();
    }
  }

  // Eat the ')'.
  getNextToken();

  return std::make_unique<CallExprAST>(IdName, std::move(Args));
}

/// primary
///   ::= identifierexpr
///   ::= numberexpr
///   ::= parenexpr
static std::unique_ptr<ExprAST> ParsePrimary() {
  switch (CurTok) {
  default:
    return LogError("unknown token when expecting an expression");
  case tok_identifier:
    return ParseIdentifierExpr();
  case tok_number:
    return ParseNumberExpr();
  case '(':
    return ParseParenExpr();
  }
}

/// binoprhs
///   ::= ('+' primary)*
static std::unique_ptr<ExprAST> ParseBinOpRHS(int ExprPrec,
                                              std::unique_ptr<ExprAST> LHS) {
  // If this is a binop, find its precedence.
  while (true) {
    int TokPrec = GetTokPrecedence();

    // If this is a binop that binds at least as tightly as the current binop,
    // consume it, otherwise we are done.
    if (TokPrec < ExprPrec)
      return LHS;

    // Okay, we know this is a binop.
    int BinOp = CurTok;
    getNextToken(); // eat binop

    // Parse the primary expression after the binary operator.
    auto RHS = ParsePrimary();
    if (!RHS)
      return nullptr;

    // If BinOp binds less tightly with RHS than the operator after RHS, let
    // the pending operator take RHS as its LHS.
    int NextPrec = GetTokPrecedence();
    if (TokPrec < NextPrec) {
      RHS = ParseBinOpRHS(TokPrec + 1, std::move(RHS));
      if (!RHS)
        return nullptr;
    }

    // Merge LHS/RHS.
    LHS =
        std::make_unique<BinaryExprAST>(BinOp, std::move(LHS), std::move(RHS));
  }
}

/// expression
///   ::= primary binoprhs
///
static std::unique_ptr<ExprAST> ParseExpression() {
  auto LHS = ParsePrimary();
  if (!LHS)
    return nullptr;

  return ParseBinOpRHS(0, std::move(LHS));
}

/// prototype
///   ::= id '(' id* ')'
static std::unique_ptr<PrototypeAST> ParsePrototype() {
  if (CurTok != tok_identifier)
    return LogErrorP("Expected function name in prototype");

  std::string FnName = IdentifierStr;
  getNextToken();

  if (CurTok != '(')
    return LogErrorP("Expected '(' in prototype");

  std::vector<std::string> ArgNames;
  while (getNextToken() == tok_identifier)
    ArgNames.push_back(IdentifierStr);
  if (CurTok != ')')
    return LogErrorP("Expected ')' in prototype");

  // success.
  getNextToken(); // eat ')'.

  return std::make_unique<PrototypeAST>(FnName, std::move(ArgNames));
}

/// definition ::= 'def' prototype expression
static std::unique_ptr<FunctionAST> ParseDefinition() {
  getNextToken(); // eat def.
  auto Proto = ParsePrototype();
  if (!Proto)
    return nullptr;

  if (auto E = ParseExpression())
    return std::make_unique<FunctionAST>(std::move(Proto), std::move(E));
  return nullptr;
}

/// toplevelexpr ::= expression
static std::unique_ptr<FunctionAST> ParseTopLevelExpr() {
  if (auto E = ParseExpression()) {
    // Make an anonymous proto.
    auto Proto = std::make_unique<PrototypeAST>("__anon_expr",
                                                 std::vector<std::string>());
    return std::make_unique<FunctionAST>(std::move(Proto), std::move(E));
  }
  return nullptr;
}

/// external ::= 'extern' prototype
static std::unique_ptr<PrototypeAST> ParseExtern() {
  getNextToken(); // eat extern.
  return ParsePrototype();
}

//===----------------------------------------------------------------------===//
// Code Generation
//===----------------------------------------------------------------------===//

static std::unique_ptr<LLVMContext> TheContext;
static std::unique_ptr<Module> TheModule;
static std::unique_ptr<IRBuilder<>> Builder;
static std::map<std::string, Value *> NamedValues;

Value *LogErrorV(const char *Str) {
  LogError(Str);
  return nullptr;
}

Value *NumberExprAST::codegen() {
  return ConstantFP::get(*TheContext, APFloat(Val));
}

Value *VariableExprAST::codegen() {
  // Look this variable up in the function.
  Value *V = NamedValues[Name];
  if (!V)
    return LogErrorV("Unknown variable name");
  return V;
}

Value *BinaryExprAST::codegen() {
  Value *L = LHS->codegen();
  Value *R = RHS->codegen();
  if (!L || !R)
    return nullptr;

  switch (Op) {
  case '+':
    return Builder->CreateFAdd(L, R, "addtmp");
  case '-':
    return Builder->CreateFSub(L, R, "subtmp");
  case '*':
    return Builder->CreateFMul(L, R, "multmp");
  case '<':
    L = Builder->CreateFCmpULT(L, R, "cmptmp");
    // Convert bool 0/1 to double 0.0 or 1.0
    return Builder->CreateUIToFP(L, Type::getDoubleTy(*TheContext), "booltmp");
  default:
    return LogErrorV("invalid binary operator");
  }
}

Value *CallExprAST::codegen() {
  // Look up the name in the global module table.
  Function *CalleeF = TheModule->getFunction(Callee);
  if (!CalleeF)
    return LogErrorV("Unknown function referenced");

  // If argument mismatch error.
  if (CalleeF->arg_size() != Args.size())
    return LogErrorV("Incorrect # arguments passed");

  std::vector<Value *> ArgsV;
  for (unsigned i = 0, e = Args.size(); i != e; ++i) {
    ArgsV.push_back(Args[i]->codegen());
    if (!ArgsV.back())
      return nullptr;
  }

  return Builder->CreateCall(CalleeF, ArgsV, "calltmp");
}

Function *PrototypeAST::codegen() {
  // Make the function type:  double(double,double) etc.
  std::vector<Type *> Doubles(Args.size(), Type::getDoubleTy(*TheContext));
  FunctionType *FT =
      FunctionType::get(Type::getDoubleTy(*TheContext), Doubles, false);

  Function *F =
      Function::Create(FT, Function::ExternalLinkage, Name, TheModule.get());

  // Set names for all arguments.
  unsigned Idx = 0;
  for (auto &Arg : F->args())
    Arg.setName(Args[Idx++]);

  return F;
}

Function *FunctionAST::codegen() {
  // First, check for an existing function from a previous 'extern' declaration.
  Function *TheFunction = TheModule->getFunction(Proto->getName());

  if (!TheFunction)
    TheFunction = Proto->codegen();

  if (!TheFunction)
    return nullptr;

  // Create a new basic block to start insertion into.
  BasicBlock *BB = BasicBlock::Create(*TheContext, "entry", TheFunction);
  Builder->SetInsertPoint(BB);

  // Record the function arguments in the NamedValues map.
  NamedValues.clear();
  for (auto &Arg : TheFunction->args())
    NamedValues[std::string(Arg.getName())] = &Arg;

  if (Value *RetVal = Body->codegen()) {
    // Finish off the function.
    Builder->CreateRet(RetVal);

    // Validate the generated code, checking for consistency.
    verifyFunction(*TheFunction);

    return TheFunction;
  }

  // Error reading body, remove function.
  TheFunction->eraseFromParent();
  return nullptr;
}

//===----------------------------------------------------------------------===//
// Top-Level parsing and JIT Driver
//===----------------------------------------------------------------------===//

static void InitializeModule() {
  // Open a new context and module.
  TheContext = std::make_unique<LLVMContext>();
  TheModule = std::make_unique<Module>("my cool jit", *TheContext);

  // Create a new builder for the module.
  Builder = std::make_unique<IRBuilder<>>(*TheContext);
}

static void HandleDefinition() {
  if (auto FnAST = ParseDefinition()) {
    if (auto *FnIR = FnAST->codegen()) {
      fprintf(stderr, "Read function definition:");
      FnIR->print(errs());
      fprintf(stderr, "\n");
    }
  } else {
    // Skip token for error recovery.
    getNextToken();
  }
}

static void HandleExtern() {
  if (auto ProtoAST = ParseExtern()) {
    if (auto *FnIR = ProtoAST->codegen()) {
      fprintf(stderr, "Read extern: ");
      FnIR->print(errs());
      fprintf(stderr, "\n");
    }
  } else {
    // Skip token for error recovery.
    getNextToken();
  }
}

static void HandleTopLevelExpression() {
  // Evaluate a top-level expression into an anonymous function.
  if (auto FnAST = ParseTopLevelExpr()) {
    if (auto *FnIR = FnAST->codegen()) {
      fprintf(stderr, "Read top-level expression:");
      FnIR->print(errs());
      fprintf(stderr, "\n");

      // Remove the anonymous expression.
      FnIR->eraseFromParent();
    }
  } else {
    // Skip token for error recovery.
    getNextToken();
  }
}

/// top ::= definition | external | expression | ';'
static void MainLoop() {
  while (true) {
    fprintf(stderr, "ready> ");
    switch (CurTok) {
    case tok_eof:
      return;
    case ';': // ignore top-level semicolons.
      getNextToken();
      break;
    case tok_def:
      HandleDefinition();
      break;
    case tok_extern:
      HandleExtern();
      break;
    default:
      HandleTopLevelExpression();
      break;
    }
  }
}

//===----------------------------------------------------------------------===//
// Main driver code.
//===----------------------------------------------------------------------===//

int main() {
  // Install standard binary operators.
  // 1 is lowest precedence.
  BinopPrecedence['<'] = 10;
  BinopPrecedence['+'] = 20;
  BinopPrecedence['-'] = 20;
  BinopPrecedence['*'] = 40; // highest.

  // Prime the first token.
  fprintf(stderr, "ready> ");
  getNextToken();

  // Make the module, which holds all the code.
  InitializeModule();

  // Run the main "interpreter loop" now.
  MainLoop();

  // Print out all of the generated code.
  TheModule->print(errs(), nullptr);

  return 0;
}

下一步:添加 JIT 和优化器支持