xref: /vim-8.2.3635/src/testdir/test_ga.vim (revision 6d91bcb4)
121d7c9b6SBram Moolenaar" Test ga normal command, and :ascii Ex command.
2*6d91bcb4SBram Moolenaar
321d7c9b6SBram Moolenaarfunc Do_ga(c)
421d7c9b6SBram Moolenaar  call setline(1, a:c)
521d7c9b6SBram Moolenaar  let l:a = execute("norm 1goga")
621d7c9b6SBram Moolenaar  let l:b = execute("ascii")
721d7c9b6SBram Moolenaar  call assert_equal(l:a, l:b)
821d7c9b6SBram Moolenaar  return l:a
921d7c9b6SBram Moolenaarendfunc
1021d7c9b6SBram Moolenaar
1121d7c9b6SBram Moolenaarfunc Test_ga_command()
1221d7c9b6SBram Moolenaar  new
1321d7c9b6SBram Moolenaar  set display=uhex
1421d7c9b6SBram Moolenaar  call assert_equal("\nNUL",                            Do_ga(''))
155f73ef8dSBram Moolenaar  call assert_equal("\n<<01>>  1,  Hex 01,  Oct 001, Digr SH", Do_ga("\x01"))
165f73ef8dSBram Moolenaar  call assert_equal("\n<<09>>  9,  Hex 09,  Oct 011, Digr HT", Do_ga("\t"))
1721d7c9b6SBram Moolenaar
1821d7c9b6SBram Moolenaar  set display=
1921d7c9b6SBram Moolenaar  call assert_equal("\nNUL",                             Do_ga(''))
205f73ef8dSBram Moolenaar  call assert_equal("\n<^A>  1,  Hex 01,  Oct 001, Digr SH",    Do_ga("\x01"))
215f73ef8dSBram Moolenaar  call assert_equal("\n<^I>  9,  Hex 09,  Oct 011, Digr HT",    Do_ga("\t"))
225d98dc2aSBram Moolenaar  call assert_equal("\n<^@>  0,  Hex 00,  Octal 000",    Do_ga("\n"))
2321d7c9b6SBram Moolenaar
2421d7c9b6SBram Moolenaar  call assert_equal("\n<e>  101,  Hex 65,  Octal 145",   Do_ga('e'))
2521d7c9b6SBram Moolenaar
2621d7c9b6SBram Moolenaar  " Test a few multi-bytes characters.
275f73ef8dSBram Moolenaar  call assert_equal("\n<é> 233, Hex 00e9, Oct 351, Digr e'",    Do_ga('é'))
285f73ef8dSBram Moolenaar  call assert_equal("\n<ẻ> 7867, Hex 1ebb, Oct 17273, Digr e2", Do_ga('ẻ'))
29e0c3c3d6SBram Moolenaar  call assert_equal("\n<\U00012345> 74565, Hex 00012345, Octal 221505", Do_ga("\U00012345"))
3021d7c9b6SBram Moolenaar
3121d7c9b6SBram Moolenaar  " Test with combining characters.
3221d7c9b6SBram Moolenaar  call assert_equal("\n<e>  101,  Hex 65,  Octal 145 < ́> 769, Hex 0301, Octal 1401", Do_ga("e\u0301"))
3321d7c9b6SBram Moolenaar  call assert_equal("\n<e>  101,  Hex 65,  Octal 145 < ́> 769, Hex 0301, Octal 1401 < ̱> 817, Hex 0331, Octal 1461", Do_ga("e\u0301\u0331"))
3421d7c9b6SBram Moolenaar  call assert_equal("\n<e>  101,  Hex 65,  Octal 145 < ́> 769, Hex 0301, Octal 1401 < ̱> 817, Hex 0331, Octal 1461 < ̸> 824, Hex 0338, Octal 1470", Do_ga("e\u0301\u0331\u0338"))
355d98dc2aSBram Moolenaar
365d98dc2aSBram Moolenaar  " When using Mac fileformat, CR instead of NL is used for line termination
375d98dc2aSBram Moolenaar  enew!
385d98dc2aSBram Moolenaar  set fileformat=mac
395d98dc2aSBram Moolenaar  call assert_equal("\n<^J>  10,  Hex 0a,  Oct 012, Digr NU",    Do_ga("\r"))
405d98dc2aSBram Moolenaar
4121d7c9b6SBram Moolenaar  bwipe!
4221d7c9b6SBram Moolenaarendfunc
435d98dc2aSBram Moolenaar
445d98dc2aSBram Moolenaar" vim: shiftwidth=2 sts=2 expandtab
45