fetch_cached_results in compute p.274 #1

apps/info_sys/lib/info_sys.ex

@@ -6,19 +6,26 @@ defmodule InfoSys do
     defstruct score: 0, text: nil, backend: nil
   end
 
+  alias InfoSys.Cache
+
   def compute(query, opts \\ []) do
     timeout = opts[:timeout] || 10_000
     opts = Keyword.put_new(opts, :limit, 10)
     backends = opts[:backends] || @backends
 
-    backends
+    {uncached_backends, cached_results} =
+      fetch_cached_results(backends, query, opts)
+
+    uncached_backends
     |> Enum.map(&async_query(&1, query, opts))
     |> Task.yield_many(timeout)
     |> Enum.map(fn {task, res} -> res || Task.shutdown(task, :brutal_kill) end)
     |> Enum.flat_map(fn
       {:ok, results} -> results
       _ -> []
     end)
+    |> write_results_to_cache(query, opts)
+    |> Kernel.++(cached_results)
     |> Enum.sort(&(&1.score >= &2.score))
     |> Enum.take(opts[:limit])
   end