From 6e1cb1adf2f27e9487be4b5c080a4b98f9171024 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(-) (limited to 'sofort/core') 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