summaryrefslogtreecommitdiff
path: root/tiger-compiler/src/ast/let-exp.cc
blob: 0ded46b117f3c8b37ce9210c8e7fcb7bcc0a5d82 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
/**
 ** \file ast/let-exp.cc
 ** \brief Implementation of ast::LetExp.
 */

#include <ast/let-exp.hh>
#include <ast/visitor.hh>

namespace ast
{
  LetExp::LetExp(const Location& location, ChunkList* chunks, Exp* body)
    : Exp(location)
    , chunks_(chunks)
    , body_(body)
  {}

  LetExp::~LetExp()
  {
    delete chunks_;
    delete body_;
  }

  void LetExp::accept(ConstVisitor& v) const { v(*this); }

  void LetExp::accept(Visitor& v) { v(*this); }
} // namespace ast