Mon Nov 30 05:04:24 UTC 2009  pix@kepibu.org
  * Record idea
diff -rN -u old-Oh, Ducks!/selectors.lisp new-Oh, Ducks!/selectors.lisp
--- old-Oh, Ducks!/selectors.lisp	2015-11-29 20:43:56.000000000 +0000
+++ new-Oh, Ducks!/selectors.lisp	2015-11-29 20:43:56.000000000 +0000
@@ -86,6 +86,11 @@
     (t (unless (string= selector "")
          (error "Unable to to parse selector: ~s" selector)))))
 
+;; Hrm... would something like this make things more or less clear?
+;#t(lex$ (":nth-child(" :s? (?a :int) "n" :s? (or #\+ #\-) :s? (?b :int) :s? ")"))
+;#t(lex$ ("#" (?id :identifier)))
+;#t(lex$ (?type :identifier))
+
 (defgeneric find-matching-elements (selector element)
   (:method (selector (element t))
     (flet ((find-in-list (elements)