From fc9f889b376ccec4a795ca87874f8efa22321726 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Thu, 30 Jun 2022 02:33:01 +0200
Subject: Fix escape sequences in chars and strings.

---
 module/c/lex.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/module/c/lex.scm b/module/c/lex.scm
index b6523a87..b3c82001 100644
--- a/module/c/lex.scm
+++ b/module/c/lex.scm
@@ -72,7 +72,7 @@
 (define-peg-pattern base-16-char all
   (and (ignore "x") base-16-digit (? base-16-digit)))
 
-(define-peg-pattern escaped-char body
+(define-peg-pattern escaped-char all
   (and (ignore "\\") (or base-16-char
                          base-8-char
                          peg-any)))
-- 
cgit v1.2.3