src/testdir/test1.in

   1
   2 First a simple test to check if the test script works.
   3
   4 If Vim was not compiled with the +eval feature, the small.vim script will be
   5 set to copy the test.ok file to test.out, so that it looks like the test
   6 succeeded.  Otherwise an empty small.vim is written.  small.vim is sourced by
   7 tests that require the +eval feature or other features that are missing in the
   8 small version.
   9
  10 If Vim was not compiled with the +windows feature, the tiny.vim script will be
  11 set like small.vim above.  tiny.vim is sourced by tests that require the
  12 +windows feature or other features that are missing in the tiny version.
  13
  14 If Vim was not compiled with the +multi_byte feature, the mbyte.vim script will be set like small.vim above.  mbyte.vim is sourced by tests that require the
  15 +multi_byte feature.
  16 Similar logic is applied to the +mzscheme feature, using mzscheme.vim.
  17
  18 STARTTEST
  19 :" Write a single line to test.out to check if testing works at all.
  20 :%d
  21 athis is a test\e:w! test.out
  22 :" Create small.vim and tiny.vim empty, create mbyte.vim to skip the test.
  23 0D:w! small.vim
  24 :w! tiny.vim
  25 ae! test.ok
  26 w! test.out
  27 qa!
  28 \e:w! mbyte.vim
  29 :w! mzscheme.vim
  30 :" If +multi_byte feature supported, make mbyte.vim empty.
  31 :if has("multi_byte") | sp another | w! mbyte.vim | q | endif
  32 :" If +mzscheme feature supported, make mzscheme.vim empty.
  33 :if has("mzscheme") | sp another | w! mzscheme.vim | q | endif
  34 :" If +eval feature supported quit here, leaving tiny.vim and small.vim empty.
  35 :" Otherwise write small.vim to skip the test.
  36 :if 1 | q! | endif
  37 :w! small.vim
  38 :" If +windows feature not supported :sp will fail and tiny.vim will be
  39 :" written to skip the test.
  40 :sp another
  41 :wq! tiny.vim
  42 :qa!
  43 ENDTEST
  44