Correct indentation after binary sequence

Author: tonini

elixir-smie.el

@@ -144,6 +144,9 @@
   (rx (or "<<<" ">>>" "^^^" "~~~" "&&&" "|||" "===" "!==" "==" "!=" "<="
 	  "=" ">=" "<" ">" "&&" "||" "<>" "++" "--" "//" "/>" "=~" "|>")))
 
+(defvar elixir-smie--binary-sequence-regexp
+  (rx (or "<<" ">>")))
+
 (defvar elixir-smie--block-operator-regexp
   (rx "->" (0+ nonl)))
 
@@ -241,6 +244,9 @@
      ((looking-back elixir-smie--block-operator-regexp (- (point) 3) t)
       (goto-char (match-beginning 0))
       "->")
+     ((looking-back elixir-smie--binary-sequence-regexp (- (point) 3) t)
+      (goto-char (match-beginning 0))
+      "OP")
      ((looking-back elixir-smie--operator-regexp (- (point) 3) t)
       (goto-char (match-beginning 0))
       "OP")

test/elixir-mode-indentation-test.el

@@ -850,6 +850,25 @@ defmodule Greeter do
   end
 end")
 
+(elixir-def-indentation-test indent-binary-sequence
+			     (:tags '(indentation))
+"
+defmodule ExampleTest do
+     test \"the truth\" do
+       assert <<1,2>> == <<1,2>>
+assert 1 + 1 == 2
+  end
+end"
+
+"
+defmodule ExampleTest do
+  test \"the truth\" do
+    assert <<1,2>> == <<1,2>>
+    assert 1 + 1 == 2
+  end
+end")
+
+
 ;; We don't want automatic whitespace cleanup here because of the significant
 ;; whitespace after `Record' above. By setting `whitespace-action' to nil,
 ;; `whitespace-mode' won't automatically clean up trailing whitespace (in my