diff options
author | John Kehayias <john.kehayias@protonmail.com> | 2023-11-11 17:21:39 -0500 |
---|---|---|
committer | John Kehayias <john.kehayias@protonmail.com> | 2023-11-11 17:21:39 -0500 |
commit | 8d0a3bfcdae4bc9dd15e7fb0488dce8f16e8f867 (patch) | |
tree | 77f19aa2370df0e0d9bfc7effd5fd5f982642cef /tests/syscalls.scm | |
parent | aee3c5a894fddf88810f18fa8880b423b078b3fa (diff) | |
parent | af6105afc67a15a491a0a4fd18a28c9f801a0b94 (diff) |
Merge branch 'master' into mesa-updates
Change-Id: I6848392e8c1ffca1473bd25511d8d90ae0f98ce7
Diffstat (limited to 'tests/syscalls.scm')
-rw-r--r-- | tests/syscalls.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/syscalls.scm b/tests/syscalls.scm index c9e011f453..eb85b358c4 100644 --- a/tests/syscalls.scm +++ b/tests/syscalls.scm @@ -583,6 +583,12 @@ (test-assert "terminal-rows" (> (terminal-rows) 0)) +(test-assert "terminal-string-width English" + (= (terminal-string-width "hello") 5)) + +(test-assert "terminal-string-width Japanese" + (= (terminal-string-width "今日は") 6)) + (test-assert "openpty" (let ((head inferior (openpty))) (and (integer? head) (integer? inferior) |