---
python/convertrules.py | 16 ++++++++++++++++
1 file changed, 16 insertions(+)
diff --git a/python/convertrules.py b/python/convertrules.py
index 8dc8e91..ba10f25 100644
--- a/python/convertrules.py
+++ b/python/convertrules.py
@@ -3743,6 +3743,22 @@ def conv(str):
+ after_id, r'\1-\2', str)
return str
+@rule ((2, 19, 22), "(define-xxx-function (parser location ...) ->
(define-xxx-function (...)")
+def conv(str):
+ def subst(m):
+ def subsub(m):
+ str = (m.group (1)
+ + re.sub ('(?<=\s|["\\()])' + m.group (2) +
r'(?=\s|["\\()])',
+ r'(*location*)',
+ re.sub (r'(?<=\s|["\\()])parser(?=\s|["\\()])',
+ r'(*parser*)', m.group (3))))
+ return str
+ return re.sub (r'(\([-a-z]+\s*\(+)parser\s+([-a-z]+)\s*((?:.|\n)*)$',
+ subsub, m.group (0))
+ str = re.sub (r'\(define-(?:music|event|scheme|void)-function(?=\s|["(])'
+ + paren_matcher (20) + r'\)', subst, str)
+ return str
+
# Guidelines to write rules (please keep this at the end of this file)
#
# - keep at most one rule per version; if several conversions should be done,
--
2.1.4
_______________________________________________
lilypond-devel mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-devel
