Mercurial > vim
view src/testdir/test_environ.vim @ 21453:40210bb08e3f v8.2.1277
patch 8.2.1277: tests on Travis do not run with EXITFREE
Commit: https://github.com/vim/vim/commit/7a87b4e3fe91c18a616536fe49154c4bb3da0a93
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Jul 23 14:59:07 2020 +0200
patch 8.2.1277: tests on Travis do not run with EXITFREE
Problem: Tests on Travis do not run with EXITFREE.
Solution: Add EXITFREE to all builds to uncover any mistakes.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Thu, 23 Jul 2020 15:00:04 +0200 |
parents | 0dcc2ee838dd |
children | 08940efa6b4e |
line wrap: on
line source
scriptencoding utf-8 func Test_environ() unlet! $TESTENV call assert_equal(0, has_key(environ(), 'TESTENV')) let $TESTENV = 'foo' call assert_equal(1, has_key(environ(), 'TESTENV')) let $TESTENV = 'こんにちわ' call assert_equal('こんにちわ', environ()['TESTENV']) endfunc func Test_getenv() unlet! $TESTENV call assert_equal(v:null, 'TESTENV'->getenv()) let $TESTENV = 'foo' call assert_equal('foo', getenv('TESTENV')) endfunc func Test_setenv() unlet! $TESTENV eval 'foo'->setenv('TEST ENV') call assert_equal('foo', getenv('TEST ENV')) call setenv('TEST ENV', v:null) call assert_equal(v:null, getenv('TEST ENV')) endfunc func Test_external_env() call setenv('FOO', 'HelloWorld') if has('win32') let result = system('echo %FOO%') else let result = system('echo $FOO') endif let result = substitute(result, '[ \r\n]', '', 'g') call assert_equal('HelloWorld', result) call setenv('FOO', v:null) if has('win32') let result = system('set | findstr "^FOO="') else let result = system('env | grep ^FOO=') endif call assert_equal('', result) endfunc