Protocol Environment: replace try ... with

src/lib_protocol_environment/tezos_protocol_environment_memory.ml

@@ -24,8 +24,9 @@ module Context = struct
     match k, m with
     | [], m -> Some m
     | n :: k, Dir m -> begin
-        try raw_get (StringMap.find n m) k
+        match StringMap.find_opt n m with
-        with Not_found -> None
+        | Some res -> raw_get res k
+        | None -> None
       end
     | _ :: _, Key _ -> None