/[autoconf]/autoconf/lib/m4sugar/m4sh.m4
ViewVC logotype

Diff of /autoconf/lib/m4sugar/m4sh.m4

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.96 by bonzini, Wed May 21 19:04:41 2003 UTC revision 1.97 by akim, Thu May 22 13:24:08 2003 UTC
# Line 131  m4_copy([_m4_divert(M4SH-INIT)], [_m4_di Line 131  m4_copy([_m4_divert(M4SH-INIT)], [_m4_di
131  #  #
132  m4_define([AS_REQUIRE],  m4_define([AS_REQUIRE],
133  [m4_provide_if([$1], [],  [m4_provide_if([$1], [],
134                 [m4_divert_text([M4SH-INIT], [$1])])])                 [m4_divert_text([M4SH-INIT], [$1])])])
135    
136    
137  # AS_SHELL_SANITIZE  # AS_SHELL_SANITIZE
# Line 312  $as_unset $1 || test "${$1+set}" != set Line 312  $as_unset $1 || test "${$1+set}" != set
312  # Escape the CHARS in STRING.  # Escape the CHARS in STRING.
313  m4_define([AS_ESCAPE],  m4_define([AS_ESCAPE],
314  [m4_bpatsubst([$1],  [m4_bpatsubst([$1],
315               m4_ifval([$2], [[\([$2]\)]], [[\([\"$`]\)]]),               m4_ifval([$2], [[\([$2]\)]], [[\([\"$`]\)]]),
316               [\\\1])])               [\\\1])])
317    
318    
319  # _AS_QUOTE_IFELSE(STRING, IF-MODERN-QUOTATION, IF-OLD-QUOTATION)  # _AS_QUOTE_IFELSE(STRING, IF-MODERN-QUOTATION, IF-OLD-QUOTATION)
# Line 326  m4_define([AS_ESCAPE], Line 326  m4_define([AS_ESCAPE],
326  # We use two quotes in the pattern to keep highlighting tools at peace.  # We use two quotes in the pattern to keep highlighting tools at peace.
327  m4_define([_AS_QUOTE_IFELSE],  m4_define([_AS_QUOTE_IFELSE],
328  [m4_bmatch([$1],  [m4_bmatch([$1],
329            [\\[\\$]], [$2],            [\\[\\$]], [$2],
330            [\\[`""]], [$3],            [\\[`""]], [$3],
331            [$2])])            [$2])])
332    
333    
334  # _AS_ECHO_UNQUOTED(STRING, [FD = AS_MESSAGE_FD])  # _AS_ECHO_UNQUOTED(STRING, [FD = AS_MESSAGE_FD])
# Line 344  m4_define([_AS_ECHO_UNQUOTED], Line 344  m4_define([_AS_ECHO_UNQUOTED],
344  # backslash all the quotes.  # backslash all the quotes.
345  m4_define([_AS_QUOTE],  m4_define([_AS_QUOTE],
346  [_AS_QUOTE_IFELSE([$1],  [_AS_QUOTE_IFELSE([$1],
347                    [AS_ESCAPE([$1], m4_default([$2], [`""]))],                    [AS_ESCAPE([$1], m4_default([$2], [`""]))],
348                    [m4_warn([obsolete],                    [m4_warn([obsolete],
349             [back quotes and double quotes must not be escaped in: $1])dnl             [back quotes and double quotes must not be escaped in: $1])dnl
350  $1])])  $1])])
351    
352    
# Line 382  esac Line 382  esac
382  m4_define([_AS_ECHO_N],  m4_define([_AS_ECHO_N],
383  [AS_REQUIRE([_AS_ECHO_N_PREPARE])dnl  [AS_REQUIRE([_AS_ECHO_N_PREPARE])dnl
384  echo $ECHO_N "_AS_QUOTE([$1])$ECHO_C" >&m4_default([$2],  echo $ECHO_N "_AS_QUOTE([$1])$ECHO_C" >&m4_default([$2],
385                                                      [AS_MESSAGE_FD])])                                                      [AS_MESSAGE_FD])])
386    
387    
388  # AS_MESSAGE(STRING, [FD = AS_MESSAGE_FD])  # AS_MESSAGE(STRING, [FD = AS_MESSAGE_FD])
389  # ----------------------------------------  # ----------------------------------------
390  m4_define([AS_MESSAGE],  m4_define([AS_MESSAGE],
391  [m4_ifset([AS_MESSAGE_LOG_FD],  [m4_ifset([AS_MESSAGE_LOG_FD],
392            [{ _AS_ECHO([$as_me:$LINENO: $1], [AS_MESSAGE_LOG_FD])            [{ _AS_ECHO([$as_me:$LINENO: $1], [AS_MESSAGE_LOG_FD])
393  _AS_ECHO([$as_me: $1], [$2]);}],  _AS_ECHO([$as_me: $1], [$2]);}],
394            [_AS_ECHO([$as_me: $1], [$2])])[]dnl            [_AS_ECHO([$as_me: $1], [$2])])[]dnl
395  ])  ])
396    
397    
# Line 431  m4_define([AS_ERROR], Line 431  m4_define([AS_ERROR],
431  m4_defun([AS_DIRNAME_EXPR],  m4_defun([AS_DIRNAME_EXPR],
432  [AS_REQUIRE([_AS_EXPR_PREPARE])dnl  [AS_REQUIRE([_AS_EXPR_PREPARE])dnl
433  $as_expr X[]$1 : 'X\(.*[[^/]]\)//*[[^/][^/]]*/*$' \| \  $as_expr X[]$1 : 'X\(.*[[^/]]\)//*[[^/][^/]]*/*$' \| \
434           X[]$1 : 'X\(//\)[[^/]]' \| \           X[]$1 : 'X\(//\)[[^/]]' \| \
435           X[]$1 : 'X\(//\)$' \| \           X[]$1 : 'X\(//\)$' \| \
436           X[]$1 : 'X\(/\)' \| \           X[]$1 : 'X\(/\)' \| \
437           .     : '\(.\)'])           .     : '\(.\)'])
438    
439  m4_defun([AS_DIRNAME_SED],  m4_defun([AS_DIRNAME_SED],
440  [echo X[]$1 |  [echo X[]$1 |
# Line 541  _AS_LINENO_WORKS || { Line 541  _AS_LINENO_WORKS || {
541    case $[0] in    case $[0] in
542      *[[\\/]]* ) as_myself=$[0] ;;      *[[\\/]]* ) as_myself=$[0] ;;
543      *) _AS_PATH_WALK([],      *) _AS_PATH_WALK([],
544                     [test -r "$as_dir/$[0]" && as_myself=$as_dir/$[0] && break])                     [test -r "$as_dir/$[0]" && as_myself=$as_dir/$[0] && break])
545         ;;         ;;
546    esac    esac
547    # We did not find ourselves, most probably we were run as `sh COMMAND'    # We did not find ourselves, most probably we were run as `sh COMMAND'
# Line 760  m4_defun([_AS_TEST_PREPARE], Line 760  m4_defun([_AS_TEST_PREPARE],
760  # must not be `/').  # must not be `/').
761  m4_define([AS_BOX],  m4_define([AS_BOX],
762  [AS_LITERAL_IF([$1],  [AS_LITERAL_IF([$1],
763                 [_AS_BOX_LITERAL($@)],                 [_AS_BOX_LITERAL($@)],
764                 [_AS_BOX_INDIR($@)])])                 [_AS_BOX_INDIR($@)])])
765    
766  # _AS_BOX_LITERAL(MESSAGE, [FRAME-CHARACTER = `-'])  # _AS_BOX_LITERAL(MESSAGE, [FRAME-CHARACTER = `-'])
767  # -------------------------------------------------  # -------------------------------------------------
# Line 786  _ASBOX]) Line 786  _ASBOX])
786  # definitely a literal, but will not be recognized as such.  # definitely a literal, but will not be recognized as such.
787  m4_define([AS_LITERAL_IF],  m4_define([AS_LITERAL_IF],
788  [m4_bmatch([$1], [[`$]],  [m4_bmatch([$1], [[`$]],
789             [$3], [$2])])             [$3], [$2])])
790    
791    
792  # AS_TMPDIR(PREFIX, [DIRECTORY = $TMPDIR [= /tmp]])  # AS_TMPDIR(PREFIX, [DIRECTORY = $TMPDIR [= /tmp]])
# Line 896  _AS_PATH_WALK([$PATH], [echo "PATH: $as_ Line 896  _AS_PATH_WALK([$PATH], [echo "PATH: $as_
896  m4_define([AS_HELP_STRING],  m4_define([AS_HELP_STRING],
897  [m4_pushdef([AS_Prefix], m4_default([$3], [                          ]))dnl  [m4_pushdef([AS_Prefix], m4_default([$3], [                          ]))dnl
898  m4_pushdef([AS_Prefix_Format],  m4_pushdef([AS_Prefix_Format],
899             [  %-]m4_eval(m4_len(AS_Prefix) - 3)[s ])dnl [  %-23s ]             [  %-]m4_eval(m4_len(AS_Prefix) - 3)[s ])dnl [  %-23s ]
900  m4_text_wrap([$2], AS_Prefix, m4_format(AS_Prefix_Format, [$1]))dnl  m4_text_wrap([$2], AS_Prefix, m4_format(AS_Prefix_Format, [$1]))dnl
901  m4_popdef([AS_Prefix_Format])dnl  m4_popdef([AS_Prefix_Format])dnl
902  m4_popdef([AS_Prefix])dnl  m4_popdef([AS_Prefix])dnl
# Line 945  as_tr_sh="sed y%*+%pp%;s%[[^_$as_cr_alnu Line 945  as_tr_sh="sed y%*+%pp%;s%[[^_$as_cr_alnu
945  m4_defun([AS_TR_SH],  m4_defun([AS_TR_SH],
946  [AS_REQUIRE([_$0_PREPARE])dnl  [AS_REQUIRE([_$0_PREPARE])dnl
947  AS_LITERAL_IF([$1],  AS_LITERAL_IF([$1],
948                [m4_bpatsubst(m4_translit([[$1]], [*+], [pp]),                [m4_bpatsubst(m4_translit([[$1]], [*+], [pp]),
949                              [[^a-zA-Z0-9_]], [_])],                              [[^a-zA-Z0-9_]], [_])],
950                [`echo "$1" | $as_tr_sh`])])                [`echo "$1" | $as_tr_sh`])])
951    
952    
953  # _AS_TR_CPP_PREPARE  # _AS_TR_CPP_PREPARE
# Line 967  as_tr_cpp="sed y%*$as_cr_letters%P$as_cr Line 967  as_tr_cpp="sed y%*$as_cr_letters%P$as_cr
967  m4_defun([AS_TR_CPP],  m4_defun([AS_TR_CPP],
968  [AS_REQUIRE([_$0_PREPARE])dnl  [AS_REQUIRE([_$0_PREPARE])dnl
969  AS_LITERAL_IF([$1],  AS_LITERAL_IF([$1],
970                [m4_bpatsubst(m4_translit([[$1]],                [m4_bpatsubst(m4_translit([[$1]],
971                                          [*abcdefghijklmnopqrstuvwxyz],                                          [*abcdefghijklmnopqrstuvwxyz],
972                                          [PABCDEFGHIJKLMNOPQRSTUVWXYZ]),                                          [PABCDEFGHIJKLMNOPQRSTUVWXYZ]),
973                             [[^A-Z0-9_]], [_])],                             [[^A-Z0-9_]], [_])],
974                [`echo "$1" | $as_tr_cpp`])])                [`echo "$1" | $as_tr_cpp`])])
975    
976    
977  # _AS_TR_PREPARE  # _AS_TR_PREPARE
# Line 1005  AS_REQUIRE([_AS_TR_CPP_PREPARE])dnl Line 1005  AS_REQUIRE([_AS_TR_CPP_PREPARE])dnl
1005  # perform whenever possible at m4 level, otherwise sh level.  # perform whenever possible at m4 level, otherwise sh level.
1006  m4_define([AS_VAR_SET],  m4_define([AS_VAR_SET],
1007  [AS_LITERAL_IF([$1],  [AS_LITERAL_IF([$1],
1008                 [$1=$2],                 [$1=$2],
1009                 [eval "$1=AS_ESCAPE([$2])"])])                 [eval "$1=AS_ESCAPE([$2])"])])
1010    
1011    
1012  # AS_VAR_GET(VARIABLE)  # AS_VAR_GET(VARIABLE)
# Line 1016  m4_define([AS_VAR_SET], Line 1016  m4_define([AS_VAR_SET],
1016  # else into the appropriate `eval' sequence.  # else into the appropriate `eval' sequence.
1017  m4_define([AS_VAR_GET],  m4_define([AS_VAR_GET],
1018  [AS_LITERAL_IF([$1],  [AS_LITERAL_IF([$1],
1019                 [$$1],                 [$$1],
1020                 [`eval echo '${'m4_bpatsubst($1, [[\\`]], [\\\&])'}'`])])                 [`eval echo '${'m4_bpatsubst($1, [[\\`]], [\\\&])'}'`])])
1021    
1022    
1023  # AS_VAR_TEST_SET(VARIABLE)  # AS_VAR_TEST_SET(VARIABLE)
# Line 1026  m4_define([AS_VAR_GET], Line 1026  m4_define([AS_VAR_GET],
1026  # is set.  Polymorphic.  Should be dnl'ed.  # is set.  Polymorphic.  Should be dnl'ed.
1027  m4_define([AS_VAR_TEST_SET],  m4_define([AS_VAR_TEST_SET],
1028  [AS_LITERAL_IF([$1],  [AS_LITERAL_IF([$1],
1029                 [test "${$1+set}" = set],                 [test "${$1+set}" = set],
1030                 [eval "test \"\${$1+set}\" = set"])])                 [eval "test \"\${$1+set}\" = set"])])
1031    
1032    
1033  # AS_VAR_SET_IF(VARIABLE, IF-TRUE, IF-FALSE)  # AS_VAR_SET_IF(VARIABLE, IF-TRUE, IF-FALSE)
# Line 1071  m4_define([AS_VAR_SET_IF], Line 1071  m4_define([AS_VAR_SET_IF],
1071  # the transliteration is handled here.  To be dnl'ed.  # the transliteration is handled here.  To be dnl'ed.
1072  m4_define([AS_VAR_PUSHDEF],  m4_define([AS_VAR_PUSHDEF],
1073  [AS_LITERAL_IF([$2],  [AS_LITERAL_IF([$2],
1074                 [m4_pushdef([$1], [AS_TR_SH($2)])],                 [m4_pushdef([$1], [AS_TR_SH($2)])],
1075                 [as_$1=AS_TR_SH($2)                 [as_$1=AS_TR_SH($2)
1076  m4_pushdef([$1], [$as_[$1]])])])  m4_pushdef([$1], [$as_[$1]])])])
1077    
1078    

Legend:
Removed from v.1.96  
changed lines
  Added in v.1.97

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26