[#62] Change precedence of % operator (#63)

Author: jonhue

grammar.js

@@ -8,16 +8,17 @@ const PREC = Object.freeze({
   AND: 6,
   EQUALITY: 7,
   ORDER: 8,
-  SUM: 9,
-  PRODUCT: 10,
-  EXPONENTIATION: 11,
-  NOT: 12,
-  PREFIX: 13,
-  EXPRESSION: 14,
-  PATTERN: 14,
-  APPLICATION: 15,
-  PIPELINE: 16,
-  ACCESS: 17
+  MOD: 9,
+  SUM: 10,
+  PRODUCT: 11,
+  EXPONENTIATION: 12,
+  NOT: 13,
+  PREFIX: 14,
+  EXPRESSION: 15,
+  PATTERN: 15,
+  APPLICATION: 16,
+  PIPELINE: 17,
+  ACCESS: 18
 });
 
 module.exports = grammar({
@@ -233,9 +234,9 @@ module.exports = grammar({
       prec.left(PREC.EXPONENTIATION, seq(field('left', $._simple_expression), field('abstraction', alias('^', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.PRODUCT, seq(field('left', $._simple_expression), field('abstraction', alias('*', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.PRODUCT, seq(field('left', $._simple_expression), field('abstraction', alias('/', $.infix_application_operator)), field('right', $._simple_expression))),
-      prec.left(PREC.PRODUCT, seq(field('left', $._simple_expression), field('abstraction', alias('%', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.SUM, seq(field('left', $._simple_expression), field('abstraction', alias('+', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.SUM, seq(field('left', $._simple_expression), field('abstraction', alias('-', $.infix_application_operator)), field('right', $._simple_expression))),
+      prec.left(PREC.MOD, seq(field('left', $._simple_expression), field('abstraction', alias('%', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.ORDER, seq(field('left', $._simple_expression), field('abstraction', alias('<', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.ORDER, seq(field('left', $._simple_expression), field('abstraction', alias('<=', $.infix_application_operator)), field('right', $._simple_expression))),
       prec.left(PREC.ORDER, seq(field('left', $._simple_expression), field('abstraction', alias('>', $.infix_application_operator)), field('right', $._simple_expression))),

test/corpus/expressions.txt

@@ -200,6 +200,7 @@ false || false
 false ==> true <=> true
 false && false || false
 false || false && false
+1 + 1 % 1
 1 - 1 + 1
 1 - -1
 1 * 1 / 1 - 1
@@ -309,6 +310,13 @@ false || !false
       right: (number))
     abstraction: (infix_application_operator)
     right: (number))
+  (infix_application
+    left: (infix_application
+      left: (number)
+      abstraction: (infix_application_operator)
+      right: (number))
+    abstraction: (infix_application_operator)
+    right: (number))
   (infix_application
     left: (number)
     abstraction: (infix_application_operator)