fix operators, only binary

lib/parser/operators.rb

@@ -1,48 +1,15 @@
 module Parser
   module Operators
     include Parslet
-    rule(:exponent) { str('**') >> space?}
-    rule(:multiply) { match['*/%']  >> space? }
-    rule(:plus) { match['+-']  >> space? }
-    rule(:shift) { str(">>") | str("<<") >> space?}
-    rule(:bit_and) { str('&') >> space?}
-    rule(:bit_or) { str('|') >> space?}
-    rule(:greater_equal) { str('>=') >> space?}
-    rule(:less_or_equal) { str('<=') >> space?}
-    rule(:larger) { str('>') >> space?}
-    rule(:smaller) { str('<') >> space?}
-    rule(:identity) { str('===') >> space?}
-    rule(:equal) { str('==') >> space?}
-    rule(:not_equal) { str('!=') >> space?}
-    rule(:boolean_and) { str('&&') | str("and") >> space?}
-    rule(:boolean_or) { str('||') | str("or") >> space?}
-    rule(:assign) { str('=') >> space?}
-    rule(:op_assign) { str('+=')|str('-=')|str('*=')|str('/=')|str('%=') >> space?}
-    rule(:eclipse) { str('..') |str("...") >> space?}
-    rule(:assign) { str('=') >> space?}
 
-    #infix doing the heavy lifting here,
+    rule(:operator_sym) {
-    # is defined as an expressions and array of [atoms,priority,binding] triples
+      str('**') | str('*') | str('/') | str('/') | str('%') |
-    rule(:operator_expression) do infix_expression(r_value,
+      str('+') | str('-') | str('<<')| str('>>') |
-                                     [exponent, 120, :left] ,
+      str('|') | str('&') |
-                                     [multiply, 120, :left] ,
+      str('>=') | str('<=') | str('>') | str('<') |
-                                     [plus, 110, :left],
+      str('==') | str('!=')   }
-                                     [shift, 100, :left],
+
-                                     [bit_and, 90, :left],
+      rule(:operator_value) {  (field_access|basic_type).as(:left) >>
-                                     [bit_or, 90, :right],
+          operator_sym.as(:operator) >> space? >> (field_access|basic_type).as(:right) }
-                                     [greater_equal, 80, :left],
-                                     [less_or_equal, 80, :left],
-                                     [larger, 80, :left],
-                                     [smaller, 80, :left],
-                                     [identity, 70, :right],
-                                     [equal, 70, :right],
-                                     [not_equal, 70, :right],
-                                     [boolean_and, 60, :left],
-                                     [boolean_or, 50, :right],
-                                     [eclipse, 40, :right],
-                                     [keyword_rescue, 30, :right],
-                                     [assign, 20, :right],
-                                     [op_assign, 20, :right] ) >> space?
-                                   end
   end
 end

test/cases/operator_value/field_var.tst

@@ -0,0 +1,9 @@
+foo.bar - gumbar
+-- -- --
+s(:operator_value, :-,
+  s(:field_access,
+    s(:receiver,
+      s(:name, :foo)),
+    s(:field,
+      s(:name, :bar))),
+  s(:name, :gumbar))

test/cases/operator_value/int_field.tst

@@ -0,0 +1,9 @@
+5 % foo.bar
+-- -- --
+s(:operator_value, :%,
+  s(:int, 5),
+  s(:field_access,
+    s(:receiver,
+      s(:name, :foo)),
+    s(:field,
+      s(:name, :bar))))

test/cases/operator_value/int_var.tst

@@ -0,0 +1,5 @@
+3 > var
+-- -- --
+s(:operator_value, :>,
+  s(:int, 3),
+  s(:name, :var))

test/cases/operator_value/ints.tst

@@ -0,0 +1,5 @@
+5 + 7
+-- -- --
+s(:operator_value, :+,
+  s(:int, 5),
+  s(:int, 7))

test/cases/operator_value/op_two_variable.tst

@@ -1,6 +1,5 @@
 a - b
 -- -- --
-s(:expressions, 
+s(:operator_value, :-,
-  s(:operator,  "-", 
   s(:name, :a),
-    s(:name,  :b)))
+  s(:name, :b))

test/cases/operator_value/op_variable.tst

@@ -1,6 +1,5 @@
 a - 5
 -- -- --
-s(:expressions, 
+s(:operator_value, :-,
-  s(:operator,  "-", 
   s(:name, :a),
-    s(:int,  5)))
+  s(:int, 5))

test/cases/operator_value/op_variable_string.tst

@@ -1,6 +1,5 @@
 a - "st"
 -- -- --
-s(:expressions, 
+s(:operator_value, :-,
-  s(:operator,  "-", 
   s(:name, :a),
-    s(:string,  "st")))
+  s(:string, "st"))

test/cases/operator_value/op_variable_true.tst

@@ -1,6 +1,5 @@
 a == true
 -- -- --
-s(:expressions, 
+s(:operator_value, :==,
-  s(:operator,  "==", 
   s(:name, :a),
-    s(:true)))
+  s(:true))

test/cases/operator_value/simple_devide.tst

@@ -1,6 +1,5 @@
 5 / 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :/,
-  s(:operator,  "/", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/simple_greater.tst

@@ -1,6 +1,5 @@
 5 > 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :>,
-  s(:operator,  ">", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/simple_minus.tst

@@ -1,6 +1,5 @@
 5 - 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :-,
-  s(:operator,  "-", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/simple_multiply.tst

@@ -1,6 +1,5 @@
 5 * 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :*,
-  s(:operator,  "*", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/simple_plus.tst

@@ -1,6 +1,5 @@
 5 + 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :+,
-  s(:operator,  "+", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/simple_smaller.tst

@@ -1,6 +1,5 @@
 5 < 3
 -- -- --
-s(:expressions, 
+s(:operator_value, :<,
-  s(:operator,  "<", 
   s(:int, 5),
-    s(:int,  3)))
+  s(:int, 3))

test/cases/operator_value/var_field.tst

@@ -0,0 +1,9 @@
+gumbar & foo.bar
+-- -- --
+s(:operator_value, :&,
+  s(:name, :gumbar),
+  s(:field_access,
+    s(:receiver,
+      s(:name, :foo)),
+    s(:field,
+      s(:name, :bar))))

test/cases/operator_value/var_var.tst

@@ -0,0 +1,5 @@
+bar - gumbar
+-- -- --
+s(:operator_value, :-,
+  s(:name, :bar),
+  s(:name, :gumbar))