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 2013-07-03 15:49:19.000000000 +0000
+++ new-Oh, Ducks!/selectors.lisp 2013-07-03 15:49:19.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)