From c1cf0693982d9c1f1b871966752140fee5d76d19 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 13 Jul 2022 04:39:14 +0200
Subject: work

---
 module/c/cpp-types.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'module/c/cpp-types.scm')

diff --git a/module/c/cpp-types.scm b/module/c/cpp-types.scm
index 555120d6..1df70594 100644
--- a/module/c/cpp-types.scm
+++ b/module/c/cpp-types.scm
@@ -53,6 +53,7 @@
          (`(pp-number ,x) x)
          (_ #f))))
 
+;; TODO this fails if there are multiple components in the string token
 (define (string-token? token)
   (and (preprocessing-token? token)
        (match (lexeme-body token)
-- 
cgit v1.2.3