t/dejagnu-absolute-builddir.sh

   1 #! /bin/sh
   2 # Copyright (C) 2011-2024 Free Software Foundation, Inc.
   3 #
   4 # This program is free software; you can redistribute it and/or modify
   5 # it under the terms of the GNU General Public License as published by
   6 # the Free Software Foundation; either version 2, or (at your option)
   7 # any later version.
   8 #
   9 # This program is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13 #
  14 # You should have received a copy of the GNU General Public License
  15 # along with this program.  If not, see <https://www.gnu.org/licenses/>.
  16
  17 # Check that DejaGnu testsuites have 'objdir' defined (as a TCL variable)
  18 # to an absolute path.
  19
  20 required=runtest
  21 . test-init.sh
  22
  23 cat >> configure.ac << 'END'
  24 AC_CONFIG_FILES([testsuite/Makefile])
  25 AC_OUTPUT
  26 END
  27
  28 cat > Makefile.am << 'END'
  29 SUBDIRS = testsuite
  30 END
  31
  32 mkdir testsuite
  33
  34 cat > testsuite/Makefile.am << 'END'
  35 AUTOMAKE_OPTIONS = dejagnu
  36 DEJATOOL = tcl env
  37 EXTRA_DIST = tcl.test/tcl.exp
  38 END
  39
  40 mkdir testsuite/tcl.test
  41
  42 cat > testsuite/tcl.test/tcl.exp << 'END'
  43 send_user "tcl_objdir: $objdir\n"
  44 if { [ regexp "^/" $objdir ] } {
  45     pass "test_tcl_objdir"
  46 } else {
  47     fail "test_tcl_objdir"
  48 }
  49 END
  50
  51 $ACLOCAL
  52 $AUTOCONF
  53 $AUTOMAKE --add-missing
  54
  55 ./configure
  56
  57 $MAKE check
  58
  59 # Sanity check: all tests have run.
  60 test -f testsuite/env.log
  61 test -f testsuite/env.sum
  62 test -f testsuite/tcl.log
  63 test -f testsuite/tcl.sum
  64
  65 $MAKE distcheck
  66
  67 :