update pin format parsing to handle hashes

Author: rjbou

src/tests/utils.ml

@@ -247,8 +247,8 @@ let check_pinned path ?kind wished =
     | Some k ->
       OpamStd.List.filter_map (fun l ->
           match l with
-          | nv::"(uninstalled)"::kind::_url::([_]|[])
-          | nv::kind::_url::([_]|[]) ->
+          | nv::"(uninstalled)"::kind::_url::([_;_]|[])
+          | nv::kind::_url::([_;_]|[]) ->
             if kind= k then Some nv else None
           | _ -> None) packages
   in