From 2b94745734fc01de8e6f0961b7cd182df720712a Mon Sep 17 00:00:00 2001 From: John Lorentzson <duuqnd@stacken.kth.se> Date: Fri, 13 Jun 2025 09:19:00 +0200 Subject: [PATCH] Some little cleanup --- wip-duuqnd/user-side-compiler/parser.lisp | 5 ----- 1 file changed, 5 deletions(-) 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))