From 9f97f2fe4deea73d4ce927b811c31c7a86557487 Mon Sep 17 00:00:00 2001 From: midipix Date: Sun, 13 Jun 2021 19:23:16 +0000 Subject: build system: modern.m4: refactor, added m4_toupper() and m4_tolower(). --- sofort/core/modern.m4 | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/sofort/core/modern.m4 b/sofort/core/modern.m4 index 3e24501..5b531f6 100644 --- a/sofort/core/modern.m4 +++ b/sofort/core/modern.m4 @@ -5,6 +5,7 @@ dnl dnl 1) make all standard m4 builtins m4_ prefixed. dnl 2) set the left-bracket and right-bracket symbols the begin-quote and end-quote strings. dnl 3) make a single underscore symbol the equivalent of the standard dnl builtin. +dnl 4) provide the m4_toupper and m4_tolower macros. dnl divert(-1) @@ -43,7 +44,6 @@ define(m4_undefine,defn(`undefine')) define(m4_undivert,defn(`undivert')) m4_changequote([,]) -m4_define(_,defn([m4_dnl])) m4_undefine([changecom]) m4_undefine([changequote]) @@ -79,4 +79,9 @@ m4_undefine([translit]) m4_undefine([undefine]) m4_undefine([undivert]) +m4_define([_],m4_defn([m4_dnl])) + +m4_define([m4_toupper],[m4_translit]([$1],[abcdefghijklmnopqrstuvwxyz],[ABCDEFGHIJKLMNOPQRSTUVWXYZ])) +m4_define([m4_tolower],[m4_translit]([$1],[ABCDEFGHIJKLMNOPQRSTUVWXYZ],[abcdefghijklmnopqrstuvwxyz])) + m4_divert(0)_ -- cgit v1.2.3