mdw@git.distorted.org.uk Git - mLib/blob - sys/tests.at

   1 ### -*-autotest-*-
   2 ###
   3 ### Test script for system features
   4 ###
   5 ### (c) 2009 Straylight/Edgeware
   6 ###
   7
   8 ###----- Licensing notice ---------------------------------------------------
   9 ###
  10 ### This file is part of the mLib utilities library.
  11 ###
  12 ### mLib is free software; you can redistribute it and/or modify
  13 ### it under the terms of the GNU Library General Public License as
  14 ### published by the Free Software Foundation; either version 2 of the
  15 ### License, or (at your option) any later version.
  16 ###
  17 ### mLib is distributed in the hope that it will be useful,
  18 ### but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 ### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 ### GNU Library General Public License for more details.
  21 ###
  22 ### You should have received a copy of the GNU Library General Public
  23 ### License along with mLib; if not, write to the Free
  24 ### Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  25 ### MA 02111-1307, USA.
  26
  27 ###--------------------------------------------------------------------------
  28 ### mdup
  29
  30 AT_SETUP([sys: mdup])
  31 AT_KEYWORDS([sys mdup])
  32
  33 mdup=BUILDDIR/t/mdup.t
  34
  35 ## Very simple cases.
  36 AT_CHECK([$mdup 3:4])
  37 AT_CHECK([$mdup 4:3])
  38
  39 ## Overlapping sources and destinations
  40 AT_CHECK([$mdup 4:3 3:5 5:6])
  41
  42 ## Repeated sources
  43 AT_CHECK([$mdup 3:4 3:3 3:-1])
  44 AT_CHECK([$mdup 5:8 3:4 3:5 4:6])
  45
  46 ## Cycles
  47 AT_CHECK([$mdup 5:7 3:4 3:5 4:6 5:3])
  48 AT_CHECK([$mdup 5:8 3:4 3:5 4:6 5:3])
  49
  50 AT_CLEANUP
  51
  52 ###----- That's all, folks --------------------------------------------------