From aa97207497b1d290734d04accf019caa4e854796 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Tue, 1 Aug 2017 19:39:25 +0200 Subject: [PATCH] typo: fix parsing of \xXX * module/nyacc/lex.scm (read-hex): Comment-out debug printing. --- module/nyacc/lex.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/nyacc/lex.scm b/module/nyacc/lex.scm index 2a4d28a..3636738 100644 --- a/module/nyacc/lex.scm +++ b/module/nyacc/lex.scm @@ -206,7 +206,7 @@ (cs:lhx (string->char-set "abcdef"))) (lambda (ch) ;; ch == #\x always (let iter ((cv 0) (ch (read-char)) (n 0)) - (simple-format #t "ch=~S\n" ch) + ;;(simple-format #t "ch=~S\n" ch) (cond ((eof-object? ch) cv) ((> n 2) (unread-char ch) cv) -- Jan Nieuwenhuizen | GNU LilyPond http://lilypond.org Freelance IT http://JoyofSource.com | Avatar® http://AvatarAcademy.com