Mercurial > vim

view src/testdir/test_reltime.vim @ 9760:96667173293d v7.4.2155

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
commit https://github.com/vim/vim/commit/9d5b876d458e242b8b5e44da10c5cdc6bbb7f57c Author: Bram Moolenaar <Bram@vim.org> Date: Thu Aug 4 21:21:13 2016 +0200 patch 7.4.2155 Problem: Quotes make GUI test fail on MS-Windows. Solution: Remove quotes, strip white space.
author Christian Brabandt <cb@256bit.org>
date Thu, 04 Aug 2016 21:30:07 +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