improve justification

Author: frenchy64

src/malli/core.cljc

@@ -1930,9 +1930,11 @@
 ;; useful for detecting cycles.
 ;; copied to malli.generator
 (defn- -identify-ref-schema [schema]
-  ;; TODO mr/-schemas doesn't seem reliable, making defn private for now.
-  ;; a better approach would be to accumulate a 'seen' map from name => ?schema
-  ;; and if we expand the same name again with the same seen map, it's a cycle.
+  ;; TODO mr/-schemas doesn't seem right, making defn private for now.
+  ;; e.g., we only care about property registry entries, not schema constructors.
+  ;; a better approach might be to accumulate a 'seen' map from name => ?schema
+  ;; that we add to every time we deref a ref, and if we expand the same name again
+  ;; with the same seen map, it's a cycle.
   {:scope (-> schema -options -registry mr/-schemas)
    :name (-ref schema)})