#! /bin/sh
# Generated from testsuite.at by GNU Autoconf 2.71.
#
# Copyright (C) 2009-2017, 2020-2021 Free Software Foundation, Inc.
#
# This test suite is free software; the Free Software Foundation gives
# unlimited permission to copy, distribute and modify it.
## -------------------- ##
## M4sh Initialization. ##
## -------------------- ##

# Be more Bourne compatible
DUALCASE=1; export DUALCASE # for MKS sh
as_nop=:
if test ${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1
then :
  emulate sh
  NULLCMD=:
  # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
  # is contrary to our usage.  Disable this feature.
  alias -g '${1+"$@"}'='"$@"'
  setopt NO_GLOB_SUBST
else $as_nop
  case `(set -o) 2>/dev/null` in #(
  *posix*) :
    set -o posix ;; #(
  *) :
     ;;
esac
fi



# Reset variables that may have inherited troublesome values from
# the environment.

# IFS needs to be set, to space, tab, and newline, in precisely that order.
# (If _AS_PATH_WALK were called with IFS unset, it would have the
# side effect of setting IFS to empty, thus disabling word splitting.)
# Quoting is to prevent editors from complaining about space-tab.
as_nl='
'
export as_nl
IFS=" ""	$as_nl"

PS1='$ '
PS2='> '
PS4='+ '

# Ensure predictable behavior from utilities with locale-dependent output.
LC_ALL=C
export LC_ALL
LANGUAGE=C
export LANGUAGE

# We cannot yet rely on "unset" to work, but we need these variables
# to be unset--not just set to an empty or harmless value--now, to
# avoid bugs in old shells (e.g. pre-3.0 UWIN ksh).  This construct
# also avoids known problems related to "unset" and subshell syntax
# in other old shells (e.g. bash 2.01 and pdksh 5.2.14).
for as_var in BASH_ENV ENV MAIL MAILPATH CDPATH
do eval test \${$as_var+y} \
  && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
done

# Ensure that fds 0, 1, and 2 are open.
if (exec 3>&0) 2>/dev/null; then :; else exec 0</dev/null; fi
if (exec 3>&1) 2>/dev/null; then :; else exec 1>/dev/null; fi
if (exec 3>&2)            ; then :; else exec 2>/dev/null; fi

# The user is always right.
if ${PATH_SEPARATOR+false} :; then
  PATH_SEPARATOR=:
  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
    (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
      PATH_SEPARATOR=';'
  }
fi


# Find who we are.  Look in the path if we contain no directory separator.
as_myself=
case $0 in #((
  *[\\/]* ) as_myself=$0 ;;
  *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
    test -r "$as_dir$0" && as_myself=$as_dir$0 && break
  done
IFS=$as_save_IFS

     ;;
esac
# We did not find ourselves, most probably we were run as `sh COMMAND'
# in which case we are not to be found in the path.
if test "x$as_myself" = x; then
  as_myself=$0
fi
if test ! -f "$as_myself"; then
  printf "%s\n" "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
  exit 1
fi


if test "x$CONFIG_SHELL" = x; then
  as_bourne_compatible="as_nop=:
if test \${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1
then :
  emulate sh
  NULLCMD=:
  # Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which
  # is contrary to our usage.  Disable this feature.
  alias -g '\${1+\"\$@\"}'='\"\$@\"'
  setopt NO_GLOB_SUBST
else \$as_nop
  case \`(set -o) 2>/dev/null\` in #(
  *posix*) :
    set -o posix ;; #(
  *) :
     ;;
esac
fi
"
  as_required="as_fn_return () { (exit \$1); }
as_fn_success () { as_fn_return 0; }
as_fn_failure () { as_fn_return 1; }
as_fn_ret_success () { return 0; }
as_fn_ret_failure () { return 1; }

exitcode=0
as_fn_success || { exitcode=1; echo as_fn_success failed.; }
as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; }
as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; }
as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; }
if ( set x; as_fn_ret_success y && test x = \"\$1\" )
then :

else \$as_nop
  exitcode=1; echo positional parameters were not saved.
fi
test x\$exitcode = x0 || exit 1
blah=\$(echo \$(echo blah))
test x\"\$blah\" = xblah || exit 1
test -x / || exit 1"
  as_suggested="  as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO
  as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO
  eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" &&
  test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1
test \$(( 1 + 1 )) = 2 || exit 1"
  if (eval "$as_required") 2>/dev/null
then :
  as_have_required=yes
else $as_nop
  as_have_required=no
fi
  if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null
then :

else $as_nop
  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
as_found=false
for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
  as_found=:
  case $as_dir in #(
	 /*)
	   for as_base in sh bash ksh sh5; do
	     # Try only shells that exist, to save several forks.
	     as_shell=$as_dir$as_base
	     if { test -f "$as_shell" || test -f "$as_shell.exe"; } &&
		    as_run=a "$as_shell" -c "$as_bourne_compatible""$as_required" 2>/dev/null
then :
  CONFIG_SHELL=$as_shell as_have_required=yes
		   if as_run=a "$as_shell" -c "$as_bourne_compatible""$as_suggested" 2>/dev/null
then :
  break 2
fi
fi
	   done;;
       esac
  as_found=false
done
IFS=$as_save_IFS
if $as_found
then :

else $as_nop
  if { test -f "$SHELL" || test -f "$SHELL.exe"; } &&
	      as_run=a "$SHELL" -c "$as_bourne_compatible""$as_required" 2>/dev/null
then :
  CONFIG_SHELL=$SHELL as_have_required=yes
fi
fi


      if test "x$CONFIG_SHELL" != x
then :
  export CONFIG_SHELL
             # We cannot yet assume a decent shell, so we have to provide a
# neutralization value for shells without unset; and this also
# works around shells that cannot unset nonexistent variables.
# Preserve -v and -x to the replacement shell.
BASH_ENV=/dev/null
ENV=/dev/null
(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
case $- in # ((((
  *v*x* | *x*v* ) as_opts=-vx ;;
  *v* ) as_opts=-v ;;
  *x* ) as_opts=-x ;;
  * ) as_opts= ;;
esac
exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
# Admittedly, this is quite paranoid, since all the known shells bail
# out after a failed `exec'.
printf "%s\n" "$0: could not re-execute with $CONFIG_SHELL" >&2
exit 255
fi

    if test x$as_have_required = xno
then :
  printf "%s\n" "$0: This script requires a shell more modern than all"
  printf "%s\n" "$0: the shells that I found on your system."
  if test ${ZSH_VERSION+y} ; then
    printf "%s\n" "$0: In particular, zsh $ZSH_VERSION has bugs and should"
    printf "%s\n" "$0: be upgraded to zsh 4.3.4 or later."
  else
    printf "%s\n" "$0: Please tell bug-autoconf@gnu.org about your system,
$0: including any error possibly output before this
$0: message. Then install a modern shell, or manually run
$0: the script under such a shell if you do have one."
  fi
  exit 1
fi
fi
fi
SHELL=${CONFIG_SHELL-/bin/sh}
export SHELL
# Unset more variables known to interfere with behavior of common tools.
CLICOLOR_FORCE= GREP_OPTIONS=
unset CLICOLOR_FORCE GREP_OPTIONS

## --------------------- ##
## M4sh Shell Functions. ##
## --------------------- ##
# as_fn_unset VAR
# ---------------
# Portably unset VAR.
as_fn_unset ()
{
  { eval $1=; unset $1;}
}
as_unset=as_fn_unset


# as_fn_set_status STATUS
# -----------------------
# Set $? to STATUS, without forking.
as_fn_set_status ()
{
  return $1
} # as_fn_set_status

# as_fn_exit STATUS
# -----------------
# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
as_fn_exit ()
{
  set +e
  as_fn_set_status $1
  exit $1
} # as_fn_exit
# as_fn_nop
# ---------
# Do nothing but, unlike ":", preserve the value of $?.
as_fn_nop ()
{
  return $?
}
as_nop=as_fn_nop

# as_fn_mkdir_p
# -------------
# Create "$as_dir" as a directory, including parents if necessary.
as_fn_mkdir_p ()
{

  case $as_dir in #(
  -*) as_dir=./$as_dir;;
  esac
  test -d "$as_dir" || eval $as_mkdir_p || {
    as_dirs=
    while :; do
      case $as_dir in #(
      *\'*) as_qdir=`printf "%s\n" "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
      *) as_qdir=$as_dir;;
      esac
      as_dirs="'$as_qdir' $as_dirs"
      as_dir=`$as_dirname -- "$as_dir" ||
$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
	 X"$as_dir" : 'X\(//\)[^/]' \| \
	 X"$as_dir" : 'X\(//\)$' \| \
	 X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
printf "%s\n" X"$as_dir" |
    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
	    s//\1/
	    q
	  }
	  /^X\(\/\/\)[^/].*/{
	    s//\1/
	    q
	  }
	  /^X\(\/\/\)$/{
	    s//\1/
	    q
	  }
	  /^X\(\/\).*/{
	    s//\1/
	    q
	  }
	  s/.*/./; q'`
      test -d "$as_dir" && break
    done
    test -z "$as_dirs" || eval "mkdir $as_dirs"
  } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"


} # as_fn_mkdir_p

# as_fn_executable_p FILE
# -----------------------
# Test if FILE is an executable regular file.
as_fn_executable_p ()
{
  test -f "$1" && test -x "$1"
} # as_fn_executable_p
# as_fn_append VAR VALUE
# ----------------------
# Append the text in VALUE to the end of the definition contained in VAR. Take
# advantage of any shell optimizations that allow amortized linear growth over
# repeated appends, instead of the typical quadratic growth present in naive
# implementations.
if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null
then :
  eval 'as_fn_append ()
  {
    eval $1+=\$2
  }'
else $as_nop
  as_fn_append ()
  {
    eval $1=\$$1\$2
  }
fi # as_fn_append

# as_fn_arith ARG...
# ------------------
# Perform arithmetic evaluation on the ARGs, and store the result in the
# global $as_val. Take advantage of shells that can avoid forks. The arguments
# must be portable across $(()) and expr.
if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null
then :
  eval 'as_fn_arith ()
  {
    as_val=$(( $* ))
  }'
else $as_nop
  as_fn_arith ()
  {
    as_val=`expr "$@" || test $? -eq 1`
  }
fi # as_fn_arith


# as_fn_error STATUS ERROR [LINENO LOG_FD]
# ----------------------------------------
# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
# script with STATUS, using 1 if that was 0.
as_fn_error ()
{
  as_status=$1; test $as_status -eq 0 && as_status=1
  if test "$4"; then
    as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
    printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
  fi
  printf "%s\n" "$as_me: error: $2" >&2
  as_fn_exit $as_status
} # as_fn_error

if expr a : '\(a\)' >/dev/null 2>&1 &&
   test "X`expr 00001 : '.*\(...\)'`" = X001; then
  as_expr=expr
else
  as_expr=false
fi

if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
  as_basename=basename
else
  as_basename=false
fi

as_me=`$as_basename -- "$0" ||
$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
	 X"$0" : 'X\(//\)$' \| \
	 X"$0" : 'X\(/\)' \| . 2>/dev/null ||
printf "%s\n" X/"$0" |
    sed '/^.*\/\([^/][^/]*\)\/*$/{
	    s//\1/
	    q
	  }
	  /^X\/\(\/\/\)$/{
	    s//\1/
	    q
	  }
	  /^X\/\(\/\).*/{
	    s//\1/
	    q
	  }
	  s/.*/./; q'`

if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
  as_dirname=dirname
else
  as_dirname=false
fi

# Avoid depending upon Character Ranges.
as_cr_letters='abcdefghijklmnopqrstuvwxyz'
as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
as_cr_Letters=$as_cr_letters$as_cr_LETTERS
as_cr_digits='0123456789'
as_cr_alnum=$as_cr_Letters$as_cr_digits


  as_lineno_1=$LINENO as_lineno_1a=$LINENO
  as_lineno_2=$LINENO as_lineno_2a=$LINENO
  eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" &&
  test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || {
  # Blame Lee E. McMahon (1931-1989) for sed's syntax.  :-)
  sed -n '
    p
    /[$]LINENO/=
  ' <$as_myself |
    sed '
      s/[$]LINENO.*/&-/
      t lineno
      b
      :lineno
      N
      :loop
      s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/
      t loop
      s/-\n.*//
    ' >$as_me.lineno &&
  chmod +x "$as_me.lineno" ||
    { printf "%s\n" "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; }

  # If we had to re-execute with $CONFIG_SHELL, we're ensured to have
  # already done that, so ensure we don't try to do so again and fall
  # in an infinite loop.  This has already happened in practice.
  _as_can_reexec=no; export _as_can_reexec
  # Don't try to exec as it changes $[0], causing all sort of problems
  # (the dirname of $[0] is not the place where we might find the
  # original and so on.  Autoconf is especially sensitive to this).
  . "./$as_me.lineno"
  # Exit status is that of the last command.
  exit
}


# Determine whether it's possible to make 'echo' print without a newline.
# These variables are no longer used directly by Autoconf, but are AC_SUBSTed
# for compatibility with existing Makefiles.
ECHO_C= ECHO_N= ECHO_T=
case `echo -n x` in #(((((
-n*)
  case `echo 'xy\c'` in
  *c*) ECHO_T='	';;	# ECHO_T is single tab character.
  xy)  ECHO_C='\c';;
  *)   echo `echo ksh88 bug on AIX 6.1` > /dev/null
       ECHO_T='	';;
  esac;;
*)
  ECHO_N='-n';;
esac

# For backward compatibility with old third-party macros, we provide
# the shell variables $as_echo and $as_echo_n.  New code should use
# AS_ECHO(["message"]) and AS_ECHO_N(["message"]), respectively.
as_echo='printf %s\n'
as_echo_n='printf %s'


rm -f conf$$ conf$$.exe conf$$.file
if test -d conf$$.dir; then
  rm -f conf$$.dir/conf$$.file
else
  rm -f conf$$.dir
  mkdir conf$$.dir 2>/dev/null
fi
if (echo >conf$$.file) 2>/dev/null; then
  if ln -s conf$$.file conf$$ 2>/dev/null; then
    as_ln_s='ln -s'
    # ... but there are two gotchas:
    # 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
    # 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
    # In both cases, we have to default to `cp -pR'.
    ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
      as_ln_s='cp -pR'
  elif ln conf$$.file conf$$ 2>/dev/null; then
    as_ln_s=ln
  else
    as_ln_s='cp -pR'
  fi
else
  as_ln_s='cp -pR'
fi
rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
rmdir conf$$.dir 2>/dev/null

if mkdir -p . 2>/dev/null; then
  as_mkdir_p='mkdir -p "$as_dir"'
else
  test -d ./-p && rmdir ./-p
  as_mkdir_p=false
fi

as_test_x='test -x'
as_executable_p=as_fn_executable_p

# Sed expression to map a string onto a valid CPP name.
as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"

# Sed expression to map a string onto a valid variable name.
as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"





SHELL=${CONFIG_SHELL-/bin/sh}

# How were we run?
at_cli_args="$@"


# Not all shells have the 'times' builtin; the subshell is needed to make
# sure we discard the 'times: not found' message from the shell.
at_times_p=false
(times) >/dev/null 2>&1 && at_times_p=:

# CLI Arguments to pass to the debugging scripts.
at_debug_args=
# -e sets to true
at_errexit_p=false
# Shall we be verbose?  ':' means no, empty means yes.
at_verbose=:
at_quiet=
# Running several jobs in parallel, 0 means as many as test groups.
at_jobs=1
at_traceon=:
at_trace_echo=:
at_check_filter_trace=:

# Shall we keep the debug scripts?  Must be `:' when the suite is
# run by a debug script, so that the script doesn't remove itself.
at_debug_p=false
# Display help message?
at_help_p=false
# Display the version message?
at_version_p=false
# List test groups?
at_list_p=false
# --clean
at_clean=false
# Test groups to run
at_groups=
# Whether to rerun failed tests.
at_recheck=
# Whether a write failure occurred
at_write_fail=0

# The directory we run the suite in.  Default to . if no -C option.
at_dir=`pwd`
# An absolute reference to this testsuite script.
case $as_myself in
  [\\/]* | ?:[\\/]* ) at_myself=$as_myself ;;
  * ) at_myself=$at_dir/$as_myself ;;
esac
# Whether -C is in effect.
at_change_dir=false

# Whether to enable colored test results.
at_color=no
# As many question marks as there are digits in the last test group number.
# Used to normalize the test group numbers so that `ls' lists them in
# numerical order.
at_format='??'
# Description of all the test groups.
at_help_all="1;simple.at:17;Simple expansion;;
2;braces.at:17;Brace expansion;;
3;usedfl.at:17;Use default values;;
4;asndfl.at:17;Assign default values;;
5;enull.at:17;Display Error if Null or Unset;;
6;errmsg.at:17;Display Custom Error if Null or Unset;;
7;usealt.at:17;Use Alternate Value;;
8;ternary.at:17;Ternary operator;;
9;strip.at:17;Strip;strip;
10;patsubst.at:16;Pattern substitution;patsubst;
11;set.at:17;\$\$set;;
12;unset.at:17;\$\$unset;;
13;ifset.at:17;\$\$ifset;;
14;ifnset.at:17;\$\$ifnset;;
15;ifdef.at:17;\$\$ifdef;;
16;ifndef.at:17;\$\$ifndef;;
17;iftrue.at:17;\$\$iftrue;;
18;iffalse.at:17;\$\$iffalse;;
19;ifcom.at:17;\$\$ifcom;;
20;ifcombs.at:17;\$\$ifcom (continuation lines);;
21;ifncom.at:17;\$\$ifncom;;
22;ifncombs.at:17;\$\$ifncom (continuation lines);;
23;condfalse.at:17;directives in false branch;;
24;range.at:17;\$\$range;range;
25;loop.at:17;\$\$loop;loop;
26;eval.at:17;\$\$eval;eval;
27;special.at:17;\$\$ statements;;
28;comment.at:17;Comments;;
29;dnl.at:16;dnl;;
30;ignore.at:16;ignore;ignore;
31;quote.at:17;Quoting;;
32;verbatim.at:17;Verbatim;;
33;eof.at:17;EOF corner cases;;
34;syncline.at:17;synclines;;
35;command.at:16;Command substitution;;
36;include.at:17;\$\$include relative;;
37;include1.at:17;\$\$include path;;
38;include2.at:17;\$\$include nonexistent;;
39;include3.at:17;\$\$include recursive;;
40;include4.at:17;\$\$include conditional;;
41;include5.at:17;\$\$include path and relative files;;
42;sinclude.at:17;\$\$sinclude;;
43;escape.at:17;Escaping;;
44;divert.at:17;diversions;diversions divert undivert;
45;macro.at:16;Macros;macro macros;
46;direxp.at:17;directives in variable expansion;;
47;warning.at:17;\$\$warning;warning;
48;error.at:17;\$\$error;error;
49;exit.at:17;\$\$exit;exit;
50;require.at:16;\$\$require;require;
51;rpe_end.at:16;unmatched \$\$end;rpe end;
52;rpe_set.at:16;\$\$set;rpe rpe_set;
53;rpe_range.at:16;\$\$range;rpe rpe_range;
54;range_eof.at:17;EOF in \$\$range;rpe rpe_range rpe_range_eof;
55;loop_eof.at:16;EOF in \$\$loop;rpe rpe_loop_eof;
56;comment_eof.at:16;EOF in comment;rpe comment_eof;
57;ignore_eof.at:16;EOF in \$\$ignore;rpe ignore_eof;
58;simple.at:17;Simple expansion;;
59;usedfl.at:17;Use default values;;
60;asndfl.at:17;Assign default values;;
61;enull.at:17;Display Error if Null or Unset;;
62;errmsg.at:17;Display Custom Error if Null or Unset;;
63;usealt.at:17;Use Alternate Value;;
64;ternary.at:17;Ternary operator;;
65;patsubst.at:16;Pattern substitution;patsubst;
66;strip.at:17;Strip;strip;
67;set.at:17;\$\$set;;
68;comment.at:17;Comments;;
69;quote.at:17;Quoting;;
70;verbatim.at:17;Verbatim;;
71;command.at:16;Command substitution;;
"
# List of the all the test groups.
at_groups_all=`printf "%s\n" "$at_help_all" | sed 's/;.*//'`

# at_fn_validate_ranges NAME...
# -----------------------------
# Validate and normalize the test group number contained in each variable
# NAME. Leading zeroes are treated as decimal.
at_fn_validate_ranges ()
{
  for at_grp
  do
    eval at_value=\$$at_grp
    if test $at_value -lt 1 || test $at_value -gt 71; then
      printf "%s\n" "invalid test group: $at_value" >&2
      exit 1
    fi
    case $at_value in
      0*) # We want to treat leading 0 as decimal, like expr and test, but
	  # AS_VAR_ARITH treats it as octal if it uses $(( )).
	  # With XSI shells, ${at_value#${at_value%%[1-9]*}} avoids the
	  # expr fork, but it is not worth the effort to determine if the
	  # shell supports XSI when the user can just avoid leading 0.
	  eval $at_grp='`expr $at_value + 0`' ;;
    esac
  done
}
# List of the tested programs.
at_tested='"xenv"'


at_prev=
for at_option
do
  # If the previous option needs an argument, assign it.
  if test -n "$at_prev"; then
    at_option=$at_prev=$at_option
    at_prev=
  fi

  case $at_option in
  *=?*) at_optarg=`expr "X$at_option" : '[^=]*=\(.*\)'` ;;
  *)    at_optarg= ;;
  esac

  case $at_option in
    --help | -h )
	at_help_p=:
	;;

    --list | -l )
	at_list_p=:
	;;

    --version | -V )
	at_version_p=:
	;;

    --clean | -c )
	at_clean=:
	;;

    --color )
	at_color=always
	;;
    --color=* )
	case $at_optarg in
	no | never | none) at_color=never ;;
	auto | tty | if-tty) at_color=auto ;;
	always | yes | force) at_color=always ;;
	*) at_optname=`echo " $at_option" | sed 's/^ //; s/=.*//'`
	   as_fn_error $? "unrecognized argument to $at_optname: $at_optarg" ;;
	esac
	;;

    --debug | -d )
	at_debug_p=:
	;;

    --errexit | -e )
	at_debug_p=:
	at_errexit_p=:
	;;

    --verbose | -v )
	at_verbose=; at_quiet=:
	;;

    --trace | -x )
	at_traceon='set -x'
	at_trace_echo=echo
	at_check_filter_trace=at_fn_filter_trace
	;;

    [0-9] | [0-9][0-9] | [0-9][0-9][0-9] | [0-9][0-9][0-9][0-9])
	at_fn_validate_ranges at_option
	as_fn_append at_groups "$at_option$as_nl"
	;;

    # Ranges
    [0-9]- | [0-9][0-9]- | [0-9][0-9][0-9]- | [0-9][0-9][0-9][0-9]-)
	at_range_start=`echo $at_option |tr -d X-`
	at_fn_validate_ranges at_range_start
	at_range=`printf "%s\n" "$at_groups_all" | \
	  sed -ne '/^'$at_range_start'$/,$p'`
	as_fn_append at_groups "$at_range$as_nl"
	;;

    -[0-9] | -[0-9][0-9] | -[0-9][0-9][0-9] | -[0-9][0-9][0-9][0-9])
	at_range_end=`echo $at_option |tr -d X-`
	at_fn_validate_ranges at_range_end
	at_range=`printf "%s\n" "$at_groups_all" | \
	  sed -ne '1,/^'$at_range_end'$/p'`
	as_fn_append at_groups "$at_range$as_nl"
	;;

    [0-9]-[0-9] | [0-9]-[0-9][0-9] | [0-9]-[0-9][0-9][0-9] | \
    [0-9]-[0-9][0-9][0-9][0-9] | [0-9][0-9]-[0-9][0-9] | \
    [0-9][0-9]-[0-9][0-9][0-9] | [0-9][0-9]-[0-9][0-9][0-9][0-9] | \
    [0-9][0-9][0-9]-[0-9][0-9][0-9] | \
    [0-9][0-9][0-9]-[0-9][0-9][0-9][0-9] | \
    [0-9][0-9][0-9][0-9]-[0-9][0-9][0-9][0-9] )
	at_range_start=`expr $at_option : '\(.*\)-'`
	at_range_end=`expr $at_option : '.*-\(.*\)'`
	if test $at_range_start -gt $at_range_end; then
	  at_tmp=$at_range_end
	  at_range_end=$at_range_start
	  at_range_start=$at_tmp
	fi
	at_fn_validate_ranges at_range_start at_range_end
	at_range=`printf "%s\n" "$at_groups_all" | \
	  sed -ne '/^'$at_range_start'$/,/^'$at_range_end'$/p'`
	as_fn_append at_groups "$at_range$as_nl"
	;;

    # Directory selection.
    --directory | -C )
	at_prev=--directory
	;;
    --directory=* )
	at_change_dir=:
	at_dir=$at_optarg
	if test x- = "x$at_dir" ; then
	  at_dir=./-
	fi
	;;

    # Parallel execution.
    --jobs | -j )
	at_jobs=0
	;;
    --jobs=* | -j[0-9]* )
	if test -n "$at_optarg"; then
	  at_jobs=$at_optarg
	else
	  at_jobs=`expr X$at_option : 'X-j\(.*\)'`
	fi
	case $at_jobs in *[!0-9]*)
	  at_optname=`echo " $at_option" | sed 's/^ //; s/[0-9=].*//'`
	  as_fn_error $? "non-numeric argument to $at_optname: $at_jobs" ;;
	esac
	;;

    # Keywords.
    --keywords | -k )
	at_prev=--keywords
	;;
    --keywords=* )
	at_groups_selected=$at_help_all
	at_save_IFS=$IFS
	IFS=,
	set X $at_optarg
	shift
	IFS=$at_save_IFS
	for at_keyword
	do
	  at_invert=
	  case $at_keyword in
	  '!'*)
	    at_invert="-v"
	    at_keyword=`expr "X$at_keyword" : 'X!\(.*\)'`
	    ;;
	  esac
	  # It is on purpose that we match the test group titles too.
	  at_groups_selected=`printf "%s\n" "$at_groups_selected" |
	      grep -i $at_invert "^[1-9][^;]*;.*[; ]$at_keyword[ ;]"`
	done
	# Smash the keywords.
	at_groups_selected=`printf "%s\n" "$at_groups_selected" | sed 's/;.*//'`
	as_fn_append at_groups "$at_groups_selected$as_nl"
	;;
    --recheck)
	at_recheck=:
	;;

    *=*)
	at_envvar=`expr "x$at_option" : 'x\([^=]*\)='`
	# Reject names that are not valid shell variable names.
	case $at_envvar in
	  '' | [0-9]* | *[!_$as_cr_alnum]* )
	    as_fn_error $? "invalid variable name: \`$at_envvar'" ;;
	esac
	at_value=`printf "%s\n" "$at_optarg" | sed "s/'/'\\\\\\\\''/g"`
	# Export now, but save eval for later and for debug scripts.
	export $at_envvar
	as_fn_append at_debug_args " $at_envvar='$at_value'"
	;;

     *) printf "%s\n" "$as_me: invalid option: $at_option" >&2
	printf "%s\n" "Try \`$0 --help' for more information." >&2
	exit 1
	;;
  esac
done

# Verify our last option didn't require an argument
if test -n "$at_prev"
then :
  as_fn_error $? "\`$at_prev' requires an argument"
fi

# The file containing the suite.
at_suite_log=$at_dir/$as_me.log

# Selected test groups.
if test -z "$at_groups$at_recheck"; then
  at_groups=$at_groups_all
else
  if test -n "$at_recheck" && test -r "$at_suite_log"; then
    at_oldfails=`sed -n '
      /^Failed tests:$/,/^Skipped tests:$/{
	s/^[ ]*\([1-9][0-9]*\):.*/\1/p
      }
      /^Unexpected passes:$/,/^## Detailed failed tests/{
	s/^[ ]*\([1-9][0-9]*\):.*/\1/p
      }
      /^## Detailed failed tests/q
      ' "$at_suite_log"`
    as_fn_append at_groups "$at_oldfails$as_nl"
  fi
  # Sort the tests, removing duplicates.
  at_groups=`printf "%s\n" "$at_groups" | sort -nu | sed '/^$/d'`
fi

if test x"$at_color" = xalways \
   || { test x"$at_color" = xauto && test -t 1; }; then
  at_red=`printf '\033[0;31m'`
  at_grn=`printf '\033[0;32m'`
  at_lgn=`printf '\033[1;32m'`
  at_blu=`printf '\033[1;34m'`
  at_std=`printf '\033[m'`
else
  at_red= at_grn= at_lgn= at_blu= at_std=
fi

# Help message.
if $at_help_p; then
  cat <<_ATEOF || at_write_fail=1
Usage: $0 [OPTION]... [VARIABLE=VALUE]... [TESTS]

Run all the tests, or the selected TESTS, given by numeric ranges, and
save a detailed log file.  Upon failure, create debugging scripts.

Do not change environment variables directly.  Instead, set them via
command line arguments.  Set \`AUTOTEST_PATH' to select the executables
to exercise.  Each relative directory is expanded as build and source
directories relative to the top level of this distribution.
E.g., from within the build directory /tmp/foo-1.0, invoking this:

  $ $0 AUTOTEST_PATH=bin

is equivalent to the following, assuming the source directory is /src/foo-1.0:

  PATH=/tmp/foo-1.0/bin:/src/foo-1.0/bin:\$PATH $0
_ATEOF
cat <<_ATEOF || at_write_fail=1

Operation modes:
  -h, --help     print the help message, then exit
  -V, --version  print version number, then exit
  -c, --clean    remove all the files this test suite might create and exit
  -l, --list     describes all the tests, or the selected TESTS
_ATEOF
cat <<_ATEOF || at_write_fail=1

Execution tuning:
  -C, --directory=DIR
                 change to directory DIR before starting
      --color[=never|auto|always]
                 enable colored test results on terminal, or always
  -j, --jobs[=N]
                 Allow N jobs at once; infinite jobs with no arg (default 1)
  -k, --keywords=KEYWORDS
                 select the tests matching all the comma-separated KEYWORDS
                 multiple \`-k' accumulate; prefixed \`!' negates a KEYWORD
      --recheck  select all tests that failed or passed unexpectedly last time
  -e, --errexit  abort as soon as a test fails; implies --debug
  -v, --verbose  force more detailed output
                 default for debugging scripts
  -d, --debug    inhibit clean up and top-level logging
                 default for debugging scripts
  -x, --trace    enable tests shell tracing
_ATEOF
cat <<_ATEOF || at_write_fail=1

Report bugs to <gray@gnu.org>.
_ATEOF
  exit $at_write_fail
fi

# List of tests.
if $at_list_p; then
  cat <<_ATEOF || at_write_fail=1
xenv 4.2 test suite test groups:

 NUM: FILE-NAME:LINE     TEST-GROUP-NAME
      KEYWORDS

_ATEOF
  # Pass an empty line as separator between selected groups and help.
  printf "%s\n" "$at_groups$as_nl$as_nl$at_help_all" |
    awk 'NF == 1 && FS != ";" {
	   selected[$ 1] = 1
	   next
	 }
	 /^$/ { FS = ";" }
	 NF > 0 {
	   if (selected[$ 1]) {
	     printf " %3d: %-18s %s\n", $ 1, $ 2, $ 3
	     if ($ 4) {
	       lmax = 79
	       indent = "     "
	       line = indent
	       len = length (line)
	       n = split ($ 4, a, " ")
	       for (i = 1; i <= n; i++) {
		 l = length (a[i]) + 1
		 if (i > 1 && len + l > lmax) {
		   print line
		   line = indent " " a[i]
		   len = length (line)
		 } else {
		   line = line " " a[i]
		   len += l
		 }
	       }
	       if (n)
		 print line
	     }
	   }
	 }' || at_write_fail=1
  exit $at_write_fail
fi
if $at_version_p; then
  printf "%s\n" "$as_me (xenv 4.2)" &&
  cat <<\_ATEOF || at_write_fail=1

Copyright (C) 2021 Free Software Foundation, Inc.
This test suite is free software; the Free Software Foundation gives
unlimited permission to copy, distribute and modify it.
_ATEOF
  exit $at_write_fail
fi

# Should we print banners?  Yes if more than one test is run.
case $at_groups in #(
  *$as_nl* )
      at_print_banners=: ;; #(
  * ) at_print_banners=false ;;
esac
# Text for banner N, set to a single space once printed.
# Banner 1. testsuite.at:71
# Category starts at test group 51.
at_banner_text_1="Error recovery"
# Banner 2. testsuite.at:76
# Category starts at test group 54.
at_banner_text_2="Unexpected EOF"
# Banner 3. testsuite.at:82
# Category starts at test group 58.
at_banner_text_3="Environment meta-variable"

# Take any -C into account.
if $at_change_dir ; then
  test x != "x$at_dir" && cd "$at_dir" \
    || as_fn_error $? "unable to change directory"
  at_dir=`pwd`
fi

# Load the config files for any default variable assignments.
for at_file in atconfig atlocal
do
  test -r $at_file || continue
  . ./$at_file || as_fn_error $? "invalid content: $at_file"
done

# Autoconf <=2.59b set at_top_builddir instead of at_top_build_prefix:
: "${at_top_build_prefix=$at_top_builddir}"

# Perform any assignments requested during argument parsing.
eval "$at_debug_args"

# atconfig delivers names relative to the directory the test suite is
# in, but the groups themselves are run in testsuite-dir/group-dir.
if test -n "$at_top_srcdir"; then
  builddir=../..
  for at_dir_var in srcdir top_srcdir top_build_prefix
  do
    eval at_val=\$at_$at_dir_var
    case $at_val in
      [\\/$]* | ?:[\\/]* ) at_prefix= ;;
      *) at_prefix=../../ ;;
    esac
    eval "$at_dir_var=\$at_prefix\$at_val"
  done
fi

## -------------------- ##
## Directory structure. ##
## -------------------- ##

# This is the set of directories and files used by this script
# (non-literals are capitalized):
#
# TESTSUITE         - the testsuite
# TESTSUITE.log     - summarizes the complete testsuite run
# TESTSUITE.dir/    - created during a run, remains after -d or failed test
# + at-groups/      - during a run: status of all groups in run
# | + NNN/          - during a run: meta-data about test group NNN
# | | + check-line  - location (source file and line) of current AT_CHECK
# | | + status      - exit status of current AT_CHECK
# | | + stdout      - stdout of current AT_CHECK
# | | + stder1      - stderr, including trace
# | | + stderr      - stderr, with trace filtered out
# | | + test-source - portion of testsuite that defines group
# | | + times       - timestamps for computing duration
# | | + pass        - created if group passed
# | | + xpass       - created if group xpassed
# | | + fail        - created if group failed
# | | + xfail       - created if group xfailed
# | | + skip        - created if group skipped
# + at-stop         - during a run: end the run if this file exists
# + at-source-lines - during a run: cache of TESTSUITE line numbers for extraction
# + 0..NNN/         - created for each group NNN, remains after -d or failed test
# | + TESTSUITE.log - summarizes the group results
# | + ...           - files created during the group

# The directory the whole suite works in.
# Should be absolute to let the user `cd' at will.
at_suite_dir=$at_dir/$as_me.dir
# The file containing the suite ($at_dir might have changed since earlier).
at_suite_log=$at_dir/$as_me.log
# The directory containing helper files per test group.
at_helper_dir=$at_suite_dir/at-groups
# Stop file: if it exists, do not start new jobs.
at_stop_file=$at_suite_dir/at-stop
# The fifo used for the job dispatcher.
at_job_fifo=$at_suite_dir/at-job-fifo

if $at_clean; then
  test -d "$at_suite_dir" &&
    find "$at_suite_dir" -type d ! -perm -700 -exec chmod u+rwx \{\} \;
  rm -f -r "$at_suite_dir" "$at_suite_log"
  exit $?
fi

# Don't take risks: use only absolute directories in PATH.
#
# For stand-alone test suites (ie. atconfig was not found),
# AUTOTEST_PATH is relative to `.'.
#
# For embedded test suites, AUTOTEST_PATH is relative to the top level
# of the package.  Then expand it into build/src parts, since users
# may create executables in both places.
AUTOTEST_PATH=`printf "%s\n" "$AUTOTEST_PATH" | sed "s|:|$PATH_SEPARATOR|g"`
at_path=
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $AUTOTEST_PATH $PATH
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
    test -n "$at_path" && as_fn_append at_path $PATH_SEPARATOR
case $as_dir in
  [\\/]* | ?:[\\/]* )
    as_fn_append at_path "$as_dir"
    ;;
  * )
    if test -z "$at_top_build_prefix"; then
      # Stand-alone test suite.
      as_fn_append at_path "$as_dir"
    else
      # Embedded test suite.
      as_fn_append at_path "$at_top_build_prefix$as_dir$PATH_SEPARATOR"
      as_fn_append at_path "$at_top_srcdir/$as_dir"
    fi
    ;;
esac
  done
IFS=$as_save_IFS


# Now build and simplify PATH.
#
# There might be directories that don't exist, but don't redirect
# builtins' (eg., cd) stderr directly: Ultrix's sh hates that.
at_new_path=
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $at_path
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
    test -d "$as_dir" || continue
case $as_dir in
  [\\/]* | ?:[\\/]* ) ;;
  * ) as_dir=`(cd "$as_dir" && pwd) 2>/dev/null` ;;
esac
case $PATH_SEPARATOR$at_new_path$PATH_SEPARATOR in
  *$PATH_SEPARATOR$as_dir$PATH_SEPARATOR*) ;;
  $PATH_SEPARATOR$PATH_SEPARATOR) at_new_path=$as_dir ;;
  *) as_fn_append at_new_path "$PATH_SEPARATOR$as_dir" ;;
esac
  done
IFS=$as_save_IFS

PATH=$at_new_path
export PATH

# Setting up the FDs.



# 5 is the log file.  Not to be overwritten if `-d'.
if $at_debug_p; then
  at_suite_log=/dev/null
else
  : >"$at_suite_log"
fi
exec 5>>"$at_suite_log"

# Banners and logs.
printf "%s\n" "## -------------------- ##
## xenv 4.2 test suite. ##
## -------------------- ##"
{
  printf "%s\n" "## -------------------- ##
## xenv 4.2 test suite. ##
## -------------------- ##"
  echo

  printf "%s\n" "$as_me: command line was:"
  printf "%s\n" "  \$ $0 $at_cli_args"
  echo

  # If ChangeLog exists, list a few lines in case it might help determining
  # the exact version.
  if test -n "$at_top_srcdir" && test -f "$at_top_srcdir/ChangeLog"; then
    printf "%s\n" "## ---------- ##
## ChangeLog. ##
## ---------- ##"
    echo
    sed 's/^/| /;10q' "$at_top_srcdir/ChangeLog"
    echo
  fi

  {
cat <<_ASUNAME
## --------- ##
## Platform. ##
## --------- ##

hostname = `(hostname || uname -n) 2>/dev/null | sed 1q`
uname -m = `(uname -m) 2>/dev/null || echo unknown`
uname -r = `(uname -r) 2>/dev/null || echo unknown`
uname -s = `(uname -s) 2>/dev/null || echo unknown`
uname -v = `(uname -v) 2>/dev/null || echo unknown`

/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null || echo unknown`
/bin/uname -X     = `(/bin/uname -X) 2>/dev/null     || echo unknown`

/bin/arch              = `(/bin/arch) 2>/dev/null              || echo unknown`
/usr/bin/arch -k       = `(/usr/bin/arch -k) 2>/dev/null       || echo unknown`
/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null || echo unknown`
/usr/bin/hostinfo      = `(/usr/bin/hostinfo) 2>/dev/null      || echo unknown`
/bin/machine           = `(/bin/machine) 2>/dev/null           || echo unknown`
/usr/bin/oslevel       = `(/usr/bin/oslevel) 2>/dev/null       || echo unknown`
/bin/universe          = `(/bin/universe) 2>/dev/null          || echo unknown`

_ASUNAME

as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
    printf "%s\n" "PATH: $as_dir"
  done
IFS=$as_save_IFS

}
  echo

  # Contents of the config files.
  for at_file in atconfig atlocal
  do
    test -r $at_file || continue
    printf "%s\n" "$as_me: $at_file:"
    sed 's/^/| /' $at_file
    echo
  done
} >&5


## ------------------------- ##
## Autotest shell functions. ##
## ------------------------- ##

# at_fn_banner NUMBER
# -------------------
# Output banner NUMBER, provided the testsuite is running multiple groups and
# this particular banner has not yet been printed.
at_fn_banner ()
{
  $at_print_banners || return 0
  eval at_banner_text=\$at_banner_text_$1
  test "x$at_banner_text" = "x " && return 0
  eval "at_banner_text_$1=\" \""
  if test -z "$at_banner_text"; then
    $at_first || echo
  else
    printf "%s\n" "$as_nl$at_banner_text$as_nl"
  fi
} # at_fn_banner

# at_fn_check_prepare_notrace REASON LINE
# ---------------------------------------
# Perform AT_CHECK preparations for the command at LINE for an untraceable
# command; REASON is the reason for disabling tracing.
at_fn_check_prepare_notrace ()
{
  $at_trace_echo "Not enabling shell tracing (command contains $1)"
  printf "%s\n" "$2" >"$at_check_line_file"
  at_check_trace=: at_check_filter=:
  : >"$at_stdout"; : >"$at_stderr"
}

# at_fn_check_prepare_trace LINE
# ------------------------------
# Perform AT_CHECK preparations for the command at LINE for a traceable
# command.
at_fn_check_prepare_trace ()
{
  printf "%s\n" "$1" >"$at_check_line_file"
  at_check_trace=$at_traceon at_check_filter=$at_check_filter_trace
  : >"$at_stdout"; : >"$at_stderr"
}

# at_fn_check_prepare_dynamic COMMAND LINE
# ----------------------------------------
# Decide if COMMAND at LINE is traceable at runtime, and call the appropriate
# preparation function.
at_fn_check_prepare_dynamic ()
{
  case $1 in
    *$as_nl*)
      at_fn_check_prepare_notrace 'an embedded newline' "$2" ;;
    *)
      at_fn_check_prepare_trace "$2" ;;
  esac
}

# at_fn_filter_trace
# ------------------
# Remove the lines in the file "$at_stderr" generated by "set -x" and print
# them to stderr.
at_fn_filter_trace ()
{
  mv "$at_stderr" "$at_stder1"
  grep '^ *+' "$at_stder1" >&2
  grep -v '^ *+' "$at_stder1" >"$at_stderr"
}

# at_fn_log_failure FILE-LIST
# ---------------------------
# Copy the files in the list on stdout with a "> " prefix, and exit the shell
# with a failure exit code.
at_fn_log_failure ()
{
  for file
    do printf "%s\n" "$file:"; sed 's/^/> /' "$file"; done
  echo 1 > "$at_status_file"
  exit 1
}

# at_fn_check_skip EXIT-CODE LINE
# -------------------------------
# Check whether EXIT-CODE is a special exit code (77 or 99), and if so exit
# the test group subshell with that same exit code. Use LINE in any report
# about test failure.
at_fn_check_skip ()
{
  case $1 in
    99) echo 99 > "$at_status_file"; at_failed=:
	printf "%s\n" "$2: hard failure"; exit 99;;
    77) echo 77 > "$at_status_file"; exit 77;;
  esac
}

# at_fn_check_status EXPECTED EXIT-CODE LINE
# ------------------------------------------
# Check whether EXIT-CODE is the EXPECTED exit code, and if so do nothing.
# Otherwise, if it is 77 or 99, exit the test group subshell with that same
# exit code; if it is anything else print an error message referring to LINE,
# and fail the test.
at_fn_check_status ()
{
  case $2 in
    $1 ) ;;
    77) echo 77 > "$at_status_file"; exit 77;;
    99) echo 99 > "$at_status_file"; at_failed=:
	printf "%s\n" "$3: hard failure"; exit 99;;
    *) printf "%s\n" "$3: exit code was $2, expected $1"
      at_failed=:;;
  esac
}

# at_fn_diff_devnull FILE
# -----------------------
# Emit a diff between /dev/null and FILE. Uses "test -s" to avoid useless diff
# invocations.
at_fn_diff_devnull ()
{
  test -s "$1" || return 0
  $at_diff "$at_devnull" "$1"
}

# at_fn_test NUMBER
# -----------------
# Parse out test NUMBER from the tail of this file.
at_fn_test ()
{
  eval at_sed=\$at_sed$1
  sed "$at_sed" "$at_myself" > "$at_test_source"
}

# at_fn_create_debugging_script
# -----------------------------
# Create the debugging script $at_group_dir/run which will reproduce the
# current test group.
at_fn_create_debugging_script ()
{
  {
    echo "#! /bin/sh" &&
    echo 'test ${ZSH_VERSION+y} && alias -g '\''${1+"$@"}'\''='\''"$@"'\''' &&
    printf "%s\n" "cd '$at_dir'" &&
    printf "%s\n" "exec \${CONFIG_SHELL-$SHELL} \"$at_myself\" -v -d $at_debug_args $at_group \${1+\"\$@\"}" &&
    echo 'exit 1'
  } >"$at_group_dir/run" &&
  chmod +x "$at_group_dir/run"
}

## -------------------------------- ##
## End of autotest shell functions. ##
## -------------------------------- ##
{
  printf "%s\n" "## ---------------- ##
## Tested programs. ##
## ---------------- ##"
  echo
} >&5

# Report what programs are being tested.
for at_program in : `eval echo $at_tested`
do
  case $at_program in #(
  :) :
    continue ;; #(
  [\\/]* | ?:[\\/]*) :
    at_program_=$at_program ;; #(
  *) :
    as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
  IFS=$as_save_IFS
  case $as_dir in #(((
    '') as_dir=./ ;;
    */) ;;
    *) as_dir=$as_dir/ ;;
  esac
    test -f "$as_dir$at_program" && break
  done
IFS=$as_save_IFS

    at_program_=$as_dir$at_program ;;
esac

  if test -f "$at_program_"; then
    {
      printf "%s\n" "$at_srcdir/testsuite.at:17: $at_program_ --version"
      "$at_program_" --version </dev/null
      echo
    } >&5 2>&1
  else
    as_fn_error $? "cannot find $at_program" "$LINENO" 5
  fi
done

{
  printf "%s\n" "## ------------------ ##
## Running the tests. ##
## ------------------ ##"
} >&5

at_start_date=`date`
at_start_time=`date +%s 2>/dev/null`
printf "%s\n" "$as_me: starting at: $at_start_date" >&5

# Create the master directory if it doesn't already exist.
as_dir="$at_suite_dir"; as_fn_mkdir_p ||
  as_fn_error $? "cannot create \`$at_suite_dir'" "$LINENO" 5

# Can we diff with `/dev/null'?  DU 5.0 refuses.
if diff /dev/null /dev/null >/dev/null 2>&1; then
  at_devnull=/dev/null
else
  at_devnull=$at_suite_dir/devnull
  >"$at_devnull"
fi

# Use `diff -u' when possible.
if at_diff=`diff -u "$at_devnull" "$at_devnull" 2>&1` && test -z "$at_diff"
then
  at_diff='diff -u'
else
  at_diff=diff
fi

# Get the last needed group.
for at_group in : $at_groups; do :; done

# Extract the start and end lines of each test group at the tail
# of this file
awk '
BEGIN { FS="" }
/^#AT_START_/ {
  start = NR
}
/^#AT_STOP_/ {
  test = substr ($ 0, 10)
  print "at_sed" test "=\"1," start "d;" (NR-1) "q\""
  if (test == "'"$at_group"'") exit
}' "$at_myself" > "$at_suite_dir/at-source-lines" &&
. "$at_suite_dir/at-source-lines" ||
  as_fn_error $? "cannot create test line number cache" "$LINENO" 5
rm -f "$at_suite_dir/at-source-lines"

# Set number of jobs for `-j'; avoid more jobs than test groups.
set X $at_groups; shift; at_max_jobs=$#
if test $at_max_jobs -eq 0; then
  at_jobs=1
fi
if test $at_jobs -ne 1 &&
   { test $at_jobs -eq 0 || test $at_jobs -gt $at_max_jobs; }; then
  at_jobs=$at_max_jobs
fi

# If parallel mode, don't output banners, don't split summary lines.
if test $at_jobs -ne 1; then
  at_print_banners=false
  at_quiet=:
fi

# Set up helper dirs.
rm -rf "$at_helper_dir" &&
mkdir "$at_helper_dir" &&
cd "$at_helper_dir" &&
{ test -z "$at_groups" || mkdir $at_groups; } ||
as_fn_error $? "testsuite directory setup failed" "$LINENO" 5

# Functions for running a test group.  We leave the actual
# test group execution outside of a shell function in order
# to avoid hitting zsh 4.x exit status bugs.

# at_fn_group_prepare
# -------------------
# Prepare for running a test group.
at_fn_group_prepare ()
{
  # The directory for additional per-group helper files.
  at_job_dir=$at_helper_dir/$at_group
  # The file containing the location of the last AT_CHECK.
  at_check_line_file=$at_job_dir/check-line
  # The file containing the exit status of the last command.
  at_status_file=$at_job_dir/status
  # The files containing the output of the tested commands.
  at_stdout=$at_job_dir/stdout
  at_stder1=$at_job_dir/stder1
  at_stderr=$at_job_dir/stderr
  # The file containing the code for a test group.
  at_test_source=$at_job_dir/test-source
  # The file containing dates.
  at_times_file=$at_job_dir/times

  # Be sure to come back to the top test directory.
  cd "$at_suite_dir"

  # Clearly separate the test groups when verbose.
  $at_first || $at_verbose echo

  at_group_normalized=$at_group

  eval 'while :; do
    case $at_group_normalized in #(
    '"$at_format"'*) break;;
    esac
    at_group_normalized=0$at_group_normalized
  done'


  # Create a fresh directory for the next test group, and enter.
  # If one already exists, the user may have invoked ./run from
  # within that directory; we remove the contents, but not the
  # directory itself, so that we aren't pulling the rug out from
  # under the shell's notion of the current directory.
  at_group_dir=$at_suite_dir/$at_group_normalized
  at_group_log=$at_group_dir/$as_me.log
  if test -d "$at_group_dir"
then
  find "$at_group_dir" -type d ! -perm -700 -exec chmod u+rwx {} \;
  rm -fr "$at_group_dir"/* "$at_group_dir"/.[!.] "$at_group_dir"/.??*
fi ||
    { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: test directory for $at_group_normalized could not be cleaned" >&5
printf "%s\n" "$as_me: WARNING: test directory for $at_group_normalized could not be cleaned" >&2;}
  # Be tolerant if the above `rm' was not able to remove the directory.
  as_dir="$at_group_dir"; as_fn_mkdir_p

  echo 0 > "$at_status_file"

  # In verbose mode, append to the log file *and* show on
  # the standard output; in quiet mode only write to the log.
  if test -z "$at_verbose"; then
    at_tee_pipe='tee -a "$at_group_log"'
  else
    at_tee_pipe='cat >> "$at_group_log"'
  fi
}

# at_fn_group_banner ORDINAL LINE DESC PAD [BANNER]
# -------------------------------------------------
# Declare the test group ORDINAL, located at LINE with group description DESC,
# and residing under BANNER. Use PAD to align the status column.
at_fn_group_banner ()
{
  at_setup_line="$2"
  test -n "$5" && at_fn_banner $5
  at_desc="$3"
  case $1 in
    [0-9])      at_desc_line="  $1: ";;
    [0-9][0-9]) at_desc_line=" $1: " ;;
    *)          at_desc_line="$1: "  ;;
  esac
  as_fn_append at_desc_line "$3$4"
  $at_quiet printf %s "$at_desc_line"
  echo "#                             -*- compilation -*-" >> "$at_group_log"
}

# at_fn_group_postprocess
# -----------------------
# Perform cleanup after running a test group.
at_fn_group_postprocess ()
{
  # Be sure to come back to the suite directory, in particular
  # since below we might `rm' the group directory we are in currently.
  cd "$at_suite_dir"

  if test ! -f "$at_check_line_file"; then
    sed "s/^ */$as_me: WARNING: /" <<_ATEOF
      A failure happened in a test group before any test could be
      run. This means that test suite is improperly designed.  Please
      report this failure to <gray@gnu.org>.
_ATEOF
    printf "%s\n" "$at_setup_line" >"$at_check_line_file"
    at_status=99
  fi
  $at_verbose printf %s "$at_group. $at_setup_line: "
  printf %s "$at_group. $at_setup_line: " >> "$at_group_log"
  case $at_xfail:$at_status in
    yes:0)
	at_msg="UNEXPECTED PASS"
	at_res=xpass
	at_errexit=$at_errexit_p
	at_color=$at_red
	;;
    no:0)
	at_msg="ok"
	at_res=pass
	at_errexit=false
	at_color=$at_grn
	;;
    *:77)
	at_msg='skipped ('`cat "$at_check_line_file"`')'
	at_res=skip
	at_errexit=false
	at_color=$at_blu
	;;
    no:* | *:99)
	at_msg='FAILED ('`cat "$at_check_line_file"`')'
	at_res=fail
	at_errexit=$at_errexit_p
	at_color=$at_red
	;;
    yes:*)
	at_msg='expected failure ('`cat "$at_check_line_file"`')'
	at_res=xfail
	at_errexit=false
	at_color=$at_lgn
	;;
  esac
  echo "$at_res" > "$at_job_dir/$at_res"
  # In parallel mode, output the summary line only afterwards.
  if test $at_jobs -ne 1 && test -n "$at_verbose"; then
    printf "%s\n" "$at_desc_line $at_color$at_msg$at_std"
  else
    # Make sure there is a separator even with long titles.
    printf "%s\n" " $at_color$at_msg$at_std"
  fi
  at_log_msg="$at_group. $at_desc ($at_setup_line): $at_msg"
  case $at_status in
    0|77)
      # $at_times_file is only available if the group succeeded.
      # We're not including the group log, so the success message
      # is written in the global log separately.  But we also
      # write to the group log in case they're using -d.
      if test -f "$at_times_file"; then
	at_log_msg="$at_log_msg     ("`sed 1d "$at_times_file"`')'
	rm -f "$at_times_file"
      fi
      printf "%s\n" "$at_log_msg" >> "$at_group_log"
      printf "%s\n" "$at_log_msg" >&5

      # Cleanup the group directory, unless the user wants the files
      # or the success was unexpected.
      if $at_debug_p || test $at_res = xpass; then
	at_fn_create_debugging_script
	if test $at_res = xpass && $at_errexit; then
	  echo stop > "$at_stop_file"
	fi
      else
	if test -d "$at_group_dir"; then
	  find "$at_group_dir" -type d ! -perm -700 -exec chmod u+rwx \{\} \;
	  rm -fr "$at_group_dir"
	fi
	rm -f "$at_test_source"
      fi
      ;;
    *)
      # Upon failure, include the log into the testsuite's global
      # log.  The failure message is written in the group log.  It
      # is later included in the global log.
      printf "%s\n" "$at_log_msg" >> "$at_group_log"

      # Upon failure, keep the group directory for autopsy, and create
      # the debugging script.  With -e, do not start any further tests.
      at_fn_create_debugging_script
      if $at_errexit; then
	echo stop > "$at_stop_file"
      fi
      ;;
  esac
}


## ------------ ##
## Driver loop. ##
## ------------ ##


if (set -m && set +m && set +b) >/dev/null 2>&1; then
  set +b
  at_job_control_on='set -m' at_job_control_off='set +m' at_job_group=-
else
  at_job_control_on=: at_job_control_off=: at_job_group=
fi

for at_signal in 1 2 15; do
  trap 'set +x; set +e
	$at_job_control_off
	at_signal='"$at_signal"'
	echo stop > "$at_stop_file"
	trap "" $at_signal
	at_pgids=
	for at_pgid in `jobs -p 2>/dev/null`; do
	  at_pgids="$at_pgids $at_job_group$at_pgid"
	done
	test -z "$at_pgids" || kill -$at_signal $at_pgids 2>/dev/null
	wait
	if test "$at_jobs" -eq 1 || test -z "$at_verbose"; then
	  echo >&2
	fi
	at_signame=`kill -l $at_signal 2>&1 || echo $at_signal`
	set x $at_signame
	test 0 -gt 2 && at_signame=$at_signal
	{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: caught signal $at_signame, bailing out" >&5
printf "%s\n" "$as_me: WARNING: caught signal $at_signame, bailing out" >&2;}
	as_fn_arith 128 + $at_signal && exit_status=$as_val
	as_fn_exit $exit_status' $at_signal
done

rm -f "$at_stop_file"
at_first=:

if test $at_jobs -ne 1 &&
     rm -f "$at_job_fifo" &&
     test -n "$at_job_group" &&
     ( mkfifo "$at_job_fifo" && trap 'exit 1' PIPE STOP TSTP ) 2>/dev/null
then
  # FIFO job dispatcher.

  trap 'at_pids=
	for at_pid in `jobs -p`; do
	  at_pids="$at_pids $at_job_group$at_pid"
	done
	if test -n "$at_pids"; then
	  at_sig=TSTP
	  test ${TMOUT+y} && at_sig=STOP
	  kill -$at_sig $at_pids 2>/dev/null
	fi
	kill -STOP $$
	test -z "$at_pids" || kill -CONT $at_pids 2>/dev/null' TSTP

  echo
  # Turn jobs into a list of numbers, starting from 1.
  at_joblist=`printf "%s\n" "$at_groups" | sed -n 1,${at_jobs}p`

  set X $at_joblist
  shift
  for at_group in $at_groups; do
    $at_job_control_on 2>/dev/null
    (
      # Start one test group.
      $at_job_control_off
      if $at_first; then
	exec 7>"$at_job_fifo"
      else
	exec 6<&-
      fi
      trap 'set +x; set +e
	    trap "" PIPE
	    echo stop > "$at_stop_file"
	    echo >&7
	    as_fn_exit 141' PIPE
      at_fn_group_prepare
      if cd "$at_group_dir" &&
	 at_fn_test $at_group &&
	 . "$at_test_source"
      then :; else
	{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: unable to parse test group: $at_group" >&5
printf "%s\n" "$as_me: WARNING: unable to parse test group: $at_group" >&2;}
	at_failed=:
      fi
      at_fn_group_postprocess
      echo >&7
    ) &
    $at_job_control_off
    if $at_first; then
      at_first=false
      exec 6<"$at_job_fifo" 7>"$at_job_fifo"
    fi
    shift # Consume one token.
    if test $# -gt 0; then :; else
      read at_token <&6 || break
      set x $*
    fi
    test -f "$at_stop_file" && break
  done
  exec 7>&-
  # Read back the remaining ($at_jobs - 1) tokens.
  set X $at_joblist
  shift
  if test $# -gt 0; then
    shift
    for at_job
    do
      read at_token
    done <&6
  fi
  exec 6<&-
  wait
else
  # Run serially, avoid forks and other potential surprises.
  for at_group in $at_groups; do
    at_fn_group_prepare
    if cd "$at_group_dir" &&
       at_fn_test $at_group &&
       . "$at_test_source"; then :; else
      { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: unable to parse test group: $at_group" >&5
printf "%s\n" "$as_me: WARNING: unable to parse test group: $at_group" >&2;}
      at_failed=:
    fi
    at_fn_group_postprocess
    test -f "$at_stop_file" && break
    at_first=false
  done
fi

# Wrap up the test suite with summary statistics.
cd "$at_helper_dir"

# Use ?..???? when the list must remain sorted, the faster * otherwise.
at_pass_list=`for f in */pass; do echo $f; done | sed '/\*/d; s,/pass,,'`
at_skip_list=`for f in */skip; do echo $f; done | sed '/\*/d; s,/skip,,'`
at_xfail_list=`for f in */xfail; do echo $f; done | sed '/\*/d; s,/xfail,,'`
at_xpass_list=`for f in ?/xpass ??/xpass ???/xpass ????/xpass; do
		 echo $f; done | sed '/?/d; s,/xpass,,'`
at_fail_list=`for f in ?/fail ??/fail ???/fail ????/fail; do
		echo $f; done | sed '/?/d; s,/fail,,'`

set X $at_pass_list $at_xpass_list $at_xfail_list $at_fail_list $at_skip_list
shift; at_group_count=$#
set X $at_xpass_list; shift; at_xpass_count=$#; at_xpass_list=$*
set X $at_xfail_list; shift; at_xfail_count=$#
set X $at_fail_list; shift; at_fail_count=$#; at_fail_list=$*
set X $at_skip_list; shift; at_skip_count=$#

as_fn_arith $at_group_count - $at_skip_count && at_run_count=$as_val
as_fn_arith $at_xpass_count + $at_fail_count && at_unexpected_count=$as_val
as_fn_arith $at_xfail_count + $at_fail_count && at_total_fail_count=$as_val

# Back to the top directory.
cd "$at_dir"
rm -rf "$at_helper_dir"

# Compute the duration of the suite.
at_stop_date=`date`
at_stop_time=`date +%s 2>/dev/null`
printf "%s\n" "$as_me: ending at: $at_stop_date" >&5
case $at_start_time,$at_stop_time in
  [0-9]*,[0-9]*)
    as_fn_arith $at_stop_time - $at_start_time && at_duration_s=$as_val
    as_fn_arith $at_duration_s / 60 && at_duration_m=$as_val
    as_fn_arith $at_duration_m / 60 && at_duration_h=$as_val
    as_fn_arith $at_duration_s % 60 && at_duration_s=$as_val
    as_fn_arith $at_duration_m % 60 && at_duration_m=$as_val
    at_duration="${at_duration_h}h ${at_duration_m}m ${at_duration_s}s"
    printf "%s\n" "$as_me: test suite duration: $at_duration" >&5
    ;;
esac

echo
printf "%s\n" "## ------------- ##
## Test results. ##
## ------------- ##"
echo
{
  echo
  printf "%s\n" "## ------------- ##
## Test results. ##
## ------------- ##"
  echo
} >&5

if test $at_run_count = 1; then
  at_result="1 test"
  at_were=was
else
  at_result="$at_run_count tests"
  at_were=were
fi
if $at_errexit_p && test $at_unexpected_count != 0; then
  if test $at_xpass_count = 1; then
    at_result="$at_result $at_were run, one passed"
  else
    at_result="$at_result $at_were run, one failed"
  fi
  at_result="$at_result unexpectedly and inhibited subsequent tests."
  at_color=$at_red
else
  # Don't you just love exponential explosion of the number of cases?
  at_color=$at_red
  case $at_xpass_count:$at_fail_count:$at_xfail_count in
    # So far, so good.
    0:0:0) at_result="$at_result $at_were successful." at_color=$at_grn ;;
    0:0:*) at_result="$at_result behaved as expected." at_color=$at_lgn ;;

    # Some unexpected failures
    0:*:0) at_result="$at_result $at_were run,
$at_fail_count failed unexpectedly." ;;

    # Some failures, both expected and unexpected
    0:*:1) at_result="$at_result $at_were run,
$at_total_fail_count failed ($at_xfail_count expected failure)." ;;
    0:*:*) at_result="$at_result $at_were run,
$at_total_fail_count failed ($at_xfail_count expected failures)." ;;

    # No unexpected failures, but some xpasses
    *:0:*) at_result="$at_result $at_were run,
$at_xpass_count passed unexpectedly." ;;

    # No expected failures, but failures and xpasses
    *:1:0) at_result="$at_result $at_were run,
$at_unexpected_count did not behave as expected ($at_fail_count unexpected failure)." ;;
    *:*:0) at_result="$at_result $at_were run,
$at_unexpected_count did not behave as expected ($at_fail_count unexpected failures)." ;;

    # All of them.
    *:*:1) at_result="$at_result $at_were run,
$at_xpass_count passed unexpectedly,
$at_total_fail_count failed ($at_xfail_count expected failure)." ;;
    *:*:*) at_result="$at_result $at_were run,
$at_xpass_count passed unexpectedly,
$at_total_fail_count failed ($at_xfail_count expected failures)." ;;
  esac

  if test $at_skip_count = 0 && test $at_run_count -gt 1; then
    at_result="All $at_result"
  fi
fi

# Now put skips in the mix.
case $at_skip_count in
  0) ;;
  1) at_result="$at_result
1 test was skipped." ;;
  *) at_result="$at_result
$at_skip_count tests were skipped." ;;
esac

if test $at_unexpected_count = 0; then
  echo "$at_color$at_result$at_std"
  echo "$at_result" >&5
else
  echo "${at_color}ERROR: $at_result$at_std" >&2
  echo "ERROR: $at_result" >&5
  {
    echo
    printf "%s\n" "## ------------------------ ##
## Summary of the failures. ##
## ------------------------ ##"

    # Summary of failed and skipped tests.
    if test $at_fail_count != 0; then
      echo "Failed tests:"
      $SHELL "$at_myself" $at_fail_list --list
      echo
    fi
    if test $at_skip_count != 0; then
      echo "Skipped tests:"
      $SHELL "$at_myself" $at_skip_list --list
      echo
    fi
    if test $at_xpass_count != 0; then
      echo "Unexpected passes:"
      $SHELL "$at_myself" $at_xpass_list --list
      echo
    fi
    if test $at_fail_count != 0; then
      printf "%s\n" "## ---------------------- ##
## Detailed failed tests. ##
## ---------------------- ##"
      echo
      for at_group in $at_fail_list
      do
	at_group_normalized=$at_group

  eval 'while :; do
    case $at_group_normalized in #(
    '"$at_format"'*) break;;
    esac
    at_group_normalized=0$at_group_normalized
  done'

	cat "$at_suite_dir/$at_group_normalized/$as_me.log"
	echo
      done
      echo
    fi
    if test -n "$at_top_srcdir"; then
      sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX
## ${at_top_build_prefix}config.log ##
_ASBOX
      sed 's/^/| /' ${at_top_build_prefix}config.log
      echo
    fi
  } >&5

  sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX
## $as_me.log was created. ##
_ASBOX

  echo
  if $at_debug_p; then
    at_msg='per-test log files'
  else
    at_msg="\`${at_testdir+${at_testdir}/}$as_me.log'"
  fi
  at_msg1a=${at_xpass_list:+', '}
  at_msg1=$at_fail_list${at_fail_list:+" failed$at_msg1a"}
  at_msg2=$at_xpass_list${at_xpass_list:+" passed unexpectedly"}

  printf "%s\n" "Please send $at_msg and all information you think might help:

   To: <gray@gnu.org>
   Subject: [xenv 4.2] $as_me: $at_msg1$at_msg2

You may investigate any problem if you feel able to do so, in which
case the test suite provides a good starting point.  Its output may
be found below \`${at_testdir+${at_testdir}/}$as_me.dir'.
"
  exit 1
fi

exit 0

## ------------- ##
## Actual tests. ##
## ------------- ##
#AT_START_1
at_fn_group_banner 1 'simple.at:17' \
  "Simple expansion" "                               "
at_xfail=no
(
  printf "%s\n" "1. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
foo is $X_FOO, bar is $X_BAR.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/simple.at:21:
unset X_FOO
unset X_BAR
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:21"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/simple.at:21"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:28:
unset X_FOO
unset X_BAR
xenv -u input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:28"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -u input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-13: variable X_FOO not defined
input:1.23-28: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/simple.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:38:
unset X_FOO
unset X_BAR
xenv -ur input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:38"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -ur input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-13: variable X_FOO not defined
input:1.23-28: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is \$X_FOO, bar is \$X_BAR.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/simple.at:38"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:48:
X_FOO=baz X_BAR=qux xenv -u input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:48"
( $at_check_trace;
X_FOO=baz X_BAR=qux xenv -u input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is baz, bar is qux.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/simple.at:48"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_1
#AT_START_2
at_fn_group_banner 2 'braces.at:17' \
  "Brace expansion" "                                "
at_xfail=no
(
  printf "%s\n" "2. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
foo is ${X_FOO}, bar is ${X_BAR}.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/braces.at:21:
unset X_FOO
unset X_BAR
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "braces.at:21"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/braces.at:21"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/braces.at:28:
unset X_FOO
unset X_BAR
xenv -u input"
at_fn_check_prepare_notrace 'an embedded newline' "braces.at:28"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -u input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-15: variable X_FOO not defined
input:1.25-32: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/braces.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/braces.at:38:
unset X_FOO
unset X_BAR
xenv -ur input"
at_fn_check_prepare_notrace 'an embedded newline' "braces.at:38"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -ur input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-15: variable X_FOO not defined
input:1.25-32: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is \${X_FOO}, bar is \${X_BAR}.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/braces.at:38"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/braces.at:48:
X_FOO=baz X_BAR=qux xenv -u input"
at_fn_check_prepare_notrace 'an embedded newline' "braces.at:48"
( $at_check_trace;
X_FOO=baz X_BAR=qux xenv -u input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is baz, bar is qux.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/braces.at:48"
$at_failed && at_fn_log_failure
$at_traceon; }


# This used to shift $ down a line, until 8aac91660d
cat >expout <<'_ATEOF'

foo$
{
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/braces.at:60: xenv expout"
at_fn_check_prepare_trace "braces.at:60"
( $at_check_trace; xenv expout
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
$at_diff expout "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/braces.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_2
#AT_START_3
at_fn_group_banner 3 'usedfl.at:17' \
  "Use default values" "                             "
at_xfail=no
(
  printf "%s\n" "3. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Lorem ipsum ${PREF-dol}${SUF:-or} sit amet, ${PASS-consectetur} adipiscing elit,
${INT:-sed }do eiusmod tempor incididunt
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:24:
unset PREF SUF PASS INT
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:24"
( $at_check_trace;
unset PREF SUF PASS INT
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:33:
PREF=
INT=
SUF=
export PREF INT SUF
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:33"
( $at_check_trace;
PREF=
INT=
SUF=
export PREF INT SUF
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum or sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:33"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:45:
PREF=gaud
SUF=iam
INT=propterea
export PREF SUF INT
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:45"
( $at_check_trace;
PREF=gaud
SUF=iam
INT=propterea
export PREF SUF INT
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum gaudiam sit amet, consectetur adipiscing elit,
proptereado eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:45"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:57:
cat >input <<'_ATEOF'
\${X:-text with 'single: \$Y' and \"double: \\\"\$Y\\\"\" quotes}
_ATEOF

unset X
Y=string xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "usedfl.at:57"
( $at_check_trace;
cat >input <<'_ATEOF'
${X:-text with 'single: $Y' and "double: \"$Y\"" quotes}
_ATEOF

unset X
Y=string xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text with single: \$Y and double: \"string\" quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:57"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_3
#AT_START_4
at_fn_group_banner 4 'asndfl.at:17' \
  "Assign default values" "                          "
at_xfail=no
(
  printf "%s\n" "4. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Lorem ipsum ${OBJ=dolor} sit am${EX:=et}, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore $EX ${OBJ}e magna aliqua.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:24:
unset OBJ EX
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:24"
( $at_check_trace;
unset OBJ EX
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:33:
OBJ=nitor
export OBJ
unset EX
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:33"
( $at_check_trace;
OBJ=nitor
export OBJ
unset EX
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum nitor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et nitore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:33"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:44:
OBJ=nitor
export OBJ
EX=abunt
export EX
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:44"
( $at_check_trace;
OBJ=nitor
export OBJ
EX=abunt
export EX
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum nitor sit amabunt, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore abunt nitore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:56:
OBJ=
export OBJ
EX=
export EX
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:56"
( $at_check_trace;
OBJ=
export OBJ
EX=
export EX
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum  sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et e magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:56"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:68:
cat >input <<'_ATEOF'
\${X:=text with 'single: \$Y' and \"double: \\\"\$Y\\\"\" quotes}
\$X
_ATEOF

unset X
Y=string xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "asndfl.at:68"
( $at_check_trace;
cat >input <<'_ATEOF'
${X:=text with 'single: $Y' and "double: \"$Y\"" quotes}
$X
_ATEOF

unset X
Y=string xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text with single: \$Y and double: \"string\" quotes
text with single: \$Y and double: \"string\" quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:68"
$at_failed && at_fn_log_failure
$at_traceon; }



  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_4
#AT_START_5
at_fn_group_banner 5 'enull.at:17' \
  "Display Error if Null or Unset" "                 "
at_xfail=no
(
  printf "%s\n" "5. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Ut enim ad minim ${V1?}, quis nostrud exercitation ullamco
${V2:?} nisi ut aliquip ex ea commodo consequat.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/enull.at:24:
V1=veniam
V2=laboris
export V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:24"
( $at_check_trace;
V1=veniam
V2=laboris
export V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim veniam, quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:35:
V1=
V2=laboris
export V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:35"
( $at_check_trace;
V1=
V2=laboris
export V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:46:
unset V1
V2=laboris
export V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:46"
( $at_check_trace;
unset V1
V2=laboris
export V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-22: variable V1 not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:59:
unset V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:59"
( $at_check_trace;
unset V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-22: variable V1 not set
input:2.1-6: variable V2 null or not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:59"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:71:
unset V1
V2=
export V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:71"
( $at_check_trace;
unset V1
V2=
export V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-22: variable V1 not set
input:2.1-6: variable V2 null or not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:71"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_5
#AT_START_6
at_fn_group_banner 6 'errmsg.at:17' \
  "Display Custom Error if Null or Unset" "          "
at_xfail=no
(
  printf "%s\n" "6. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Ut enim ad minim ${V1?Should have set V1}, quis nostrud exercitation ullamco
${V2:?Should have set V2 to a non-empty value} nisi ut aliquip ex ea commodo consequat.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:24:
V1=veniam
V2=laboris
export V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:24"
( $at_check_trace;
V1=veniam
V2=laboris
export V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim veniam, quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:35:
V1=
V2=laboris
export V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:35"
( $at_check_trace;
V1=
V2=laboris
export V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:46:
unset V1
V2=laboris
export V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:46"
( $at_check_trace;
unset V1
V2=laboris
export V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-41: Should have set V1
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:59:
unset V1 V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:59"
( $at_check_trace;
unset V1 V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-41: Should have set V1
input:2.1-46: Should have set V2 to a non-empty value
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:59"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:71:
unset V1
V2=
export V2
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:71"
( $at_check_trace;
unset V1
V2=
export V2
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-41: Should have set V1
input:2.1-46: Should have set V2 to a non-empty value
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:71"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:85:
cat >input <<'_ATEOF'
\${X:?text with 'single: \$Y' and \"double: \\\"\$Y\\\"\" quotes}
_ATEOF

unset X
Y=string xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "errmsg.at:85"
( $at_check_trace;
cat >input <<'_ATEOF'
${X:?text with 'single: $Y' and "double: \"$Y\"" quotes}
_ATEOF

unset X
Y=string xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.1-56: text with single: \$Y and double: \"string\" quotes
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:85"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_6
#AT_START_7
at_fn_group_banner 7 'usealt.at:17' \
  "Use Alternate Value" "                            "
at_xfail=no
(
  printf "%s\n" "7. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
${INCIPIAT+Dolorem }ipsum ${OBIECTUM:+dolor} sit amet, consectetur adipiscing elit,
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:22:
unset INCIPIAT OBIECTUM
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:22"
( $at_check_trace;
unset INCIPIAT OBIECTUM
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "ipsum  sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:22"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:30:
INCIPIAT=
OBIECTUM=
export INCIPIAT OBIECTUM
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:30"
( $at_check_trace;
INCIPIAT=
OBIECTUM=
export INCIPIAT OBIECTUM
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Dolorem ipsum  sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:30"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:40:
INCIPIAT=
OBIECTUM=sic
export INCIPIAT OBIECTUM
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:40"
( $at_check_trace;
INCIPIAT=
OBIECTUM=sic
export INCIPIAT OBIECTUM
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Dolorem ipsum dolor sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_7
#AT_START_8
at_fn_group_banner 8 'ternary.at:17' \
  "Ternary operator" "                               "
at_xfail=no
(
  printf "%s\n" "8. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Lorem ipsum ${OBJ|dolor|fulgor} sit amet, ${GBR:|consectetur|obliviscetur} adipiscing elit,
sed ${LIM:||do }eiusmod tempor ${ALT:|incididunt} ut labore et dolore magna aliqua.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:23:
unset OBJ GBR LIM ALT
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:23"
( $at_check_trace;
unset OBJ GBR LIM ALT
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum fulgor sit amet, obliviscetur adipiscing elit,
sed do eiusmod tempor  ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:23"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/ternary.at:31:
OBJ=
GBR=
LIM=
ALT=
export OBJ GBR LIM ALT
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:31"
( $at_check_trace;
OBJ=
GBR=
LIM=
ALT=
export OBJ GBR LIM ALT
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, obliviscetur adipiscing elit,
sed do eiusmod tempor  ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:44:
OBJ=1
GBR=1
LIM=1
ALT=1
export OBJ GBR LIM ALT
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:44"
( $at_check_trace;
OBJ=1
GBR=1
LIM=1
ALT=1
export OBJ GBR LIM ALT
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed eiusmod tempor incididunt ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:57:
cat >input <<'_ATEOF'
\${X:|text with 'single: \$Y'|and \"double: \\\"\$Y\\\"\"} quotes
_ATEOF

unset X
Y=string xenv input
X=1 Y=string xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "ternary.at:57"
( $at_check_trace;
cat >input <<'_ATEOF'
${X:|text with 'single: $Y'|and "double: \"$Y\""} quotes
_ATEOF

unset X
Y=string xenv input
X=1 Y=string xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "and double: \"string\" quotes
text with single: \$Y quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:57"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_8
#AT_START_9
at_fn_group_banner 9 'strip.at:17' \
  "Strip" "                                          "
at_xfail=no
(
  printf "%s\n" "9. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/strip.at:19:
cat >input <<'_ATEOF'
strip shortest prefix: \${X#*:}.
strip longest prefix: \${X##*:}.
strip shortest suffix: \${X%:*}.
strip longest suffix: \${X%%:*}.
_ATEOF

X=talis:ac:tanta xenv input
echo \"-- one delim --\"
X=talis:ac xenv input
echo \"-- no match --\"
X=talis xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "strip.at:19"
( $at_check_trace;
cat >input <<'_ATEOF'
strip shortest prefix: ${X#*:}.
strip longest prefix: ${X##*:}.
strip shortest suffix: ${X%:*}.
strip longest suffix: ${X%%:*}.
_ATEOF

X=talis:ac:tanta xenv input
echo "-- one delim --"
X=talis:ac xenv input
echo "-- no match --"
X=talis xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "strip shortest prefix: ac:tanta.
strip longest prefix: tanta.
strip shortest suffix: talis:ac.
strip longest suffix: talis.
-- one delim --
strip shortest prefix: ac.
strip longest prefix: ac.
strip shortest suffix: talis.
strip longest suffix: talis.
-- no match --
strip shortest prefix: talis.
strip longest prefix: talis.
strip shortest suffix: talis.
strip longest suffix: talis.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/strip.at:19"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_9
#AT_START_10
at_fn_group_banner 10 'patsubst.at:16' \
  "Pattern substitution" "                           "
at_xfail=no
(
  printf "%s\n" "10. $at_setup_line: testing $at_desc ..."
  $at_traceon



# Replace first match
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:20: cat >input <<'_ATEOF'
'\${X/b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:20"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'fooNEEDLEbazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:26: cat >input <<'_ATEOF'
'\${X/b?r/}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:26"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/b?r/}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:26"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:32: cat >input <<'_ATEOF'
'\${X/b?r}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:32"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/b?r}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace all matches
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:40: cat >input <<'_ATEOF'
'\${X//b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:40"
( $at_check_trace; cat >input <<'_ATEOF'
'${X//b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'fooNEEDLEbazNEEDLEquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:46: cat >input <<'_ATEOF'
'\${X//b?r/}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:46"
( $at_check_trace; cat >input <<'_ATEOF'
'${X//b?r/}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:52: cat >input <<'_ATEOF'
'\${X//b?r}'
_ATEOF

X=foobarbazberquz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:52"
( $at_check_trace; cat >input <<'_ATEOF'
'${X//b?r}'
_ATEOF

X=foobarbazberquz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:52"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace match at the beginning.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:60: cat >input <<'_ATEOF'
'\${X/#b?r/NEEDLE}'
_ATEOF

X=aberfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:60"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/#b?r/NEEDLE}'
_ATEOF

X=aberfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'aberfoobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:66: cat >input <<'_ATEOF'
'\${X/#b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:66"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/#b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'NEEDLEfoobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:66"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:72: cat >input <<'_ATEOF'
'\${X/#b?r/}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:72"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/#b?r/}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:72"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:78: cat >input <<'_ATEOF'
'\${X/#b?r}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:78"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/#b?r}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:78"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace match at the end.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:86: cat >input <<'_ATEOF'
'\${X/%b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:86"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/%b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfooNEEDLE'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:86"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:92: cat >input <<'_ATEOF'
'\${X/%b?r/}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:92"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/%b?r/}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfoo'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:92"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:98: cat >input <<'_ATEOF'
'\${X/%b?r}'
_ATEOF

X=berfoobar xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:98"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/%b?r}'
_ATEOF

X=berfoobar xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfoo'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:98"
$at_failed && at_fn_log_failure
$at_traceon; }


# Escape special chars.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:106: cat >input <<'_ATEOF'
'\${X/\\/bar/BAR}'
_ATEOF

X=var/barbaz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:106"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/\/bar/BAR}'
_ATEOF

X=var/barbaz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varBARbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:106"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:112: cat >input <<'_ATEOF'
'\${X/\\/bar/}'
_ATEOF

X=var/barbaz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:112"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/\/bar/}'
_ATEOF

X=var/barbaz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:112"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:118: cat >input <<'_ATEOF'
'\${X/\\/bar}'
_ATEOF

X=var/barbaz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:118"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/\/bar}'
_ATEOF

X=var/barbaz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:118"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:125: cat >input <<'_ATEOF'
'\${X/\\/bar\\//BAR}'
_ATEOF

X=var/bar/baz xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "patsubst.at:125"
( $at_check_trace; cat >input <<'_ATEOF'
'${X/\/bar\//BAR}'
_ATEOF

X=var/bar/baz xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varBARbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:125"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_10
#AT_START_11
at_fn_group_banner 11 'set.at:17' \
  "\$\$set" "                                          "
at_xfail=no
(
  printf "%s\n" "11. $at_setup_line: testing $at_desc ..."
  $at_traceon

{ set +x
printf "%s\n" "$at_srcdir/set.at:18:
cat >input <<'_ATEOF'
\$\$set X
   \$\$  set Y \"string \\\"nested string\\\" test\"

X is \${X+set (value \\'\$X\\')}
Y is \${Y+set (value \\'\$Y\\')}
_ATEOF

unset X Y
xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "set.at:18"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X
   $$  set Y "string \"nested string\" test"

X is ${X+set (value \'$X\')}
Y is ${Y+set (value \'$Y\')}
_ATEOF

unset X Y
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
X is set (value '')
Y is set (value 'string \"nested string\" test')
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/set.at:35:
cat >input <<'_ATEOF'
\$\$set Y 'dolor'
\$\$set X \"Duis aute irure
\$Y in reprehenderit in \$Z velit
esse\"
\$X
_ATEOF

Z=voluptate xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:35"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set Y 'dolor'
$$set X "Duis aute irure
$Y in reprehenderit in $Z velit
esse"
$X
_ATEOF

Z=voluptate xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 5 \"input\"
Duis aute irure
dolor in reprehenderit in voluptate velit
esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/set.at:52:
cat >input <<'_ATEOF'
\$\$set Y 'dolor'
\$\$set X 'Duis aute irure
\$Y in reprehenderit in \$Z velit
esse'
\$X
_ATEOF

Z=voluptate xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:52"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set Y 'dolor'
$$set X 'Duis aute irure
$Y in reprehenderit in $Z velit
esse'
$X
_ATEOF

Z=voluptate xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 5 \"input\"
Duis aute irure
\$Y in reprehenderit in \$Z velit
esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:52"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/set.at:69:
cat >input <<'_ATEOF'
start
\$\$set 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:69"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$set 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-5: malformed \$\$set directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$set 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/set.at:69"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_11
#AT_START_12
at_fn_group_banner 12 'unset.at:17' \
  "\$\$unset" "                                        "
at_xfail=no
(
  printf "%s\n" "12. $at_setup_line: testing $at_desc ..."
  $at_traceon

{ set +x
printf "%s\n" "$at_srcdir/unset.at:18:
cat >input <<'_ATEOF'
\$\$unset X
X is \${X|set (value \\'\$X\\')|not set}
Y is \${Y|set (value \\'\$Y\\')|not set}
_ATEOF

X=1 Y=text xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "unset.at:18"
( $at_check_trace;
cat >input <<'_ATEOF'
$$unset X
X is ${X|set (value \'$X\')|not set}
Y is ${Y|set (value \'$Y\')|not set}
_ATEOF

X=1 Y=text xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "X is not set
Y is set (value 'text')
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/unset.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/unset.at:31:
cat >input <<'_ATEOF'
start
\$\$unset 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "unset.at:31"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$unset 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-7: malformed \$\$unset directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$unset 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/unset.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_12
#AT_START_13
at_fn_group_banner 13 'ifset.at:17' \
  "\$\$ifset" "                                        "
at_xfail=no
(
  printf "%s\n" "13. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifset X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
$$ ifset Y
...
$$ endif
$$ endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifset.at:31: unset X Y
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifset.at:31"
( $at_check_trace; unset X Y
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifset.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifset.at:40: unset X
Y=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifset.at:40"
( $at_check_trace; unset X
Y=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
...
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifset.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifset.at:50:
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifset.at:50"
( $at_check_trace;
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifset.at:50"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifset.at:60:
cat >input <<'_ATEOF'
start
\$\$ifset 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifset.at:60"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$ifset 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-7: malformed \$\$ifset directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$ifset 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/ifset.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_13
#AT_START_14
at_fn_group_banner 14 'ifnset.at:17' \
  "\$\$ifnset" "                                       "
at_xfail=no
(
  printf "%s\n" "14. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifnset X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
$$ ifnset Y
...
$$ endif
$$ endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifnset.at:31: unset X Y
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifnset.at:31"
( $at_check_trace; unset X Y
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifnset.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifnset.at:41: unset Y
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifnset.at:41"
( $at_check_trace; unset Y
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
...
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifnset.at:41"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifnset.at:51:
X=1 Y=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifnset.at:51"
( $at_check_trace;
X=1 Y=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifnset.at:51"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifnset.at:60:
cat >input <<'_ATEOF'
start
\$\$ifnset 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifnset.at:60"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$ifnset 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-8: malformed \$\$ifnset directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$ifnset 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/ifnset.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_14
#AT_START_15
at_fn_group_banner 15 'ifdef.at:17' \
  "\$\$ifdef" "                                        "
at_xfail=no
(
  printf "%s\n" "15. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifdef X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
$$ ifdef Y
...
$$ endif
$$ endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifdef.at:31: unset X Y
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifdef.at:31"
( $at_check_trace; unset X Y
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifdef.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifdef.at:40: unset X
Y= xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifdef.at:40"
( $at_check_trace; unset X
Y= xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
...
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifdef.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifdef.at:50:
X= xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifdef.at:50"
( $at_check_trace;
X= xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifdef.at:50"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifdef.at:60:
cat >input <<'_ATEOF'
start
\$\$ifdef 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifdef.at:60"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$ifdef 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-7: malformed \$\$ifdef directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$ifdef 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/ifdef.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_15
#AT_START_16
at_fn_group_banner 16 'ifndef.at:17' \
  "\$\$ifndef" "                                       "
at_xfail=no
(
  printf "%s\n" "16. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifndef X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
$$ ifndef Y
...
$$ endif
$$ endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifndef.at:31: unset X Y
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifndef.at:31"
( $at_check_trace; unset X Y
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifndef.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifndef.at:41: unset Y
X= xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifndef.at:41"
( $at_check_trace; unset Y
X= xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
...
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifndef.at:41"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifndef.at:51:
X= Y= xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifndef.at:51"
( $at_check_trace;
X= Y= xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifndef.at:51"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifndef.at:60:
cat >input <<'_ATEOF'
start
\$\$ifndef 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "ifndef.at:60"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$ifndef 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-8: malformed \$\$ifndef directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$ifndef 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/ifndef.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_16
#AT_START_17
at_fn_group_banner 17 'iftrue.at:17' \
  "\$\$iftrue" "                                       "
at_xfail=no
(
  printf "%s\n" "17. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$iftrue X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:28: unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:28"
( $at_check_trace; unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:37: X=0 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:37"
( $at_check_trace; X=0 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:45: X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:45"
( $at_check_trace; X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:45"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:54: X=2 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:54"
( $at_check_trace; X=2 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.10: variable neither true nor false
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/iftrue.at:54"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:64: X=2 xenv -Wbooleans=true/false input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:64"
( $at_check_trace; X=2 xenv -Wbooleans=true/false input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.10: variable neither true nor false
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/iftrue.at:64"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:74: X=true xenv -Wbooleans=true/false input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:74"
( $at_check_trace; X=true xenv -Wbooleans=true/false input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:74"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:83: X=true xenv -Wbooleans=1/0,true/false input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:83"
( $at_check_trace; X=true xenv -Wbooleans=1/0,true/false input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:83"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:92: X=1 xenv -Wbooleans=1/0,true/false input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:92"
( $at_check_trace; X=1 xenv -Wbooleans=1/0,true/false input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iftrue.at:92"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iftrue.at:101:
cat >input <<'_ATEOF'
start
\$\$iftrue 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iftrue.at:101"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$iftrue 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-8: malformed \$\$iftrue directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$iftrue 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/iftrue.at:101"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_17
#AT_START_18
at_fn_group_banner 18 'iffalse.at:17' \
  "\$\$iffalse" "                                      "
at_xfail=no
(
  printf "%s\n" "18. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$iffalse X
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:28: unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:28"
( $at_check_trace; unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iffalse.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:38: X=0 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:38"
( $at_check_trace; X=0 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iffalse.at:38"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:47: X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:47"
( $at_check_trace; X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iffalse.at:47"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:55: X=2 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:55"
( $at_check_trace; X=2 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.11: variable neither true nor false
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/iffalse.at:55"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:65: X=false xenv -Wbooleans=true/false input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:65"
( $at_check_trace; X=false xenv -Wbooleans=true/false input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/iffalse.at:65"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/iffalse.at:74:
cat >input <<'_ATEOF'
start
\$\$iffalse 1 2 3
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "iffalse.at:74"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$iffalse 1 2 3
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-9: malformed \$\$iffalse directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$iffalse 1 2 3
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/iffalse.at:74"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_18
#AT_START_19
at_fn_group_banner 19 'ifcom.at:17' \
  "\$\$ifcom" "                                        "
at_xfail=no
(
  printf "%s\n" "19. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifcom test -f FILE && grep foo FILE
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
cumque apprehenderit escam spelunque non intrat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifcom.at:29: xenv input"
at_fn_check_prepare_trace "ifcom.at:29"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cumque apprehenderit escam spelunque non intrat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifcom.at:29"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifcom.at:37: echo foo > FILE
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "ifcom.at:37"
( $at_check_trace; echo foo > FILE
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifcom.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_19
#AT_START_20
at_fn_group_banner 20 'ifcombs.at:17' \
  "\$\$ifcom (continuation lines)" "                   "
at_xfail=no
(
  printf "%s\n" "20. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifcom test -f FILE\
 && \
grep foo FILE
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
cumque apprehenderit escam spelunque non intrat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifcombs.at:31: xenv input"
at_fn_check_prepare_trace "ifcombs.at:31"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cumque apprehenderit escam spelunque non intrat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifcombs.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifcombs.at:39: echo foo > FILE
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "ifcombs.at:39"
( $at_check_trace; echo foo > FILE
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifcombs.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_20
#AT_START_21
at_fn_group_banner 21 'ifncom.at:17' \
  "\$\$ifncom" "                                       "
at_xfail=no
(
  printf "%s\n" "21. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifncom test -f FILE && grep foo FILE
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
cumque apprehenderit escam spelunque non intrat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifncom.at:29: xenv input"
at_fn_check_prepare_trace "ifncom.at:29"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifncom.at:29"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifncom.at:37: echo foo > FILE
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "ifncom.at:37"
( $at_check_trace; echo foo > FILE
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cumque apprehenderit escam spelunque non intrat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifncom.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_21
#AT_START_22
at_fn_group_banner 22 'ifncombs.at:17' \
  "\$\$ifncom (continuation lines)" "                  "
at_xfail=no
(
  printf "%s\n" "22. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ifncom test -f FILE\
 && \
grep foo FILE
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$else
cumque apprehenderit escam spelunque non intrat
$$endif
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ifncombs.at:31: xenv input"
at_fn_check_prepare_trace "ifncombs.at:31"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifncombs.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ifncombs.at:39: echo foo > FILE
xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "ifncombs.at:39"
( $at_check_trace; echo foo > FILE
xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cumque apprehenderit escam spelunque non intrat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ifncombs.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_22
#AT_START_23
at_fn_group_banner 23 'condfalse.at:17' \
  "directives in false branch" "                     "
at_xfail=no
(
  printf "%s\n" "23. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/condfalse.at:19:
cat >input <<'_ATEOF'
\$\$ifset X
text
\$\$ set Y \"word\"
\$\$endif
\$Y.
end
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "condfalse.at:19"
( $at_check_trace;
cat >input <<'_ATEOF'
$$ifset X
text
$$ set Y "word"
$$endif
$Y.
end
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" ".
end
==
text
word.
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/condfalse.at:19"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/condfalse.at:42:
cat >input <<'_ATEOF'
\$\$ifset X
text
\$\$ unset Y
\$\$endif
\$Y.
end
_ATEOF

unset X
Y=word xenv input
echo ==
X=1 Y=word xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "condfalse.at:42"
( $at_check_trace;
cat >input <<'_ATEOF'
$$ifset X
text
$$ unset Y
$$endif
$Y.
end
_ATEOF

unset X
Y=word xenv input
echo ==
X=1 Y=word xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "word.
end
==
text
.
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/condfalse.at:42"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/condfalse.at:65:
cat >input <<'_ATEOF'
\$\$divert A
text
\$\$divert
\$\$ifset X
\$\$ divert A
and word
\$\$ divert
\$\$endif
\$\$undivert A
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "condfalse.at:65"
( $at_check_trace;
cat >input <<'_ATEOF'
$$divert A
text
$$divert
$$ifset X
$$ divert A
and word
$$ divert
$$endif
$$undivert A
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
==
text
and word
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/condfalse.at:65"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/condfalse.at:89:
cat >input <<'_ATEOF'
\$\$divert A
text
\$\$divert
\$\$ifset X
\$\$undivert A
\$\$endif
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "condfalse.at:89"
( $at_check_trace;
cat >input <<'_ATEOF'
$$divert A
text
$$divert
$$ifset X
$$undivert A
$$endif
_ATEOF

unset X
xenv input
echo ==
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "==
text
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/condfalse.at:89"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_23
#AT_START_24
at_fn_group_banner 24 'range.at:17' \
  "\$\$range" "                                        "
at_xfail=no
(
  printf "%s\n" "24. $at_setup_line: testing $at_desc ..."
  $at_traceon



{ set +x
printf "%s\n" "$at_srcdir/range.at:20:
cat >input <<'_ATEOF'
text
\$\$range NAME 1 10
Number \$NAME
\$\$end
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:20"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$range NAME 1 10
Number $NAME
$$end
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
Number 1
Number 2
Number 3
Number 4
Number 5
Number 6
Number 7
Number 8
Number 9
Number 10
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/range.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range.at:45:
cat >input <<'_ATEOF'
text
\$\$range NAME 1 10 2
Number \$NAME
\$\$end
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:45"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$range NAME 1 10 2
Number $NAME
$$end
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
Number 1
Number 3
Number 5
Number 7
Number 9
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/range.at:45"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range.at:65:
cat >input <<'_ATEOF'
text
\$\$range NAME 10 1
Number \$NAME
\$\$end
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:65"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$range NAME 10 1
Number $NAME
$$end
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
Number 10
Number 9
Number 8
Number 7
Number 6
Number 5
Number 4
Number 3
Number 2
Number 1
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/range.at:65"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range.at:90:
cat >input <<'_ATEOF'
text
\$\$range NAME 10 1 -2
Number \$NAME
\$\$end
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:90"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$range NAME 10 1 -2
Number $NAME
$$end
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
Number 10
Number 8
Number 6
Number 4
Number 2
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/range.at:90"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range.at:110:
cat >input <<'_ATEOF'
begin
\$\$range X 0 1
\$\$ range Y 0 2
This is \$X \$Y
\$\$ end
\$\$end
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:110"
( $at_check_trace;
cat >input <<'_ATEOF'
begin
$$range X 0 1
$$ range Y 0 2
This is $X $Y
$$ end
$$end
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "begin
This is 0 0
This is 0 1
This is 0 2
This is 1 0
This is 1 1
This is 1 2
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/range.at:110"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range.at:133:
cat >input <<'_ATEOF'
start
\$\$range \"text\"
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "range.at:133"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$range "text"
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-7: malformed \$\$range directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$range \"text\"
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/range.at:133"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_24
#AT_START_25
at_fn_group_banner 25 'loop.at:17' \
  "\$\$loop" "                                         "
at_xfail=no
(
  printf "%s\n" "25. $at_setup_line: testing $at_desc ..."
  $at_traceon



{ set +x
printf "%s\n" "$at_srcdir/loop.at:20:
cat >input <<'_ATEOF'
text
\$\$loop NAME 1 2 3 4
This is \$NAME
\$\$end
continue
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:20"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop NAME 1 2 3 4
This is $NAME
$$end
continue
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
This is 1
This is 2
This is 3
This is 4
continue
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:39:
cat >input <<'_ATEOF'
text
\$\$loop NAME text \"doubly-quoted string\" 'singly-quoted string' \\
 \"text with \\\" and \\\$text characters\" \"\$text\"
This is \$NAME.
\$\$end
continue
_ATEOF

text=\"expanded variable\" xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:39"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop NAME text "doubly-quoted string" 'singly-quoted string' \
 "text with \" and \$text characters" "$text"
This is $NAME.
$$end
continue
_ATEOF

text="expanded variable" xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
This is text.
This is doubly-quoted string.
This is singly-quoted string.
This is text with \" and \$text characters.
This is expanded variable.
continue
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:60:
cat >input <<'_ATEOF'
text
\$\$loop NAME 1 2 3 4
This is \$NAME
\$\$end
continue
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:60"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop NAME 1 2 3 4
This is $NAME
$$end
continue
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
text
#line 3 \"input\"
This is 1
#line 3 \"input\"
This is 2
#line 3 \"input\"
This is 3
#line 3 \"input\"
This is 4
#line 5 \"input\"
continue
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:85:
cat >input <<'_ATEOF'
text
\$\$loop NAME \$SEQ
This is \$NAME
\$\$end
continue
initial value \$NAME
_ATEOF

SEQ=\"1 2 3\" NAME=foo xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:85"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop NAME $SEQ
This is $NAME
$$end
continue
initial value $NAME
_ATEOF

SEQ="1 2 3" NAME=foo xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text
This is 1
This is 2
This is 3
continue
initial value foo
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:85"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:105:
cat >input <<'_ATEOF'
text
\$\$loop X 1 2 3
This is \$X
\$\$ loop Y 10 20 30
Inner \$Y
next
\$\$ end
\$\$end
finish
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:105"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop X 1 2 3
This is $X
$$ loop Y 10 20 30
Inner $Y
next
$$ end
$$end
finish
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
text
#line 3 \"input\"
This is 1
#line 5 \"input\"
Inner 10
next
#line 5 \"input\"
Inner 20
next
#line 5 \"input\"
Inner 30
next
#line 3 \"input\"
This is 2
#line 5 \"input\"
Inner 10
next
#line 5 \"input\"
Inner 20
next
#line 5 \"input\"
Inner 30
next
#line 3 \"input\"
This is 3
#line 5 \"input\"
Inner 10
next
#line 5 \"input\"
Inner 20
next
#line 5 \"input\"
Inner 30
next
#line 9 \"input\"
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:105"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:159:
cat >input <<'_ATEOF'
text
\$\$loop X 1 2 3
This is \$X
\$\$ range Y 0 6 2
Inner \$Y
next
\$\$ end
\$\$end
finish
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:159"
( $at_check_trace;
cat >input <<'_ATEOF'
text
$$loop X 1 2 3
This is $X
$$ range Y 0 6 2
Inner $Y
next
$$ end
$$end
finish
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
text
#line 3 \"input\"
This is 1
#line 5 \"input\"
Inner 0
next
#line 5 \"input\"
Inner 2
next
#line 5 \"input\"
Inner 4
next
#line 5 \"input\"
Inner 6
next
#line 3 \"input\"
This is 2
#line 5 \"input\"
Inner 0
next
#line 5 \"input\"
Inner 2
next
#line 5 \"input\"
Inner 4
next
#line 5 \"input\"
Inner 6
next
#line 3 \"input\"
This is 3
#line 5 \"input\"
Inner 0
next
#line 5 \"input\"
Inner 2
next
#line 5 \"input\"
Inner 4
next
#line 5 \"input\"
Inner 6
next
#line 9 \"input\"
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/loop.at:159"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop.at:222:
cat >input <<'_ATEOF'
start
\$\$loop \"text\"
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "loop.at:222"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$loop "text"
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-6: malformed \$\$loop directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$loop \"text\"
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/loop.at:222"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_25
#AT_START_26
at_fn_group_banner 26 'eval.at:17' \
  "\$\$eval" "                                         "
at_xfail=no
(
  printf "%s\n" "26. $at_setup_line: testing $at_desc ..."
  $at_traceon



{ set +x
printf "%s\n" "$at_srcdir/eval.at:20:
cat >input <<'_ATEOF'
\$\$set X1 \"one\"
start
\$\$eval
\\\$X\$I - \\\$X\$I
\$\$end
end
_ATEOF

xenv -DI=1 input
"
at_fn_check_prepare_notrace 'an embedded newline' "eval.at:20"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X1 "one"
start
$$eval
\$X$I - \$X$I
$$end
end
_ATEOF

xenv -DI=1 input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
one - one
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eval.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eval.at:37:
cat >input <<'_ATEOF'
\$\$set X1 \"one\"
start
\$\$eval
\\\$X\$I
\$\$end
end
_ATEOF

xenv -s -DI=1 input
"
at_fn_check_prepare_notrace 'an embedded newline' "eval.at:37"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X1 "one"
start
$$eval
\$X$I
$$end
end
_ATEOF

xenv -s -DI=1 input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 2 \"input\"
start
#line 4 \"input\"
one
#line 6 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eval.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eval.at:57:
cat >input <<'_ATEOF'
\$\$set X1 \"one\"
\$\$set X2 \"two\"
\$\$set X3 \"three\"
\$\$set X4 \"four\"
\$\$loop I 1 2 3 4
\$I
\$\$eval
\\\$X\$I
\$\$end
\$\$end
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eval.at:57"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X1 "one"
$$set X2 "two"
$$set X3 "three"
$$set X4 "four"
$$loop I 1 2 3 4
$I
$$eval
\$X$I
$$end
$$end
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "1
one
2
two
3
three
4
four
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eval.at:57"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eval.at:83:
cat >input <<'_ATEOF'
\$\$set X1 \"one\"
\$\$set X2 \"two\"
\$\$set X3 \"three\"
\$\$set X4 \"four\"
\$\$loop I 1 2 3 4
\$I
\$\$eval
\\\$X\$I
\$\$end
\$\$end
end
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "eval.at:83"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X1 "one"
$$set X2 "two"
$$set X3 "three"
$$set X4 "four"
$$loop I 1 2 3 4
$I
$$eval
\$X$I
$$end
$$end
end
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 6 \"input\"
1
#line 8 \"input\"
one
#line 6 \"input\"
2
#line 8 \"input\"
two
#line 6 \"input\"
3
#line 8 \"input\"
three
#line 6 \"input\"
4
#line 8 \"input\"
four
#line 11 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eval.at:83"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eval.at:120:
cat >input <<'_ATEOF'
start
\$\$eval text
finish
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eval.at:120"
( $at_check_trace;
cat >input <<'_ATEOF'
start
$$eval text
finish
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-6: malformed \$\$eval directive
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "start
\$\$eval text
finish
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eval.at:120"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_26
#AT_START_27
at_fn_group_banner 27 'special.at:17' \
  "\$\$ statements" "                                  "
at_xfail=no
(
  printf "%s\n" "27. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Neither $$set nor $$ifdef, nor other preprocessor statements
(such as $$else) are expanded when used within a string.
$$ifset X
They must be the first non-whitespace sequence at the beginning of
line for them to take effect.
$$endif
That's how it is.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/special.at:28:
unset X
xenv < input
"
at_fn_check_prepare_notrace 'an embedded newline' "special.at:28"
( $at_check_trace;
unset X
xenv < input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Neither \$\$set nor \$\$ifdef, nor other preprocessor statements
(such as \$\$else) are expanded when used within a string.
That's how it is.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/special.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/special.at:37:
X=1 xenv < input
"
at_fn_check_prepare_notrace 'an embedded newline' "special.at:37"
( $at_check_trace;
X=1 xenv < input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Neither \$\$set nor \$\$ifdef, nor other preprocessor statements
(such as \$\$else) are expanded when used within a string.
They must be the first non-whitespace sequence at the beginning of
line for them to take effect.
That's how it is.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/special.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_27
#AT_START_28
at_fn_group_banner 28 'comment.at:17' \
  "Comments" "                                       "
at_xfail=no
(
  printf "%s\n" "28. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
${* Comment statements are ignored *}
Lorem ipsum dolor sit amet, consectetur adipiscing elit,
${* Comments can be multi-line,
as shown here.  Variable references in comments (${X:?}) are ignored.
Newline character following the comment is retained. *}
sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris
nisi ut aliquip ex ea commodo consequat.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/comment.at:28: unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "comment.at:28"
( $at_check_trace; unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Lorem ipsum dolor sit amet, consectetur adipiscing elit,

sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris
nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/comment.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_28
#AT_START_29
at_fn_group_banner 29 'dnl.at:16' \
  "dnl" "                                            "
at_xfail=no
(
  printf "%s\n" "29. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Gallia est omnis divisa in partes tres,
$$dnl quarum unam incolunt Belgae,
aliam Aquitani,
$$dnl tertiam qui ipsorum lingua Celtae, nostra Galli appellantur.
Hi omnes lingua, institutis, legibus inter se differunt.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/dnl.at:25: xenv input"
at_fn_check_prepare_trace "dnl.at:25"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Gallia est omnis divisa in partes tres,
aliam Aquitani,
Hi omnes lingua, institutis, legibus inter se differunt.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/dnl.at:25"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/dnl.at:31: xenv -s input"
at_fn_check_prepare_trace "dnl.at:31"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Gallia est omnis divisa in partes tres,
#line 3 \"input\"
aliam Aquitani,
#line 5 \"input\"
Hi omnes lingua, institutis, legibus inter se differunt.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/dnl.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_29
#AT_START_30
at_fn_group_banner 30 'ignore.at:16' \
  "ignore" "                                         "
at_xfail=no
(
  printf "%s\n" "30. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Flumen est Arar, quod
$$ignore
per fines Haeduorum et Sequanorum
in Rhodanum influit, incredibili lenitate, ita ut oculis
in utram partem fluat iudicari non possit. Id
$$end
Helvetii ratibus ac lintribus iunctis transibant. Ubi
$$ignore
per exploratores Caesar certior factus est tres iam partes copiarum
Helvetios id flumen traduxisse, quartam vero partem citra flumen Ararim
reliquam esse,
$$end
de tertia vigilia cum legionibus tribus e castris
profectus ad eam partem pervenit quae nondum flumen transierat.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ignore.at:35: xenv input"
at_fn_check_prepare_trace "ignore.at:35"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Flumen est Arar, quod
Helvetii ratibus ac lintribus iunctis transibant. Ubi
de tertia vigilia cum legionibus tribus e castris
profectus ad eam partem pervenit quae nondum flumen transierat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ignore.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/ignore.at:42: xenv -s input"
at_fn_check_prepare_trace "ignore.at:42"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Flumen est Arar, quod
#line 7 \"input\"
Helvetii ratibus ac lintribus iunctis transibant. Ubi
#line 13 \"input\"
de tertia vigilia cum legionibus tribus e castris
profectus ad eam partem pervenit quae nondum flumen transierat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ignore.at:42"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_30
#AT_START_31
at_fn_group_banner 31 'quote.at:17' \
  "Quoting" "                                        "
at_xfail=no
(
  printf "%s\n" "31. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'

Anything appearing between \$[ and ] is quoted.
Quoted $[text keeps track of [balanced []] brackets to
find the right closing] one.
$[Unbalanced brackets should not appear in quoted text.

No variable expansion occurs within quotes, e.g.: $X.

Preprocessed statements and comments are retained as well:

  $$ifset X

  ${* comment *}

After closing bracket, normal preprocessing is restored:] $X.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/quote.at:35: X=TEXT xenv input"
at_fn_check_prepare_trace "quote.at:35"
( $at_check_trace; X=TEXT xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Anything appearing between \$[ and ] is quoted.
Quoted text keeps track of [balanced []] brackets to
find the right closing one.
Unbalanced brackets should not appear in quoted text.

No variable expansion occurs within quotes, e.g.: \$X.

Preprocessed statements and comments are retained as well:

  \$\$ifset X

  \${* comment *}

After closing bracket, normal preprocessing is restored: TEXT.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/quote.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_31
#AT_START_32
at_fn_group_banner 32 'verbatim.at:17' \
  "Verbatim" "                                       "
at_xfail=no
(
  printf "%s\n" "32. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'

Text begins here
$$verbatim
Anything appearing between $$verbatim and $$end is reproduced
verbatim.

No variable expansion occurs within quotes, e.g.: $X.

Xenv's special sequences loose their meaning as well:
$quoted text blocks and are reproduced as is.  Preprocessor
conditionals and comments are retained as well:

  $$ifset X

  ${* comment *}

After $$end, normal preprocessing is restored:
$$end
X=$X
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/verbatim.at:39: X=TEXT xenv input"
at_fn_check_prepare_trace "verbatim.at:39"
( $at_check_trace; X=TEXT xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Text begins here
Anything appearing between \$\$verbatim and \$\$end is reproduced
verbatim.

No variable expansion occurs within quotes, e.g.: \$X.

Xenv's special sequences loose their meaning as well:
\$quoted text blocks and are reproduced as is.  Preprocessor
conditionals and comments are retained as well:

  \$\$ifset X

  \${* comment *}

After \$\$end, normal preprocessing is restored:
X=TEXT
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/verbatim.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_32
#AT_START_33
at_fn_group_banner 33 'eof.at:17' \
  "EOF corner cases" "                               "
at_xfail=no
(
  printf "%s\n" "33. $at_setup_line: testing $at_desc ..."
  $at_traceon

{ set +x
printf "%s\n" "$at_srcdir/eof.at:18: echo '\$' | tr -d '\\n' | xenv"
at_fn_check_prepare_notrace 'a shell pipeline' "eof.at:18"
( $at_check_trace; echo '$' | tr -d '\n' | xenv
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "\$" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eof.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/eof.at:19: echo '\$\$' | tr -d '\\n' | xenv"
at_fn_check_prepare_notrace 'a shell pipeline' "eof.at:19"
( $at_check_trace; echo '$$' | tr -d '\n' | xenv
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "\$\$" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/eof.at:19"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/eof.at:20: echo '\$\$a' | tr -d '\\n' | xenv"
at_fn_check_prepare_notrace 'a shell pipeline' "eof.at:20"
( $at_check_trace; echo '$$a' | tr -d '\n' | xenv
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "<stdin>:1.1-3: unrecognized directive: \$\$a
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "\$\$a" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:24:
cat >input <<'_ATEOF'
Duis aute irure
dolor in \${* reprehenderit in voluptate velit esse
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "eof.at:24"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute irure
dolor in ${* reprehenderit in voluptate velit esse
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.10: end of file in comment
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure
dolor in " | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:37:
cat >input <<'_ATEOF'
Duis aute irure
dolor in \$[reprehenderit in voluptate velit esse
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:37"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute irure
dolor in $[reprehenderit in voluptate velit esse
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.10: end of file in inline verbatim text
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure
dolor in reprehenderit in voluptate velit esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:51:
cat >input <<'_ATEOF'
Duis aute irure
\$\$ifset X
dolor in reprehenderit in voluptate velit esse
_ATEOF

unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:51"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute irure
$$ifset X
dolor in reprehenderit in voluptate velit esse
_ATEOF

unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1: end of file in conditional
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:51"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:66:
cat >input <<'_ATEOF'
Duis aute irure
\$\$ifset X
dolor in reprehenderit in voluptate velit esse
\$\$else
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF

unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:66"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute irure
$$ifset X
dolor in reprehenderit in voluptate velit esse
$$else
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF

unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:4.1: end of file in conditional
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure
cupidatat non proident, sunt in culpa qui officia deserunt mollit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:66"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:84:
cat >input <<'_ATEOF'
Duis aute irure
dolor in reprehenderit in voluptate velit esse
\$\$verbatim
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:84"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute irure
dolor in reprehenderit in voluptate velit esse
$$verbatim
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3.1: end of file in verbatim block
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure
dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:84"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:103:
cat >input <<'_ATEOF'
\$\$ifcom test \\
         -f \\
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:103"
( $at_check_trace;
cat >input <<'_ATEOF'
$$ifcom test \
         -f \
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3: end of file in \$\$ifcom statement
" | \
  $at_diff - "$at_stderr" || at_failed=:
at_fn_diff_devnull "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:103"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/eof.at:115:
cat >input <<'_ATEOF'
begin
\$\$eval
cupidatat non proident
nulla pariatur
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "eof.at:115"
( $at_check_trace;
cat >input <<'_ATEOF'
begin
$$eval
cupidatat non proident
nulla pariatur
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1: end of file in eval
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "begin
cupidatat non proident
nulla pariatur
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/eof.at:115"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_33
#AT_START_34
at_fn_group_banner 34 'syncline.at:17' \
  "synclines" "                                      "
at_xfail=no
(
  printf "%s\n" "34. $at_setup_line: testing $at_desc ..."
  $at_traceon


#
# Synclines generated by conditionals and multiline variable expansions
#
cat >input <<'_ATEOF'
Duis aute irure dolor
$$ifset X
in reprehenderit
$$else
nondum ille
$$endif
in voluptate velit esse
$$set A "a"
$$set B "b"
$$set C "c"
cillum dolore eu $Y
Excepteur sint occaecat
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:37:
unset X
Y=dum xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:37"
( $at_check_trace;
unset X
Y=dum xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor
#line 5 \"input\"
nondum ille
#line 7 \"input\"
in voluptate velit esse
#line 11 \"input\"
cillum dolore eu dum
Excepteur sint occaecat
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:53:
X=1 Y=dum xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:53"
( $at_check_trace;
X=1 Y=dum xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor
#line 3 \"input\"
in reprehenderit
#line 7 \"input\"
in voluptate velit esse
#line 11 \"input\"
cillum dolore eu dum
Excepteur sint occaecat
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:53"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:68:
X=1 Y=\"fugiat
nulla pariatur.
\" xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:68"
( $at_check_trace;
X=1 Y="fugiat
nulla pariatur.
" xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor
#line 3 \"input\"
in reprehenderit
#line 7 \"input\"
in voluptate velit esse
#line 11 \"input\"
cillum dolore eu fugiat
nulla pariatur.

#line 12 \"input\"
Excepteur sint occaecat
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:68"
$at_failed && at_fn_log_failure
$at_traceon; }


#
# Comments
#

{ set +x
printf "%s\n" "$at_srcdir/syncline.at:92:
cat >input <<'_ATEOF'
Duis aute\${* multiline
comment
text *}
irure dolor
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "syncline.at:92"
( $at_check_trace;
cat >input <<'_ATEOF'
Duis aute${* multiline
comment
text *}
irure dolor
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute
#line 3 \"input\"
irure dolor
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:92"
$at_failed && at_fn_log_failure
$at_traceon; }


#
# Synclines generated by alternative expansions
#
cat >input <<'_ATEOF'
Dius${X+ aute
irure
dolor in reprehenderit}
in voluptate
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:118:
unset X
xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:118"
( $at_check_trace;
unset X
xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Dius
#line 4 \"input\"
in voluptate
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:118"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:129:
X=1 xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:129"
( $at_check_trace;
X=1 xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Dius aute
irure
dolor in reprehenderit
#line 4 \"input\"
in voluptate
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:129"
$at_failed && at_fn_log_failure
$at_traceon; }


#
#
#
cat >input <<'_ATEOF'
Dius${X| aute
irure
dolor in reprehenderit| qui officia deserunt
mollit}
in voluptate
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:152:
unset X
xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:152"
( $at_check_trace;
unset X
xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Dius qui officia deserunt
#line 4 \"input\"
mollit
#line 5 \"input\"
in voluptate
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:152"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:165:
X=1 xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:165"
( $at_check_trace;
X=1 xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Dius aute
irure
dolor in reprehenderit
#line 5 \"input\"
in voluptate
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:165"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:177:
#
# Check whether each syncline is emitted at the start of a line.
# Xenv 3.2 would emit the second syncline right after \"huyus\" (before
# the newline).
#
cat >input <<'_ATEOF'
\${X:-talis ac
tanta
depravatio
huyus}
seculi
_ATEOF

unset X
xenv -s input
"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "syncline.at:177"
( $at_check_trace;
#
# Check whether each syncline is emitted at the start of a line.
# Xenv 3.2 would emit the second syncline right after "huyus" (before
# the newline).
#
cat >input <<'_ATEOF'
${X:-talis ac
tanta
depravatio
huyus}
seculi
_ATEOF

unset X
xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
talis ac
tanta
depravatio
huyus
#line 5 \"input\"
seculi
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:177"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/syncline.at:203:
#
# Ignore blocks within loops.
#
cat >input <<'_ATEOF'
incipit
\$\$loop x 1 2 3
\$\$ignore
Verba multissima
his versibus exposita
expelluntur
\$\$end
numerus \$x
\$\$end
finitur
_ATEOF

xenv -s input"
at_fn_check_prepare_notrace 'an embedded newline' "syncline.at:203"
( $at_check_trace;
#
# Ignore blocks within loops.
#
cat >input <<'_ATEOF'
incipit
$$loop x 1 2 3
$$ignore
Verba multissima
his versibus exposita
expelluntur
$$end
numerus $x
$$end
finitur
_ATEOF

xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
incipit
#line 8 \"input\"
numerus 1
#line 8 \"input\"
numerus 2
#line 8 \"input\"
numerus 3
#line 10 \"input\"
finitur
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/syncline.at:203"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_34
#AT_START_35
at_fn_group_banner 35 'command.at:16' \
  "Command substitution" "                           "
at_xfail=no
(
  printf "%s\n" "35. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/command.at:18:
#
# Simple command substitution.
#
cat >input <<'_ATEOF'
Lorem ipsum \$(echo \"dolor sit \")amet.
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:18"
( $at_check_trace;
#
# Simple command substitution.
#
cat >input <<'_ATEOF'
Lorem ipsum $(echo "dolor sit ")amet.
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }



{ set +x
printf "%s\n" "$at_srcdir/command.at:32:
#
# Check whether trailing newline is removed.
#
cat >text <<'_ATEOF'
ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna


_ATEOF

cat >input <<'_ATEOF'
Lorem \$(cat text) aliqua.
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:32"
( $at_check_trace;
#
# Check whether trailing newline is removed.
#
cat >text <<'_ATEOF'
ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna


_ATEOF

cat >input <<'_ATEOF'
Lorem $(cat text) aliqua.
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:60:
#
# Check timeouts.
#
cat >input <<'_ATEOF'
Lorem ipsum \$(sleep 10) fulgor
_ATEOF

xenv -t 3 input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:60"
( $at_check_trace;
#
# Check timeouts.
#
cat >input <<'_ATEOF'
Lorem ipsum $(sleep 10) fulgor
_ATEOF

xenv -t 3 input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.13-23: command timed out
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum  fulgor
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:75:
#
# Synclines
#
cat >input <<'_ATEOF'
Duis aute irure \$(echo \"dolor in reprehenderit\") in voluptate velit esse
cillum dolore eu \$(cat <<EOF
fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
EOF
)
sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:75"
( $at_check_trace;
#
# Synclines
#
cat >input <<'_ATEOF'
Duis aute irure $(echo "dolor in reprehenderit") in voluptate velit esse
cillum dolore eu $(cat <<EOF
fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
EOF
)
sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
#line 7 \"input\"
sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:75"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:101:
#
# Synclines when used at beginning of line
#
cat >input <<'_ATEOF'
Duis
\$\$set X \"aute irure\"
\$(echo \$X)
dolor in reprehenderit
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:101"
( $at_check_trace;
#
# Synclines when used at beginning of line
#
cat >input <<'_ATEOF'
Duis
$$set X "aute irure"
$(echo $X)
dolor in reprehenderit
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis
#line 3 \"input\"
aute irure
dolor in reprehenderit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:101"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:121:
#
# Synclines when used at beginning of line (multiline substitution)
#
cat >input <<'_ATEOF'
Duis
\$\$set X \"aute
irure\"
\$(echo \"\$X\")
dolor in reprehenderit
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'a $(...) command substitution' "command.at:121"
( $at_check_trace;
#
# Synclines when used at beginning of line (multiline substitution)
#
cat >input <<'_ATEOF'
Duis
$$set X "aute
irure"
$(echo "$X")
dolor in reprehenderit
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis
#line 4 \"input\"
aute
irure
#line 5 \"input\"
dolor in reprehenderit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:121"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_35
#AT_START_36
at_fn_group_banner 36 'include.at:17' \
  "\$\$include relative" "                             "
at_xfail=no
(
  printf "%s\n" "36. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >1.inc <<'_ATEOF'
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$include ./2.inc
_ATEOF


cat >2.inc <<'_ATEOF'
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$include ./1.inc
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include.at:34: xenv input"
at_fn_check_prepare_trace "include.at:34"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include.at:34"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/include.at:42: xenv -s input"
at_fn_check_prepare_trace "include.at:42"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor in reprehenderit in voluptate velit esse
#line 1 \"./1.inc\"
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
#line 1 \"./2.inc\"
cupidatat non proident, sunt in culpa qui officia deserunt mollit
#line 3 \"input\"
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include.at:42"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_36
#AT_START_37
at_fn_group_banner 37 'include1.at:17' \
  "\$\$include path" "                                 "
at_xfail=no
(
  printf "%s\n" "37. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/include1.at:19: mkdir A B"
at_fn_check_prepare_trace "include1.at:19"
( $at_check_trace; mkdir A B
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
at_fn_diff_devnull "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include1.at:19"
$at_failed && at_fn_log_failure
$at_traceon; }


cat >A/1.inc <<'_ATEOF'
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$include 2.inc
_ATEOF


cat >B/2.inc <<'_ATEOF'
cupidatat non proident, sunt in culpa qui officia deserunt mollit
_ATEOF


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$include 1.inc
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include1.at:36: xenv -I A -I B input"
at_fn_check_prepare_trace "include1.at:36"
( $at_check_trace; xenv -I A -I B input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include1.at:36"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/include1.at:44: xenv -s -I A -I B input"
at_fn_check_prepare_trace "include1.at:44"
( $at_check_trace; xenv -s -I A -I B input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor in reprehenderit in voluptate velit esse
#line 1 \"A/1.inc\"
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
#line 1 \"B/2.inc\"
cupidatat non proident, sunt in culpa qui officia deserunt mollit
#line 3 \"input\"
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include1.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_37
#AT_START_38
at_fn_group_banner 38 'include2.at:17' \
  "\$\$include nonexistent" "                          "
at_xfail=no
(
  printf "%s\n" "38. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$include 2.inc
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include2.at:24: xenv input"
at_fn_check_prepare_trace "include2.at:24"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.11-15: file not found: 2.inc
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 66 $at_status "$at_srcdir/include2.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_38
#AT_START_39
at_fn_group_banner 39 'include3.at:17' \
  "\$\$include recursive" "                            "
at_xfail=no
(
  printf "%s\n" "39. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >1.inc <<'_ATEOF'
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$include ./2.inc
_ATEOF


cat >2.inc <<'_ATEOF'
cupidatat non proident, sunt in culpa qui officia deserunt mollit
$$  include   ./1.inc
_ATEOF


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$ include ./1.inc
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include3.at:35: xenv input"
at_fn_check_prepare_trace "include3.at:35"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "./2.inc:2.15-21: file ./1.inc already included
input:2.12-18: place of the initial inclusion
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident, sunt in culpa qui officia deserunt mollit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 69 $at_status "$at_srcdir/include3.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_39
#AT_START_40
at_fn_group_banner 40 'include4.at:17' \
  "\$\$include conditional" "                          "
at_xfail=no
(
  printf "%s\n" "40. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
input file begins
and
$$ifdef X
$$include nonexistent.file
$$endif
ends here
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include4.at:27:
# The \$\$include directive is ignored if the condition is false, and
# therefore, no error is reported.
unset X
xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "include4.at:27"
( $at_check_trace;
# The $$include directive is ignored if the condition is false, and
# therefore, no error is reported.
unset X
xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "input file begins
and
ends here
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include4.at:27"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/include4.at:39:
# The \$\$include directive fires here, so a \"not found\" error is reported.
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "include4.at:39"
( $at_check_trace;
# The $$include directive fires here, so a "not found" error is reported.
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:4.11-26: file not found: nonexistent.file
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "input file begins
and
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 66 $at_status "$at_srcdir/include4.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_40
#AT_START_41
at_fn_group_banner 41 'include5.at:17' \
  "\$\$include path and relative files" "              "
at_xfail=no
(
  printf "%s\n" "41. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
input file begins
$$include a
input file ends
_ATEOF


cat >a <<'_ATEOF'
lines included
from top-level file
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/include5.at:30: mkdir inc
cat >inc/a <<'_ATEOF'
lines from include file
located in subdirectory
_ATEOF
"
at_fn_check_prepare_notrace 'an embedded newline' "include5.at:30"
( $at_check_trace; mkdir inc
cat >inc/a <<'_ATEOF'
lines from include file
located in subdirectory
_ATEOF

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
at_fn_diff_devnull "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include5.at:30"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/include5.at:36: xenv input"
at_fn_check_prepare_trace "include5.at:36"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "input file begins
lines included
from top-level file
input file ends
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include5.at:36"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/include5.at:44: xenv -Iinc input"
at_fn_check_prepare_trace "include5.at:44"
( $at_check_trace; xenv -Iinc input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "input file begins
lines from include file
located in subdirectory
input file ends
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/include5.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_41
#AT_START_42
at_fn_group_banner 42 'sinclude.at:17' \
  "\$\$sinclude" "                                     "
at_xfail=no
(
  printf "%s\n" "42. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >1.inc <<'_ATEOF'
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
$$sinclude ./2.inc
_ATEOF


cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit in voluptate velit esse
$$sinclude ./1.inc
anim id est laborum.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/sinclude.at:30: xenv input"
at_fn_check_prepare_trace "sinclude.at:30"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/sinclude.at:30"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/sinclude.at:37: xenv -s input"
at_fn_check_prepare_trace "sinclude.at:37"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor in reprehenderit in voluptate velit esse
#line 1 \"./1.inc\"
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
#line 3 \"input\"
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/sinclude.at:37"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_42
#AT_START_43
at_fn_group_banner 43 'escape.at:17' \
  "Escaping" "                                       "
at_xfail=no
(
  printf "%s\n" "43. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
An escaped \$VAR is not expanded, unescaped $VAR is.
${X:-"Escaped \$VAR and plain $VAR are always handled in default values"}
${X:-"as well as both \" and \\."}
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/escape.at:24:
unset X
VAR=variable xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "escape.at:24"
( $at_check_trace;
unset X
VAR=variable xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "An escaped \$VAR is not expanded, unescaped variable is.
Escaped \$VAR and plain variable are always handled in default values
as well as both \" and \\.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/escape.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/escape.at:34:
unset X
VAR=variable xenv -Wno-escape input
"
at_fn_check_prepare_notrace 'an embedded newline' "escape.at:34"
( $at_check_trace;
unset X
VAR=variable xenv -Wno-escape input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "An escaped \\variable is not expanded, unescaped variable is.
Escaped \$VAR and plain variable are always handled in default values
as well as both \" and \\.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/escape.at:34"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_43
#AT_START_44
at_fn_group_banner 44 'divert.at:17' \
  "diversions" "                                     "
at_xfail=no
(
  printf "%s\n" "44. $at_setup_line: testing $at_desc ..."
  $at_traceon



{ set +x
printf "%s\n" "$at_srcdir/divert.at:20:
cat >input <<'_ATEOF'
begin text
\$\$divert A
this text is diverted first
\$\$divert B
this text is diverted after it
\$\$divert
main output restored
\$\$undivert B
some other text
\$\$undivert A
end text
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "divert.at:20"
( $at_check_trace;
cat >input <<'_ATEOF'
begin text
$$divert A
this text is diverted first
$$divert B
this text is diverted after it
$$divert
main output restored
$$undivert B
some other text
$$undivert A
end text
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "begin text
main output restored
this text is diverted after it
some other text
this text is diverted first
end text
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/divert.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/divert.at:45:
cat >input <<'_ATEOF'
\$\$divert A
et sequitur
\$\$divert
Incipiat
\$\$ifset X
\$\$ undivert A
\$\$endif
Finit
_ATEOF

unset X
xenv input
echo ======
X=1 xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "divert.at:45"
( $at_check_trace;
cat >input <<'_ATEOF'
$$divert A
et sequitur
$$divert
Incipiat
$$ifset X
$$ undivert A
$$endif
Finit
_ATEOF

unset X
xenv input
echo ======
X=1 xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Incipiat
Finit
======
Incipiat
et sequitur
Finit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/divert.at:45"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/divert.at:70:
cat >input <<'_ATEOF'
Incipit hic
\$\$divert A
et hic sequitur
\$\$divert
\$\$range X 1 3
\$\$undivert A
\$\$end
atque finit
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "divert.at:70"
( $at_check_trace;
cat >input <<'_ATEOF'
Incipit hic
$$divert A
et hic sequitur
$$divert
$$range X 1 3
$$undivert A
$$end
atque finit
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Incipit hic
#line 3 \"input\"
et hic sequitur
#line 3 \"input\"
et hic sequitur
#line 3 \"input\"
et hic sequitur
#line 8 \"input\"
atque finit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/divert.at:70"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/divert.at:96:
cat >input <<'_ATEOF'
Incipit hic
\$\$divert A
et hic sequitur
\$\$divert
hic finit
\$\$undivert A
\$\$dropdivert A
\$\$undivert A
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "divert.at:96"
( $at_check_trace;
cat >input <<'_ATEOF'
Incipit hic
$$divert A
et hic sequitur
$$divert
hic finit
$$undivert A
$$dropdivert A
$$undivert A
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:8.1-13: no such diversion: A
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Incipit hic
hic finit
et hic sequitur
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/divert.at:96"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/divert.at:117:
cat >input <<'_ATEOF'
\$\$divert A
et sic sequitur
\$\$divert
Incipit hic
\$\$undivert A
atque finit
\$\$divert A
iterum atque iterum
\$\$divert
Iterum scribit
\$\$undivert A
verba scribens
_ATEOF

xenv -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "divert.at:117"
( $at_check_trace;
cat >input <<'_ATEOF'
$$divert A
et sic sequitur
$$divert
Incipit hic
$$undivert A
atque finit
$$divert A
iterum atque iterum
$$divert
Iterum scribit
$$undivert A
verba scribens
_ATEOF

xenv -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 4 \"input\"
Incipit hic
#line 2 \"input\"
et sic sequitur
#line 6 \"input\"
atque finit
#line 10 \"input\"
Iterum scribit
#line 2 \"input\"
et sic sequitur
#line 8 \"input\"
iterum atque iterum
#line 12 \"input\"
verba scribens
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/divert.at:117"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_44
#AT_START_45
at_fn_group_banner 45 'macro.at:16' \
  "Macros" "                                         "
at_xfail=no
(
  printf "%s\n" "45. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >macro.xenv <<'_ATEOF'
$$defmacro ArgTest a b c
A is "$a".
B is "$b".
C is "$c".
$$end
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/macro.at:27: cat >input <<'_ATEOF'
begin
\$\$expmacro ArgTest word 'another \$'\" argument\" \\
 4
end
\$a
\$\$ifdef b
B is set
\$\$endif
\$c
_ATEOF

export a=10
unset b
export c=\"cc\"
xenv macro.xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "macro.at:27"
( $at_check_trace; cat >input <<'_ATEOF'
begin
$$expmacro ArgTest word 'another $'" argument" \
 4
end
$a
$$ifdef b
B is set
$$endif
$c
_ATEOF

export a=10
unset b
export c="cc"
xenv macro.xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "begin
A is \"word\".
B is \"another \$ argument\".
C is \"4\".
end
10
cc
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/macro.at:27"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/macro.at:54: cat >input <<'_ATEOF'
begin
\$\$ArgTest word 'another \$'\" argument\" \\
 4
end
\$a
\$\$ifdef b
B is set
\$\$endif
\$c
_ATEOF

export a=10
unset b
export c=\"cc\"
xenv macro.xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "macro.at:54"
( $at_check_trace; cat >input <<'_ATEOF'
begin
$$ArgTest word 'another $'" argument" \
 4
end
$a
$$ifdef b
B is set
$$endif
$c
_ATEOF

export a=10
unset b
export c="cc"
xenv macro.xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "begin
A is \"word\".
B is \"another \$ argument\".
C is \"4\".
end
10
cc
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/macro.at:54"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_45
#AT_START_46
at_fn_group_banner 46 'direxp.at:17' \
  "directives in variable expansion" "               "
at_xfail=no
(
  printf "%s\n" "46. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >a.inc <<'_ATEOF'
B
C
_ATEOF


cat >input <<'_ATEOF'
0${X:+
A
$$iftrue Y
$$include a.inc
$$endif
D
}1
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/direxp.at:34: unset X
Y=0 xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "direxp.at:34"
( $at_check_trace; unset X
Y=0 xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "01
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/direxp.at:34"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/direxp.at:40: X='yes' Y=0 xenv input"
at_fn_check_prepare_trace "direxp.at:40"
( $at_check_trace; X='yes' Y=0 xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "0
A
D
1
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/direxp.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/direxp.at:48: X='yes' Y=1 xenv input"
at_fn_check_prepare_trace "direxp.at:48"
( $at_check_trace; X='yes' Y=1 xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "0
A
B
C
D
1
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/direxp.at:48"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_46
#AT_START_47
at_fn_group_banner 47 'warning.at:17' \
  "\$\$warning" "                                      "
at_xfail=no
(
  printf "%s\n" "47. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit
in voluptate velit esse
$$warning  Something wrong happened here
Excepteur sint culpa qui officia deserunt
$$warning Another strange thing here
sicut et in officium est
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/warning.at:28: xenv input"
at_fn_check_prepare_trace "warning.at:28"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3.1-41: warning: Something wrong happened here
input:5.1-37: warning: Another strange thing here
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit
in voluptate velit esse
Excepteur sint culpa qui officia deserunt
sicut et in officium est
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/warning.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_47
#AT_START_48
at_fn_group_banner 48 'error.at:17' \
  "\$\$error" "                                        "
at_xfail=no
(
  printf "%s\n" "48. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit
in voluptate velit esse
$$error  Something wrong happened here
Excepteur sint culpa qui officia deserunt
$$error Another strange thing here
sicut et in officium est
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/error.at:28: xenv input"
at_fn_check_prepare_trace "error.at:28"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3.1-39: error: Something wrong happened here
input:5.1-35: error: Another strange thing here
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit
in voluptate velit esse
Excepteur sint culpa qui officia deserunt
sicut et in officium est
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/error.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_48
#AT_START_49
at_fn_group_banner 49 'exit.at:17' \
  "\$\$exit" "                                         "
at_xfail=no
(
  printf "%s\n" "49. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >input <<'_ATEOF'
Duis aute irure dolor in reprehenderit
in voluptate velit esse
$$exit 1
Excepteur sint culpa qui officia deserunt
sicut et in officium est
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/exit.at:28: xenv input"
at_fn_check_prepare_trace "exit.at:28"
( $at_check_trace; xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Duis aute irure dolor in reprehenderit
in voluptate velit esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 1 $at_status "$at_srcdir/exit.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_49
#AT_START_50
at_fn_group_banner 50 'require.at:16' \
  "\$\$require" "                                      "
at_xfail=no
(
  printf "%s\n" "50. $at_setup_line: testing $at_desc ..."
  $at_traceon








{ set +x
printf "%s\n" "$at_srcdir/require.at:28:
cat >input <<'_ATEOF'
\$\$require 4.2
ok
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "require.at:28"
( $at_check_trace;
cat >input <<'_ATEOF'
$$require 4.2
ok
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "ok
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/require.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/require.at:39:
cat >input <<'_ATEOF'
\$\$require 3.2
ok
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "require.at:39"
( $at_check_trace;
cat >input <<'_ATEOF'
$$require 3.2
ok
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "ok
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/require.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }



{ set +x
printf "%s\n" "$at_srcdir/require.at:51:
cat >input <<'_ATEOF'
\$\$require 5.2
ok
_ATEOF

xenv input
"
at_fn_check_prepare_notrace 'an embedded newline' "require.at:51"
( $at_check_trace;
cat >input <<'_ATEOF'
$$require 5.2
ok
_ATEOF

xenv input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo stderr:; tee stderr <"$at_stderr"
at_fn_diff_devnull "$at_stdout" || at_failed=:
at_fn_check_status 78 $at_status "$at_srcdir/require.at:51"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/require.at:62: sed -e 's/input:1\\.1-[0-9][0-9]*: //' stderr"
at_fn_check_prepare_trace "require.at:62"
( $at_check_trace; sed -e 's/input:1\.1-[0-9][0-9]*: //' stderr
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "required version mismatch: requested at least 5.2, but have 4.2
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/require.at:62"
$at_failed && at_fn_log_failure
$at_traceon; }








  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_50
#AT_START_51
at_fn_group_banner 51 'rpe_end.at:16' \
  "unmatched \$\$end" "                                " 1
at_xfail=no
(
  printf "%s\n" "51. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Quosque tandem abuteris, $nomen, patientia nostra?
$$end
Quam diu etiam furor iste $cuius nos eludet?
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/rpe_end.at:24: nomen=Catilina cuius=tuus xenv input"
at_fn_check_prepare_trace "rpe_end.at:24"
( $at_check_trace; nomen=Catilina cuius=tuus xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-6: unmatched \$\$end
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Quosque tandem abuteris, Catilina, patientia nostra?
Quam diu etiam furor iste tuus nos eludet?
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_end.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/rpe_end.at:32: nomen=Catilina cuius=tuus xenv -Wrpe input"
at_fn_check_prepare_trace "rpe_end.at:32"
( $at_check_trace; nomen=Catilina cuius=tuus xenv -Wrpe input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.1-6: unmatched \$\$end
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Quosque tandem abuteris, Catilina, patientia nostra?
\$\$end
Quam diu etiam furor iste tuus nos eludet?
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_end.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_51
#AT_START_52
at_fn_group_banner 52 'rpe_set.at:16' \
  "\$\$set" "                                          " 1
at_xfail=no
(
  printf "%s\n" "52. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
begin
$$set X foo bar
end
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/rpe_set.at:23: xenv -s input"
at_fn_check_prepare_trace "rpe_set.at:23"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.13-16: extra arguments
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
#line 3 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_set.at:23"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/rpe_set.at:32: xenv -Wrpe -s input"
at_fn_check_prepare_trace "rpe_set.at:32"
( $at_check_trace; xenv -Wrpe -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.13-16: extra arguments
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
\$\$set X foo bar
#line 3 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_set.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_52
#AT_START_53
at_fn_group_banner 53 'rpe_range.at:16' \
  "\$\$range" "                                        " 1
at_xfail=no
(
  printf "%s\n" "53. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
begin
$$range N 1 2 three
text
$$ eval
 \$Y_$N=$N
$$ end
$$end
end
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/rpe_range.at:29: xenv -s input"
at_fn_check_prepare_trace "rpe_range.at:29"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.15-20: not a number
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
#line 8 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_range.at:29"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/rpe_range.at:39: xenv -Wrpe -s input"
at_fn_check_prepare_trace "rpe_range.at:39"
( $at_check_trace; xenv -Wrpe -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.15-20: not a number
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
\$\$range N 1 2 three
text
\$\$ eval
 \\\$Y_\$N=\$N
\$\$ end
\$\$end
#line 8 \"input\"
end
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/rpe_range.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_53
#AT_START_54
at_fn_group_banner 54 'range_eof.at:17' \
  "EOF in \$\$range" "                                 " 2
at_xfail=no
(
  printf "%s\n" "54. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >input <<'_ATEOF'
begin
$$range N 1 2
text
$$ eval
 \$Y_$N=$N
$$ end
more
text follows
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/range_eof.at:31: xenv -s input"
at_fn_check_prepare_trace "range_eof.at:31"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/range_eof.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range_eof.at:39: xenv -Wrpe -s input"
at_fn_check_prepare_trace "range_eof.at:39"
( $at_check_trace; xenv -Wrpe -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
\$\$range N 1 2
text
\$\$ eval
 \\\$Y_\$N=\$N
\$\$ end
more
text follows
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/range_eof.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }



cat >input <<'_ATEOF'
begin
$$range N 1 2 three
text
$$ eval
 \$Y_$N=$N
$$ end
more
text follows
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/range_eof.at:66: xenv -s input"
at_fn_check_prepare_trace "range_eof.at:66"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.15-20: not a number
input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/range_eof.at:66"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/range_eof.at:75: xenv -Wrpe -s input"
at_fn_check_prepare_trace "range_eof.at:75"
( $at_check_trace; xenv -Wrpe -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.15-20: not a number
input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
\$\$range N 1 2 three
text
\$\$ eval
 \\\$Y_\$N=\$N
\$\$ end
more
text follows
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/range_eof.at:75"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_54
#AT_START_55
at_fn_group_banner 55 'loop_eof.at:16' \
  "EOF in \$\$loop" "                                  " 2
at_xfail=no
(
  printf "%s\n" "55. $at_setup_line: testing $at_desc ..."
  $at_traceon



cat >input <<'_ATEOF'
begin
$$loop V 1 foo "X"
$V
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/loop_eof.at:25: xenv -s input"
at_fn_check_prepare_trace "loop_eof.at:25"
( $at_check_trace; xenv -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/loop_eof.at:25"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/loop_eof.at:33: xenv -Wrpe -s input"
at_fn_check_prepare_trace "loop_eof.at:33"
( $at_check_trace; xenv -Wrpe -s input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:3: end of file in loop body
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
begin
\$\$loop V 1 foo \"X\"
\$V
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/loop_eof.at:33"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_55
#AT_START_56
at_fn_group_banner 56 'comment_eof.at:16' \
  "EOF in comment" "                                 " 2
at_xfail=no
(
  printf "%s\n" "56. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/comment_eof.at:18:
cat >input <<'_ATEOF'
His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare, \${* iumentorum et
carrorum quam maximum numerum coemere, sementes quam maximas
facere, ut in itinere copia frumenti suppeteret
_ATEOF

xenv input"
at_fn_check_prepare_notrace 'a ${...} parameter expansion' "comment_eof.at:18"
( $at_check_trace;
cat >input <<'_ATEOF'
His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare, ${* iumentorum et
carrorum quam maximum numerum coemere, sementes quam maximas
facere, ut in itinere copia frumenti suppeteret
_ATEOF

xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:2.50: end of file in comment
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare, " | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/comment_eof.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_56
#AT_START_57
at_fn_group_banner 57 'ignore_eof.at:16' \
  "EOF in \$\$ignore" "                                " 2
at_xfail=no
(
  printf "%s\n" "57. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/ignore_eof.at:18:
cat >input <<'_ATEOF'
His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare,
\$\$ignore
iumentorum et carrorum quam maximum numerum coemere, sementes quam maximas
facere, ut in itinere copia frumenti suppeteret
_ATEOF

xenv input"
at_fn_check_prepare_notrace 'an embedded newline' "ignore_eof.at:18"
( $at_check_trace;
cat >input <<'_ATEOF'
His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare,
$$ignore
iumentorum et carrorum quam maximum numerum coemere, sementes quam maximas
facere, ut in itinere copia frumenti suppeteret
_ATEOF

xenv input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:4: end of file in ignore block
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "His rebus adducti et auctoritate Orgetorigis permoti constituerunt
ea quae ad proficiscendum pertinerent comparare,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/ignore_eof.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_57
#AT_START_58
at_fn_group_banner 58 'simple.at:17' \
  "Simple expansion" "                               " 3
at_xfail=no
(
  printf "%s\n" "58. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
foo is $ENV{X_FOO}, bar is $ENV{X_BAR}.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/simple.at:21:
unset X_FOO
unset X_BAR
xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:21"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/simple.at:21"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:28:
unset X_FOO
unset X_BAR
xenv -u -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:28"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -u -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-18: variable X_FOO not defined
input:1.28-38: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is , bar is .
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/simple.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:38:
unset X_FOO
unset X_BAR
xenv -ur -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:38"
( $at_check_trace;
unset X_FOO
unset X_BAR
xenv -ur -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.8-18: variable X_FOO not defined
input:1.28-38: variable X_BAR not defined
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is \$ENV{X_FOO}, bar is \$ENV{X_BAR}.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 65 $at_status "$at_srcdir/simple.at:38"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/simple.at:48:
X_FOO=baz X_BAR=qux xenv -u -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "simple.at:48"
( $at_check_trace;
X_FOO=baz X_BAR=qux xenv -u -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "foo is baz, bar is qux.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/simple.at:48"
$at_failed && at_fn_log_failure
$at_traceon; }


# This used to shift $ down a line, until 8aac91660d
cat >expout <<'_ATEOF'

foo$
{
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/simple.at:60: xenv -e ENV expout"
at_fn_check_prepare_trace "simple.at:60"
( $at_check_trace; xenv -e ENV expout
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
$at_diff expout "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/simple.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_58
#AT_START_59
at_fn_group_banner 59 'usedfl.at:17' \
  "Use default values" "                             " 3
at_xfail=no
(
  printf "%s\n" "59. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Lorem ipsum $ENV{PREF-dol}$ENV{SUF:-or} sit amet, $ENV{PASS-consectetur} adipiscing elit,
$ENV{INT:-sed }do eiusmod tempor incididunt
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:24:
unset PREF SUF PASS INT
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:24"
( $at_check_trace;
unset PREF SUF PASS INT
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:33:
PREF=
INT=
SUF=
export PREF INT SUF
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:33"
( $at_check_trace;
PREF=
INT=
SUF=
export PREF INT SUF
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum or sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:33"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:45:
PREF=gaud
SUF=iam
INT=propterea
export PREF SUF INT
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:45"
( $at_check_trace;
PREF=gaud
SUF=iam
INT=propterea
export PREF SUF INT
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum gaudiam sit amet, consectetur adipiscing elit,
proptereado eiusmod tempor incididunt
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:45"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usedfl.at:57:
cat >input <<'_ATEOF'
\$ENV{X:-text with 'single: \$ENV{Y}' and \"double: \\\"\$ENV{Y}\\\"\" quotes}
_ATEOF

unset X
Y=string xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usedfl.at:57"
( $at_check_trace;
cat >input <<'_ATEOF'
$ENV{X:-text with 'single: $ENV{Y}' and "double: \"$ENV{Y}\"" quotes}
_ATEOF

unset X
Y=string xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text with single: \$ENV{Y} and double: \"string\" quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usedfl.at:57"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_59
#AT_START_60
at_fn_group_banner 60 'asndfl.at:17' \
  "Assign default values" "                          " 3
at_xfail=no
(
  printf "%s\n" "60. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Lorem ipsum $ENV{OBJ=dolor} sit am$ENV{EX:=et}, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore $ENV{EX} $ENV{OBJ}e magna aliqua.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:24:
unset OBJ EX
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:24"
( $at_check_trace;
unset OBJ EX
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:33:
OBJ=nitor
export OBJ
unset EX
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:33"
( $at_check_trace;
OBJ=nitor
export OBJ
unset EX
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum nitor sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et nitore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:33"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:44:
OBJ=nitor
export OBJ
EX=abunt
export EX
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:44"
( $at_check_trace;
OBJ=nitor
export OBJ
EX=abunt
export EX
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum nitor sit amabunt, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore abunt nitore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:56:
OBJ=
export OBJ
EX=
export EX
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:56"
( $at_check_trace;
OBJ=
export OBJ
EX=
export EX
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum  sit amet, consectetur adipiscing elit,
sed do eiusmod tempor incididunt ut labore et e magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:56"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/asndfl.at:68:
cat >input <<'_ATEOF'
\$ENV{X:=text with 'single: \$ENV{Y}' and \"double: \\\"\$ENV{Y}\\\"\" quotes}
\$ENV{X}
_ATEOF

unset X
Y=string xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "asndfl.at:68"
( $at_check_trace;
cat >input <<'_ATEOF'
$ENV{X:=text with 'single: $ENV{Y}' and "double: \"$ENV{Y}\"" quotes}
$ENV{X}
_ATEOF

unset X
Y=string xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "text with single: \$ENV{Y} and double: \"string\" quotes
text with single: \$ENV{Y} and double: \"string\" quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/asndfl.at:68"
$at_failed && at_fn_log_failure
$at_traceon; }



  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_60
#AT_START_61
at_fn_group_banner 61 'enull.at:17' \
  "Display Error if Null or Unset" "                 " 3
at_xfail=no
(
  printf "%s\n" "61. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Ut enim ad minim $ENV{V1?}, quis nostrud exercitation ullamco
$ENV{V2:?} nisi ut aliquip ex ea commodo consequat.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/enull.at:24:
V1=veniam
V2=laboris
export V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:24"
( $at_check_trace;
V1=veniam
V2=laboris
export V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim veniam, quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:35:
V1=
V2=laboris
export V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:35"
( $at_check_trace;
V1=
V2=laboris
export V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:46:
unset V1
V2=laboris
export V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:46"
( $at_check_trace;
unset V1
V2=laboris
export V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-25: variable V1 not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:59:
unset V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:59"
( $at_check_trace;
unset V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-25: variable V1 not set
input:2.1-9: variable V2 null or not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:59"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/enull.at:71:
unset V1
V2=
export V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "enull.at:71"
( $at_check_trace;
unset V1
V2=
export V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-25: variable V1 not set
input:2.1-9: variable V2 null or not set
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/enull.at:71"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_61
#AT_START_62
at_fn_group_banner 62 'errmsg.at:17' \
  "Display Custom Error if Null or Unset" "          " 3
at_xfail=no
(
  printf "%s\n" "62. $at_setup_line: testing $at_desc ..."
  $at_traceon


cat >input <<'_ATEOF'
Ut enim ad minim $ENV{V1?Should have set V1}, quis nostrud exercitation ullamco
$ENV{V2:?Should have set V2 to a non-empty value} nisi ut aliquip ex ea commodo consequat.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:24:
V1=veniam
V2=laboris
export V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:24"
( $at_check_trace;
V1=veniam
V2=laboris
export V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim veniam, quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:24"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:35:
V1=
V2=laboris
export V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:35"
( $at_check_trace;
V1=
V2=laboris
export V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:46:
unset V1
V2=laboris
export V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:46"
( $at_check_trace;
unset V1
V2=laboris
export V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-44: Should have set V1
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
laboris nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:59:
unset V1 V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:59"
( $at_check_trace;
unset V1 V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-44: Should have set V1
input:2.1-49: Should have set V2 to a non-empty value
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:59"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:71:
unset V1
V2=
export V2
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:71"
( $at_check_trace;
unset V1
V2=
export V2
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.18-44: Should have set V1
input:2.1-49: Should have set V2 to a non-empty value
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Ut enim ad minim , quis nostrud exercitation ullamco
 nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:71"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/errmsg.at:85:
cat >input <<'_ATEOF'
\$ENV{X:?text with 'single: \$ENV{Y}' and \"double: \\\"\$ENV{Y}\\\"\" quotes}
_ATEOF

unset X
Y=string xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "errmsg.at:85"
( $at_check_trace;
cat >input <<'_ATEOF'
$ENV{X:?text with 'single: $ENV{Y}' and "double: \"$ENV{Y}\"" quotes}
_ATEOF

unset X
Y=string xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.1-69: text with single: \$ENV{Y} and double: \"string\" quotes
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/errmsg.at:85"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_62
#AT_START_63
at_fn_group_banner 63 'usealt.at:17' \
  "Use Alternate Value" "                            " 3
at_xfail=no
(
  printf "%s\n" "63. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
$ENV{INCIPIAT+Dolorem }ipsum $ENV{OBIECTUM:+dolor} sit amet, consectetur adipiscing elit,
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:22:
unset INCIPIAT OBIECTUM
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:22"
( $at_check_trace;
unset INCIPIAT OBIECTUM
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "ipsum  sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:22"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:30:
INCIPIAT=
OBIECTUM=
export INCIPIAT OBIECTUM
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:30"
( $at_check_trace;
INCIPIAT=
OBIECTUM=
export INCIPIAT OBIECTUM
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Dolorem ipsum  sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:30"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/usealt.at:40:
INCIPIAT=
OBIECTUM=sic
export INCIPIAT OBIECTUM
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "usealt.at:40"
( $at_check_trace;
INCIPIAT=
OBIECTUM=sic
export INCIPIAT OBIECTUM
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Dolorem ipsum dolor sit amet, consectetur adipiscing elit,
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/usealt.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_63
#AT_START_64
at_fn_group_banner 64 'ternary.at:17' \
  "Ternary operator" "                               " 3
at_xfail=no
(
  printf "%s\n" "64. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
Lorem ipsum $ENV{OBJ|dolor|fulgor} sit amet, $ENV{GBR:|consectetur|obliviscetur} adipiscing elit,
sed $ENV{LIM:||do }eiusmod tempor $ENV{ALT:|incididunt} ut labore et dolore magna aliqua.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:23:
unset OBJ GBR LIM ALT
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:23"
( $at_check_trace;
unset OBJ GBR LIM ALT
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum fulgor sit amet, obliviscetur adipiscing elit,
sed do eiusmod tempor  ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:23"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/ternary.at:31:
OBJ=
GBR=
LIM=
ALT=
export OBJ GBR LIM ALT
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:31"
( $at_check_trace;
OBJ=
GBR=
LIM=
ALT=
export OBJ GBR LIM ALT
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, obliviscetur adipiscing elit,
sed do eiusmod tempor  ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:31"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:44:
OBJ=1
GBR=1
LIM=1
ALT=1
export OBJ GBR LIM ALT
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:44"
( $at_check_trace;
OBJ=1
GBR=1
LIM=1
ALT=1
export OBJ GBR LIM ALT
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet, consectetur adipiscing elit,
sed eiusmod tempor incididunt ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:44"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/ternary.at:57:
cat >input <<'_ATEOF'
\$ENV{X:|text with 'single: \$ENV{Y}'|and \"double: \\\"\$ENV{Y}\\\"\"} quotes
_ATEOF

unset X
Y=string xenv -e ENV input
X=1 Y=string xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "ternary.at:57"
( $at_check_trace;
cat >input <<'_ATEOF'
$ENV{X:|text with 'single: $ENV{Y}'|and "double: \"$ENV{Y}\""} quotes
_ATEOF

unset X
Y=string xenv -e ENV input
X=1 Y=string xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "and double: \"string\" quotes
text with single: \$ENV{Y} quotes
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/ternary.at:57"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_64
#AT_START_65
at_fn_group_banner 65 'patsubst.at:16' \
  "Pattern substitution" "                           " 3
at_xfail=no
(
  printf "%s\n" "65. $at_setup_line: testing $at_desc ..."
  $at_traceon



# Replace first match
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:20: cat >input <<'_ATEOF'
'\$ENV{X/b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:20"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'fooNEEDLEbazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:20"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:26: cat >input <<'_ATEOF'
'\$ENV{X/b?r/}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:26"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/b?r/}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:26"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:32: cat >input <<'_ATEOF'
'\$ENV{X/b?r}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:32"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/b?r}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazberquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace all matches
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:40: cat >input <<'_ATEOF'
'\$ENV{X//b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:40"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X//b?r/NEEDLE}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'fooNEEDLEbazNEEDLEquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:40"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:46: cat >input <<'_ATEOF'
'\$ENV{X//b?r/}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:46"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X//b?r/}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:46"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:52: cat >input <<'_ATEOF'
'\$ENV{X//b?r}'
_ATEOF

X=foobarbazberquz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:52"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X//b?r}'
_ATEOF

X=foobarbazberquz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobazquz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:52"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace match at the beginning.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:60: cat >input <<'_ATEOF'
'\$ENV{X/#b?r/NEEDLE}'
_ATEOF

X=aberfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:60"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/#b?r/NEEDLE}'
_ATEOF

X=aberfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'aberfoobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:66: cat >input <<'_ATEOF'
'\$ENV{X/#b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:66"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/#b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'NEEDLEfoobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:66"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:72: cat >input <<'_ATEOF'
'\$ENV{X/#b?r/}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:72"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/#b?r/}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:72"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:78: cat >input <<'_ATEOF'
'\$ENV{X/#b?r}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:78"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/#b?r}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'foobar'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:78"
$at_failed && at_fn_log_failure
$at_traceon; }


# Replace match at the end.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:86: cat >input <<'_ATEOF'
'\$ENV{X/%b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:86"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/%b?r/NEEDLE}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfooNEEDLE'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:86"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:92: cat >input <<'_ATEOF'
'\$ENV{X/%b?r/}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:92"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/%b?r/}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfoo'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:92"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:98: cat >input <<'_ATEOF'
'\$ENV{X/%b?r}'
_ATEOF

X=berfoobar xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:98"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/%b?r}'
_ATEOF

X=berfoobar xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'berfoo'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:98"
$at_failed && at_fn_log_failure
$at_traceon; }


# Escape special chars.
{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:106: cat >input <<'_ATEOF'
'\$ENV{X/\\/bar/BAR}'
_ATEOF

X=var/barbaz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:106"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/\/bar/BAR}'
_ATEOF

X=var/barbaz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varBARbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:106"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:112: cat >input <<'_ATEOF'
'\$ENV{X/\\/bar/}'
_ATEOF

X=var/barbaz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:112"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/\/bar/}'
_ATEOF

X=var/barbaz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:112"
$at_failed && at_fn_log_failure
$at_traceon; }

{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:118: cat >input <<'_ATEOF'
'\$ENV{X/\\/bar}'
_ATEOF

X=var/barbaz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:118"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/\/bar}'
_ATEOF

X=var/barbaz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:118"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/patsubst.at:125: cat >input <<'_ATEOF'
'\$ENV{X/\\/bar\\//BAR}'
_ATEOF

X=var/bar/baz xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "patsubst.at:125"
( $at_check_trace; cat >input <<'_ATEOF'
'$ENV{X/\/bar\//BAR}'
_ATEOF

X=var/bar/baz xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "'varBARbaz'
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/patsubst.at:125"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_65
#AT_START_66
at_fn_group_banner 66 'strip.at:17' \
  "Strip" "                                          " 3
at_xfail=no
(
  printf "%s\n" "66. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/strip.at:19:
cat >input <<'_ATEOF'
strip shortest prefix: \$ENV{X#*:}.
strip longest prefix: \$ENV{X##*:}.
strip shortest suffix: \$ENV{X%:*}.
strip longest suffix: \$ENV{X%%:*}.
_ATEOF

X=talis:ac:tanta xenv -e ENV input
echo \"-- one delim --\"
X=talis:ac xenv -e ENV input
echo \"-- no match --\"
X=talis xenv -e ENV input"
at_fn_check_prepare_notrace 'an embedded newline' "strip.at:19"
( $at_check_trace;
cat >input <<'_ATEOF'
strip shortest prefix: $ENV{X#*:}.
strip longest prefix: $ENV{X##*:}.
strip shortest suffix: $ENV{X%:*}.
strip longest suffix: $ENV{X%%:*}.
_ATEOF

X=talis:ac:tanta xenv -e ENV input
echo "-- one delim --"
X=talis:ac xenv -e ENV input
echo "-- no match --"
X=talis xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "strip shortest prefix: ac:tanta.
strip longest prefix: tanta.
strip shortest suffix: talis:ac.
strip longest suffix: talis.
-- one delim --
strip shortest prefix: ac.
strip longest prefix: ac.
strip shortest suffix: talis.
strip longest suffix: talis.
-- no match --
strip shortest prefix: talis.
strip longest prefix: talis.
strip shortest suffix: talis.
strip longest suffix: talis.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/strip.at:19"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_66
#AT_START_67
at_fn_group_banner 67 'set.at:17' \
  "\$\$set" "                                          " 3
at_xfail=no
(
  printf "%s\n" "67. $at_setup_line: testing $at_desc ..."
  $at_traceon

{ set +x
printf "%s\n" "$at_srcdir/set.at:18:
cat >input <<'_ATEOF'
\$\$set X
   \$\$  set Y \"string \\\"nested string\\\" test\"

X is \$ENV{X+set (value \\'\$ENV{X}\\')}
Y is \$ENV{Y+set (value \\'\$ENV{Y}\\')}
_ATEOF

unset X Y
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:18"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set X
   $$  set Y "string \"nested string\" test"

X is $ENV{X+set (value \'$ENV{X}\')}
Y is $ENV{Y+set (value \'$ENV{Y}\')}
_ATEOF

unset X Y
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
X is set (value '')
Y is set (value 'string \"nested string\" test')
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/set.at:35:
cat >input <<'_ATEOF'
\$\$set Y 'dolor'
\$\$set X \"Duis aute irure
\$ENV{Y} in reprehenderit in \$ENV{Z} velit
esse\"
\$ENV{X}
_ATEOF

Z=voluptate xenv -e ENV -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:35"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set Y 'dolor'
$$set X "Duis aute irure
$ENV{Y} in reprehenderit in $ENV{Z} velit
esse"
$ENV{X}
_ATEOF

Z=voluptate xenv -e ENV -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 5 \"input\"
Duis aute irure
dolor in reprehenderit in voluptate velit
esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/set.at:52:
cat >input <<'_ATEOF'
\$\$set Y 'dolor'
\$\$set X 'Duis aute irure
\$ENV{Y} in reprehenderit in \$ENV{Z} velit
esse'
\$ENV{X}
_ATEOF

Z=voluptate xenv -e ENV -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "set.at:52"
( $at_check_trace;
cat >input <<'_ATEOF'
$$set Y 'dolor'
$$set X 'Duis aute irure
$ENV{Y} in reprehenderit in $ENV{Z} velit
esse'
$ENV{X}
_ATEOF

Z=voluptate xenv -e ENV -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 5 \"input\"
Duis aute irure
\$ENV{Y} in reprehenderit in \$ENV{Z} velit
esse
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/set.at:52"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_67
#AT_START_68
at_fn_group_banner 68 'comment.at:17' \
  "Comments" "                                       " 3
at_xfail=no
(
  printf "%s\n" "68. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'
$ENV{* Comment statements are ignored *}
Lorem ipsum dolor sit amet, consectetur adipiscing elit,
$ENV{* Comments can be multi-line,
as shown here.  Variable references in comments ($ENV{X:?}) are ignored.
Newline character following the comment is retained. *}
sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris
nisi ut aliquip ex ea commodo consequat.
_ATEOF

{ set +x
printf "%s\n" "$at_srcdir/comment.at:28: unset X
xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "comment.at:28"
( $at_check_trace; unset X
xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Lorem ipsum dolor sit amet, consectetur adipiscing elit,

sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris
nisi ut aliquip ex ea commodo consequat.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/comment.at:28"
$at_failed && at_fn_log_failure
$at_traceon; }

  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_68
#AT_START_69
at_fn_group_banner 69 'quote.at:17' \
  "Quoting" "                                        " 3
at_xfail=no
(
  printf "%s\n" "69. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'

Anything appearing between \$ENV[ and ] is quoted.
Quoted $ENV[text keeps track of [balanced []] brackets to
find the right closing] one.
$ENV[Unbalanced brackets should not appear in quoted text.

No variable expansion occurs within quotes, e.g.: $ENV{X}.

Preprocessed statements and comments are retained as well:

  $$ifset X

  $ENV{* comment *}

After closing bracket, normal preprocessing is restored:] $ENV{X}.
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/quote.at:35: X=TEXT xenv -e ENV input"
at_fn_check_prepare_trace "quote.at:35"
( $at_check_trace; X=TEXT xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Anything appearing between \$ENV[ and ] is quoted.
Quoted text keeps track of [balanced []] brackets to
find the right closing one.
Unbalanced brackets should not appear in quoted text.

No variable expansion occurs within quotes, e.g.: \$ENV{X}.

Preprocessed statements and comments are retained as well:

  \$\$ifset X

  \$ENV{* comment *}

After closing bracket, normal preprocessing is restored: TEXT.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/quote.at:35"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_69
#AT_START_70
at_fn_group_banner 70 'verbatim.at:17' \
  "Verbatim" "                                       " 3
at_xfail=no
(
  printf "%s\n" "70. $at_setup_line: testing $at_desc ..."
  $at_traceon

cat >input <<'_ATEOF'

Text begins here
$$verbatim
Anything appearing between $$verbatim and $$end is reproduced
verbatim.

No variable expansion occurs within quotes, e.g.: $ENV{X}.

Xenv's special sequences loose their meaning as well:
$ENVquoted text blocks and are reproduced as is.  Preprocessor
conditionals and comments are retained as well:

  $$ifset X

  $ENV{* comment *}

After $$end, normal preprocessing is restored:
$$end
X=$ENV{X}
_ATEOF


{ set +x
printf "%s\n" "$at_srcdir/verbatim.at:39: X=TEXT xenv -e ENV input"
at_fn_check_prepare_trace "verbatim.at:39"
( $at_check_trace; X=TEXT xenv -e ENV input
) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "
Text begins here
Anything appearing between \$\$verbatim and \$\$end is reproduced
verbatim.

No variable expansion occurs within quotes, e.g.: \$ENV{X}.

Xenv's special sequences loose their meaning as well:
\$ENVquoted text blocks and are reproduced as is.  Preprocessor
conditionals and comments are retained as well:

  \$\$ifset X

  \$ENV{* comment *}

After \$\$end, normal preprocessing is restored:
X=TEXT
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/verbatim.at:39"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_70
#AT_START_71
at_fn_group_banner 71 'command.at:16' \
  "Command substitution" "                           " 3
at_xfail=no
(
  printf "%s\n" "71. $at_setup_line: testing $at_desc ..."
  $at_traceon


{ set +x
printf "%s\n" "$at_srcdir/command.at:18:
#
# Simple command substitution.
#
cat >input <<'_ATEOF'
Lorem ipsum \$ENV(echo \"dolor sit \")amet.
_ATEOF

xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:18"
( $at_check_trace;
#
# Simple command substitution.
#
cat >input <<'_ATEOF'
Lorem ipsum $ENV(echo "dolor sit ")amet.
_ATEOF

xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:18"
$at_failed && at_fn_log_failure
$at_traceon; }



{ set +x
printf "%s\n" "$at_srcdir/command.at:32:
#
# Check whether trailing newline is removed.
#
cat >text <<'_ATEOF'
ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna


_ATEOF

cat >input <<'_ATEOF'
Lorem \$ENV(cat text) aliqua.
_ATEOF

xenv -e ENV input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:32"
( $at_check_trace;
#
# Check whether trailing newline is removed.
#
cat >text <<'_ATEOF'
ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna


_ATEOF

cat >input <<'_ATEOF'
Lorem $ENV(cat text) aliqua.
_ATEOF

xenv -e ENV input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum dolor sit amet,
consectetur adipiscing elit,


sed do eiusmod tempor incididunt
ut labore et dolore magna aliqua.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:32"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:60:
#
# Check timeouts.
#
cat >input <<'_ATEOF'
Lorem ipsum \$ENV(sleep 10) fulgor
_ATEOF

xenv -e ENV -t 3 input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:60"
( $at_check_trace;
#
# Check timeouts.
#
cat >input <<'_ATEOF'
Lorem ipsum $ENV(sleep 10) fulgor
_ATEOF

xenv -e ENV -t 3 input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
echo >>"$at_stderr"; printf "%s\n" "input:1.13-26: command timed out
" | \
  $at_diff - "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "Lorem ipsum  fulgor
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:60"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:75:
#
# Synclines
#
cat >input <<'_ATEOF'
Duis aute irure \$ENV(echo \"dolor in reprehenderit\") in voluptate velit esse
cillum dolore eu \$ENV(cat <<EOF
fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
EOF
)
sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF

xenv -e ENV -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:75"
( $at_check_trace;
#
# Synclines
#
cat >input <<'_ATEOF'
Duis aute irure $ENV(echo "dolor in reprehenderit") in voluptate velit esse
cillum dolore eu $ENV(cat <<EOF
fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
EOF
)
sunt in culpa qui officia deserunt mollit
anim id est laborum.
_ATEOF

xenv -e ENV -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis aute irure dolor in reprehenderit in voluptate velit esse
cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat
cupidatat non proident,
#line 7 \"input\"
sunt in culpa qui officia deserunt mollit
anim id est laborum.
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:75"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:101:
#
# Synclines when used at beginning of line
#
cat >input <<'_ATEOF'
Duis
\$\$set X \"aute irure\"
\$ENV(echo \$X)
dolor in reprehenderit
_ATEOF

xenv -e ENV -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:101"
( $at_check_trace;
#
# Synclines when used at beginning of line
#
cat >input <<'_ATEOF'
Duis
$$set X "aute irure"
$ENV(echo $X)
dolor in reprehenderit
_ATEOF

xenv -e ENV -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis
#line 3 \"input\"
aute irure
dolor in reprehenderit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:101"
$at_failed && at_fn_log_failure
$at_traceon; }


{ set +x
printf "%s\n" "$at_srcdir/command.at:121:
#
# Synclines when used at beginning of line (multiline substitution)
#
cat >input <<'_ATEOF'
Duis
\$\$set X \"aute
irure\"
\$ENV(echo \"\$X\")
dolor in reprehenderit
_ATEOF

xenv -e ENV -s input
"
at_fn_check_prepare_notrace 'an embedded newline' "command.at:121"
( $at_check_trace;
#
# Synclines when used at beginning of line (multiline substitution)
#
cat >input <<'_ATEOF'
Duis
$$set X "aute
irure"
$ENV(echo "$X")
dolor in reprehenderit
_ATEOF

xenv -e ENV -s input

) >>"$at_stdout" 2>>"$at_stderr" 5>&-
at_status=$? at_failed=false
$at_check_filter
at_fn_diff_devnull "$at_stderr" || at_failed=:
echo >>"$at_stdout"; printf "%s\n" "#line 1 \"input\"
Duis
#line 4 \"input\"
aute
irure
#line 5 \"input\"
dolor in reprehenderit
" | \
  $at_diff - "$at_stdout" || at_failed=:
at_fn_check_status 0 $at_status "$at_srcdir/command.at:121"
$at_failed && at_fn_log_failure
$at_traceon; }


  set +x
  $at_times_p && times >"$at_times_file"
) 5>&1 2>&1 7>&- | eval $at_tee_pipe
read at_status <"$at_status_file"
#AT_STOP_71
