git.oblomov.eu Git - ocl-icd/blob - tests/atenv.m4

   1 m4_define([AT_SHOWENV],[dnl
   2   m4_if([[$1]],[[]],,[
   3     eval _at_envval='"$'"$1"'"'
   4     AS_ECHO(["environment: $1='$(AS_ECHO(["$_at_envval"]) | sed "s/'/'\\\\''/g")'"])
   5     AT_SHOWENV(m4_shift($@))])
   6 ])
   7 m4_define([_AT_SHOWENV_REC],[dnl
   8   m4_if([[$1]],[[]],,[
   9     AT_SHOWENV([$1])
  10     _AT_SHOWENV_REC(m4_shift(m4_shift($@)))])
  11 ])
  12 m4_define([_AT_EXPORT_REC],[dnl
  13   m4_if([[$1]],[[]],,[
  14     $1=$2
  15     export $1
  16     AS_ECHO(["$at_srcdir/AT_LINE: AS_ESCAPE([[export $1=$2]])"])
  17     _AT_EXPORT_REC(m4_shift(m4_shift($@)))])
  18 ])
  19 m4_define([AT_EXPORT],[dnl
  20   _AT_EXPORT_REC($@)
  21   _AT_SHOWENV_REC($@)
  22 ])
  23 m4_define([AT_UNSET],[dnl
  24   m4_if([[$1]],[[]],,[
  25     unset $1
  26     AS_ECHO(["$at_srcdir/AT_LINE: AS_ESCAPE([[unset $1]])"])
  27     AT_UNSET(m4_shift($@))])
  28 ])
  29