From 6f52df545e3891e2fdb835e8684a742fe537ab72 Mon Sep 17 00:00:00 2001
From: Paul Licameli <paul.licameli@audacityteam.org>
Date: Tue, 27 Mar 2018 15:10:19 -0400
Subject: [PATCH] Multi-line Nyquist header directives allow embedded comments

---
 src/effects/nyquist/Nyquist.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/effects/nyquist/Nyquist.cpp b/src/effects/nyquist/Nyquist.cpp
index 92f610def..af12d8232 100644
--- a/src/effects/nyquist/Nyquist.cpp
+++ b/src/effects/nyquist/Nyquist.cpp
@@ -1640,6 +1640,12 @@ bool NyquistEffect::Tokenizer::Tokenize(
          // Unenclosed whitespace
          // Separate tokens; don't accumulate this character
          endToken();
+      else if (!q && c == wxT(';'))
+         // semicolon not in quotes, but maybe in parentheses
+         // Lisp style comments with ; (but not with #| ... |#) are allowed
+         // within a wrapped header multi-line, so that i18n hint comments may
+         // be placed before strings and found by xgettext
+         break;
       else if (!q && c == wxT('(')) {
          // Start of list or sublist
          if (++paren == 1)