feat(compiler): Convert runtime/dataStructures.gr to primitives (#1145

)
grain-lang · Mar 6, 2022 · 2d43b28 · 2d43b28
1 parent 49650ac
commit 2d43b28
Show file tree

Hide file tree

Showing 38 changed files with 1,370 additions and 641 deletions.
diff --git a/compiler/grainformat/debug.re b/compiler/grainformat/debug.re
@@ -63,6 +63,7 @@ let debug_expression = (expr: Parsetree.expression) => {
  print_loc("PExpRecordSet", expr.pexp_loc)
  | PExpMatch(expression, match_branches) =>
  print_loc("PExpMatch", expr.pexp_loc)
+ | PExpPrim0(prim0) => print_loc("PExpPrim0", expr.pexp_loc)
  | PExpPrim1(prim1, expression) => print_loc("PExpPrim1", expr.pexp_loc)
  | PExpPrim2(prim2, expression, expression1) =>
  print_loc("PExpPrim2", expr.pexp_loc)

diff --git a/compiler/grainformat/format.re b/compiler/grainformat/format.re
@@ -2565,6 +2565,9 @@ and print_expression =
  ]),
  );
 
+ | PExpPrim0(prim0) =>
+ let original_code = get_original_code(expr.pexp_loc, original_source);
+ Doc.text(original_code);
  | PExpPrim1(prim1, expression) =>
  let original_code = get_original_code(expr.pexp_loc, original_source);
  Doc.text(original_code);