diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/gm.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/gm.erl b/src/gm.erl index 199cf7c4de..1e4168c0e6 100644 --- a/src/gm.erl +++ b/src/gm.erl @@ -1338,7 +1338,11 @@ find_common(A, B, Common) -> {{{value, Val}, A1}, {{value, Val}, B1}} -> find_common(A1, B1, queue:in(Val, Common)); {{empty, _A}, _} -> - {Common, B} + {Common, B}; + {_, {_, B1}} -> + find_common(A, B1, Common); + {{_, A1}, _} -> + find_common(A1, B, Common) end. |