X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/3a774b55edfea441c1715994924c2999e9202143..12949379840101e2d65883f29c5e8f0f6de49e9c:/src/lexer-impl.lisp

diff --git a/src/lexer-impl.lisp b/src/lexer-impl.lisp
index de76371..ccaca5c 100644
--- a/src/lexer-impl.lisp
+++ b/src/lexer-impl.lisp
@@ -188,6 +188,14 @@
 
 	  ;; Some special punctuation sequences are single tokens.
 	  ("..." (values :ellipsis nil))
+	  ("==" (values :eq))
+	  ("!=" (values :ne))
+	  ("<=" (values :le))
+	  (">=" (values :ge))
+	  ("&&" (values :and))
+	  ("||" (values :or))
+	  ("<<" (values :shl))
+	  (">>" (values :shr))
 
 	  ;; Any other character is punctuation.
 	  (:any (values it nil))