1 files changed, 49 insertions, 0 deletions
diff --git a/tiger-compiler/src/desugar/tasks.cc b/tiger-compiler/src/desugar/tasks.cc
new file mode 100644
index 0000000..0b83cb7
--- /dev/null
+++ b/tiger-compiler/src/desugar/tasks.cc
@@ -0,0 +1,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