Mercurial > vim
view src/libvterm/t/28state_dbl_wh.test @ 14377:378eefcbbb12 v8.1.0203
patch 8.1.0203: building with Perl 5.28 fails on Windows
commit https://github.com/vim/vim/commit/578333b2ecdfef3109cb07a82c3aa08ad3dc5664
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jul 22 07:31:09 2018 +0200
patch 8.1.0203: building with Perl 5.28 fails on Windows
Problem: Building with Perl 5.28 fails on Windows.
Solution: Define Perl_mg_get. (closes https://github.com/vim/vim/issues/3196)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sun, 22 Jul 2018 07:45:05 +0200 |
parents | b8299e742f41 |
children |
line wrap: on
line source
INIT WANTSTATE g !Single Width, Single Height RESET PUSH "\e#5" PUSH "Hello" putglyph 0x48 1 0,0 putglyph 0x65 1 0,1 putglyph 0x6c 1 0,2 putglyph 0x6c 1 0,3 putglyph 0x6f 1 0,4 !Double Width, Single Height RESET PUSH "\e#6" PUSH "Hello" putglyph 0x48 1 0,0 dwl putglyph 0x65 1 0,1 dwl putglyph 0x6c 1 0,2 dwl putglyph 0x6c 1 0,3 dwl putglyph 0x6f 1 0,4 dwl ?cursor = 0,5 PUSH "\e[40GAB" putglyph 0x41 1 0,39 dwl putglyph 0x42 1 1,0 ?cursor = 1,1 !Double Height RESET PUSH "\e#3" PUSH "Hello" putglyph 0x48 1 0,0 dwl dhl-top putglyph 0x65 1 0,1 dwl dhl-top putglyph 0x6c 1 0,2 dwl dhl-top putglyph 0x6c 1 0,3 dwl dhl-top putglyph 0x6f 1 0,4 dwl dhl-top ?cursor = 0,5 PUSH "\r\n\e#4" PUSH "Hello" putglyph 0x48 1 1,0 dwl dhl-bottom putglyph 0x65 1 1,1 dwl dhl-bottom putglyph 0x6c 1 1,2 dwl dhl-bottom putglyph 0x6c 1 1,3 dwl dhl-bottom putglyph 0x6f 1 1,4 dwl dhl-bottom ?cursor = 1,5 !Double Width scrolling RESET PUSH "\e[20H\e#6ABC" putglyph 0x41 1 19,0 dwl putglyph 0x42 1 19,1 dwl putglyph 0x43 1 19,2 dwl PUSH "\e[25H\n" PUSH "\e[19;4HDE" putglyph 0x44 1 18,3 dwl putglyph 0x45 1 18,4 dwl PUSH "\e[H\eM" PUSH "\e[20;6HFG" putglyph 0x46 1 19,5 dwl putglyph 0x47 1 19,6 dwl