Clean match body specs.

src/syn_groups.erl

@@ -498,14 +498,10 @@ find_groups_tuples_by_pid(Pid) when is_pid(Pid) ->
 
 -spec find_groups_entry_by_name_and_pid(GroupName :: any(), Pid :: pid()) -> Entry :: syn_groups_entry() | undefined.
 find_groups_entry_by_name_and_pid(GroupName, Pid) ->
-    MatchBody = case is_tuple(GroupName) of
-        true -> {{{GroupName}, Pid, '$3', '$4', '$5'}};
-        _ -> {{GroupName, Pid, '$3', '$4', '$5'}}
-    end,
     case ets:select(syn_groups_by_name, [{
         {{GroupName, Pid}, '$3', '$4', '$5'},
         [],
-        [MatchBody]
+        [{{{const, GroupName}, Pid, '$3', '$4', '$5'}}]
     }]) of
         [RegistryTuple] -> RegistryTuple;
         _ -> undefined

src/syn_registry.erl

@@ -555,14 +555,10 @@ remove_from_local_table(Name, Pid) ->
 
 -spec find_registry_tuple_by_name(Name :: any()) -> RegistryTuple :: syn_registry_tuple() | undefined.
 find_registry_tuple_by_name(Name) ->
-    MatchBody = case is_tuple(Name) of
-        true -> {{{Name}, '$2', '$3', '$4'}};
-        _ -> {{Name, '$2', '$3', '$4'}}
-    end,
     case ets:select(syn_registry_by_name, [{
         {Name, '$2', '$3', '$4', '_', '_'},
         [],
-        [MatchBody]
+        [{{{const, Name}, '$2', '$3', '$4'}}]
     }]) of
         [RegistryTuple] -> RegistryTuple;
         _ -> undefined