summaryrefslogtreecommitdiff
path: root/tiger-compiler/src/desugar/tasks.cc
blob: 0b83cb7f8b98c61023b01d90f277b2f81b11af67 (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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
/**
 ** \file desugar/tasks.cc
 ** \brief Desugar module related tasks' implementation.
 **/

#include <ast/tasks.hh>
#include <astclone/libastclone.hh>
#include <common.hh>
#include <desugar/libdesugar.hh>
#define DEFINE_TASKS 1
#include <desugar/tasks.hh>
#undef DEFINE_TASKS

namespace desugar::tasks
{
  /*-------------.
    | Desugaring.  |
    `-------------*/

  void desugar()
  {
    astclone::apply(::desugar::desugar, ast::tasks::the_program, desugar_for_p,
                    desugar_string_cmp_p);
    /// Escape after desugaring if escape was done before
    if (escapes::escaped)
      escapes::escapes_compute(*ast::tasks::the_program);
  }

  void raw_desugar()
  {
    astclone::apply(::desugar::raw_desugar, ast::tasks::the_program,
                    desugar_for_p, desugar_string_cmp_p);
  }

  /*-----------------------.
    | Array bounds checking.  |
    `-----------------------*/

  void bounds_checks_add()
  {
    astclone::apply(::desugar::bounds_checks_add, ast::tasks::the_program);
  }

  void raw_bounds_checks_add()
  {
    astclone::apply(::desugar::raw_bounds_checks_add, ast::tasks::the_program);
  }

} // namespace desugar::tasks