From: Akim Demaille Date: Tue, 24 Oct 2000 17:25:18 +0000 (+0000) Subject: * m4sugar.m4: (m4_tolower, m4_toupper): New macros. X-Git-Tag: autoconf-2.50~531 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b60b89ed66001eb8174000b0d6cfbbfa38d99cae;p=thirdparty%2Fautoconf.git * m4sugar.m4: (m4_tolower, m4_toupper): New macros. * acgeneral.m4 (AC_PREFIX_PROGRAM): Use m4_toupper(). * aclang.m4 (AC_F77_FUNC): Use m4_toupper()/m4_tolower(). --- diff --git a/ChangeLog b/ChangeLog index 0cf722dfa..c2f0685bf 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2000-10-24 Lars J. Aas + + * m4sugar.m4: (m4_tolower, m4_toupper): New macros. + * acgeneral.m4 (AC_PREFIX_PROGRAM): Use m4_toupper(). + * aclang.m4 (AC_F77_FUNC): Use m4_toupper()/m4_tolower(). + 2000-10-24 Pavel Roskin * m4sugar.m4 (m4_quote): Comment change. diff --git a/acgeneral.m4 b/acgeneral.m4 index adf067c45..dfa09f8ab 100644 --- a/acgeneral.m4 +++ b/acgeneral.m4 @@ -3271,7 +3271,7 @@ fi # No big loss, I think, since most configures don't use this macro anyway. AC_DEFUN([AC_PREFIX_PROGRAM], [dnl Get an upper case version of $[1]. -pushdef([AC_Prog], translit([$1], [a-z], [A-Z]))dnl +pushdef([AC_Prog], m4_toupper([$1]))dnl if test "x$prefix" = xNONE; then dnl We reimplement AC_MSG_CHECKING (mostly) to avoid the ... in the middle. echo $ECHO_N "checking for prefix by $ECHO_C" >&AC_FD_MSG diff --git a/aclang.m4 b/aclang.m4 index e1f754de4..51fbe0cde 100644 --- a/aclang.m4 +++ b/aclang.m4 @@ -1733,8 +1733,8 @@ esac AC_DEFUN([AC_F77_FUNC], [AC_REQUIRE([_AC_F77_NAME_MANGLING])dnl case $ac_cv_f77_mangling in - upper*) ac_val="translit([$1],[a-z],[A-Z])" ;; - lower*) ac_val="translit([$1],[A-Z],[a-z])" ;; + upper*) ac_val="m4_toupper([$1])" ;; + lower*) ac_val="m4_tolower([$1])" ;; *) ac_val="unknown" ;; esac case $ac_cv_f77_mangling in *," underscore"*) ac_val="$ac_val"_ ;; esac diff --git a/lib/autoconf/c.m4 b/lib/autoconf/c.m4 index e1f754de4..51fbe0cde 100644 --- a/lib/autoconf/c.m4 +++ b/lib/autoconf/c.m4 @@ -1733,8 +1733,8 @@ esac AC_DEFUN([AC_F77_FUNC], [AC_REQUIRE([_AC_F77_NAME_MANGLING])dnl case $ac_cv_f77_mangling in - upper*) ac_val="translit([$1],[a-z],[A-Z])" ;; - lower*) ac_val="translit([$1],[A-Z],[a-z])" ;; + upper*) ac_val="m4_toupper([$1])" ;; + lower*) ac_val="m4_tolower([$1])" ;; *) ac_val="unknown" ;; esac case $ac_cv_f77_mangling in *," underscore"*) ac_val="$ac_val"_ ;; esac diff --git a/lib/autoconf/fortran.m4 b/lib/autoconf/fortran.m4 index e1f754de4..51fbe0cde 100644 --- a/lib/autoconf/fortran.m4 +++ b/lib/autoconf/fortran.m4 @@ -1733,8 +1733,8 @@ esac AC_DEFUN([AC_F77_FUNC], [AC_REQUIRE([_AC_F77_NAME_MANGLING])dnl case $ac_cv_f77_mangling in - upper*) ac_val="translit([$1],[a-z],[A-Z])" ;; - lower*) ac_val="translit([$1],[A-Z],[a-z])" ;; + upper*) ac_val="m4_toupper([$1])" ;; + lower*) ac_val="m4_tolower([$1])" ;; *) ac_val="unknown" ;; esac case $ac_cv_f77_mangling in *," underscore"*) ac_val="$ac_val"_ ;; esac diff --git a/lib/autoconf/general.m4 b/lib/autoconf/general.m4 index adf067c45..dfa09f8ab 100644 --- a/lib/autoconf/general.m4 +++ b/lib/autoconf/general.m4 @@ -3271,7 +3271,7 @@ fi # No big loss, I think, since most configures don't use this macro anyway. AC_DEFUN([AC_PREFIX_PROGRAM], [dnl Get an upper case version of $[1]. -pushdef([AC_Prog], translit([$1], [a-z], [A-Z]))dnl +pushdef([AC_Prog], m4_toupper([$1]))dnl if test "x$prefix" = xNONE; then dnl We reimplement AC_MSG_CHECKING (mostly) to avoid the ... in the middle. echo $ECHO_N "checking for prefix by $ECHO_C" >&AC_FD_MSG diff --git a/lib/autoconf/lang.m4 b/lib/autoconf/lang.m4 index e1f754de4..51fbe0cde 100644 --- a/lib/autoconf/lang.m4 +++ b/lib/autoconf/lang.m4 @@ -1733,8 +1733,8 @@ esac AC_DEFUN([AC_F77_FUNC], [AC_REQUIRE([_AC_F77_NAME_MANGLING])dnl case $ac_cv_f77_mangling in - upper*) ac_val="translit([$1],[a-z],[A-Z])" ;; - lower*) ac_val="translit([$1],[A-Z],[a-z])" ;; + upper*) ac_val="m4_toupper([$1])" ;; + lower*) ac_val="m4_tolower([$1])" ;; *) ac_val="unknown" ;; esac case $ac_cv_f77_mangling in *," underscore"*) ac_val="$ac_val"_ ;; esac diff --git a/lib/m4sugar/m4sugar.m4 b/lib/m4sugar/m4sugar.m4 index fa623eb0a..53107395c 100644 --- a/lib/m4sugar/m4sugar.m4 +++ b/lib/m4sugar/m4sugar.m4 @@ -467,6 +467,20 @@ define([_m4_foreach], ## Text processing. ## ## ----------------- ## +# m4_tolower(STRING) +# m4_toupper(STRING) +# ------------------ +# These macros lowercase and uppercase strings. +define([m4_tolower], +[translit([$1], + [ABCDEFGHIJKLMNOPQRSTUVWXYZ], + [abcdefghijklmnopqrstuvwxyz])]) + +define([m4_toupper], +[translit([$1], + [abcdefghijklmnopqrstuvwxyz], + [ABCDEFGHIJKLMNOPQRSTUVWXYZ])]) + # m4_quote(STRING) # ---------------- diff --git a/m4sugar.m4 b/m4sugar.m4 index fa623eb0a..53107395c 100644 --- a/m4sugar.m4 +++ b/m4sugar.m4 @@ -467,6 +467,20 @@ define([_m4_foreach], ## Text processing. ## ## ----------------- ## +# m4_tolower(STRING) +# m4_toupper(STRING) +# ------------------ +# These macros lowercase and uppercase strings. +define([m4_tolower], +[translit([$1], + [ABCDEFGHIJKLMNOPQRSTUVWXYZ], + [abcdefghijklmnopqrstuvwxyz])]) + +define([m4_toupper], +[translit([$1], + [abcdefghijklmnopqrstuvwxyz], + [ABCDEFGHIJKLMNOPQRSTUVWXYZ])]) + # m4_quote(STRING) # ----------------