From aea37a67f4befaf051958d1a190b268a08acd17b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 24 Jul 2020 15:47:58 +0200
Subject: Remove some unused procedures.

---
 module/c/lex.scm | 5 -----
 1 file changed, 5 deletions(-)

(limited to 'module/c/lex.scm')

diff --git a/module/c/lex.scm b/module/c/lex.scm
index 322e20ed..d36fcc05 100644
--- a/module/c/lex.scm
+++ b/module/c/lex.scm
@@ -83,11 +83,6 @@
        (* (or safe-letter
               base-10-digit))))
 
-;; No further subparsing can be done.
-;; NOTE that strings are generally also in this category.
-(define-peg-pattern atom all
-  (or base-8 base-10 base-16 number char variable))
-
 (define-peg-pattern prefix-operator all
   (or "!" "~" "*" "&" "++" "--" "+" "-"))
 
-- 
cgit v1.2.3