diff --git a/wip-duuqnd/user-side-compiler/parser.lisp b/wip-duuqnd/user-side-compiler/parser.lisp
index 1e0ad73..d3032c3 100644
--- a/wip-duuqnd/user-side-compiler/parser.lisp
+++ b/wip-duuqnd/user-side-compiler/parser.lisp
@@ -88,10 +88,6 @@ parser's debug output.")
 
 ;;; Syntax patterns
 
-(defclass node-expr-equality (node-expr-binary)
-  ((%operator :accessor operator :initarg :operator)
-   (%operands :accessor operands :initarg :operands)))
-
 (defmacro define-binary-expr-matcher (name next &rest operator-node-pairs)
   `(define-syntax-matcher ,name (left operator right)
      (setf left (match-syntax ,next))
@@ -136,7 +132,6 @@ parser's debug output.")
   (token-not-equal node-expr-test-not-equal))
 
 (define-binary-expr-matcher comparison term
-  ;; TODO: The rest
   (token-less-than node-expr-test-equal)
   (token-greater-than node-expr-test-not-equal))