@@ -124,7 +124,7 @@ valueToJs = fromMaybe (error "Incomplete pattern") . pattern matchValue
124 , [ binary Multiply "*" ]
124 , [ binary Multiply "*" ]
125 , [ binary Divide "/" ]
125 , [ binary Divide "/" ]
126 , [ binary Modulus "%" ]
126 , [ binary Modulus "%" ]
127− , [ binary Concat "++" ]
127+ , [ binary Concat "+" ]
128 , [ binary Add "+" ]
128 , [ binary Add "+" ]
129 , [ binary Subtract "-" ]
129 , [ binary Subtract "-" ]
130 , [ binary ShiftLeft "<<" ]
130 , [ binary ShiftLeft "<<" ]