X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/b5911ce8da34bfdd5c4515b44fd2efce7c9c233f..d5fdd49e70b734b791eb907706f92da5775e2a8b:/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))