From 9194a078c276c253a5e044b6980ee1588a5f4eef Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Fri, 14 Feb 2020 22:23:39 -0800
Subject: [PATCH] noteself

---
 quad/quadwriter/query.rkt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/quad/quadwriter/query.rkt b/quad/quadwriter/query.rkt
index 03573669..0fe75ab5 100644
--- a/quad/quadwriter/query.rkt
+++ b/quad/quadwriter/query.rkt
@@ -43,6 +43,7 @@
     (match query-piece
       [(cons pred 'this)
        ;; find the querying quad, and from there search backward
+       ;; todo: `this` should also cut down the domain of searching
        (for/first ([vidx (in-range (vector-memq starting-q vec) -1 -1)]
                    #:when (pred (vector-ref vec vidx)))
          vidx)]