 
     (testing "partial cycle"
       (is (= (compute-run-graph
-               {::resolvers [{::pc/sym    'a
-                              ::pc/input  #{:c}
-                              ::pc/output [:a]}
-                             {::pc/sym    'a1
-                              ::pc/output [:a]}
-                             {::pc/sym    'b
-                              ::pc/input  #{:a}
-                              ::pc/output [:b]}
-                             {::pc/sym    'c
-                              ::pc/input  #{:b}
-                              ::pc/output [:c]}
-                             {::pc/sym    'd
-                              ::pc/output [:d]}]
-                ::eql/query [:c :a]})
+               {::pc/index-oir '{:a {#{:c} #{a}
+                                     #{}   #{a1}}
+                                 :b {#{:a} #{b}}
+                                 :c {#{:b} #{c}}
+                                 :d {#{} #{d}}}
+                ::eql/query    [:c :a]})
              '{::pcp/nodes             {1 {::pc/sym               c
                                            ::pcp/node-id          1
                                            ::pcp/requires         {:c {}}

(deftest compute-run-graph-test-no-path
  (testing "no path"
    (is (= (compute-run-graph
             {::resolvers []
              ::eql/query [:a]})
           {::pcp/nodes             {}
            ::pcp/index-syms        {}
            ::pcp/unreachable-attrs #{:a}

                        x))
                    resolvers)]
    (pc/register {} resolvers)))

(defn oir-index [resolvers]
  (::pc/index-oir (register-index resolvers)))

(defn base-graph-env []
  (assoc (pcp/base-env)
