Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

remove superflous case

  • Loading branch information...
commit 86446cfa21db7098e068366352f00273ee14c483 1 parent 6334c0c
Adam Rutkowski aerosol authored
Showing with 4 additions and 4 deletions.
  1. +4 −4 src/binpp.erl
8 src/binpp.erl
View
@@ -133,11 +133,11 @@ diff([], [H2|R2], LD, RD) ->
diff([H1|R1], [], LD, RD) ->
diff(R1, [], [H1|LD], ["??"|RD]);
+diff([H1|R1], [H2|R2], LD, RD) when H1 =:= H2 ->
+ diff(R1, R2, ["--"|LD], ["--"|RD]);
+
diff([H1|R1], [H2|R2], LD, RD) ->
- case H1 =:= H2 of
- true -> diff(R1, R2, ["--"|LD], ["--"|RD]);
- false -> diff(R1, R2, [H1|LD], [H2|RD])
- end.
+ diff(R1, R2, [H1|LD], [H2|RD]).
diff(L1, L2) when is_list(L1), is_list(L2) ->
diff(L1, L2, [], []).
Please sign in to comment.
Something went wrong with that request. Please try again.