view src/testdir/test_reltime.vim @ 9788:3fdf6caf42f7 v7.4.2169

commit https://github.com/vim/vim/commit/446cce6d537b036467033975a86729dbdc83f860 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Aug 6 21:37:27 2016 +0200 patch 7.4.2169 Problem: Startup test gets stuck on MS-Windows. Solution: Use double quotes.
author Christian Brabandt <cb@256bit.org>
date Sat, 06 Aug 2016 21:45:05 +0200
parents ea504064c996
children f38fcbf343ce
line wrap: on
line source

" Tests for reltime()

if !has('reltime') || !has('float')
  finish
endif

func Test_reltime()
  let now = reltime()
  sleep 10m
  let later = reltime()
  let elapsed = reltime(now)
  call assert_true(reltimestr(elapsed) =~ '0\.0')
  call assert_true(reltimestr(elapsed) != '0.0')
  call assert_true(reltimefloat(elapsed) < 0.1)
  call assert_true(reltimefloat(elapsed) > 0.0)

  let same = reltime(now, now)
  call assert_equal('0.000', split(reltimestr(same))[0][:4])
  call assert_equal(0.0, reltimefloat(same))

  let differs = reltime(now, later)
  call assert_true(reltimestr(differs) =~ '0\.0')
  call assert_true(reltimestr(differs) != '0.0')
  call assert_true(reltimefloat(differs) < 0.1)
  call assert_true(reltimefloat(differs) > 0.0)
endfunc