From 2ec568579823c991b919fa3a2c8583a8db21cb81 Mon Sep 17 00:00:00 2001 From: Robin Haberkorn Date: Wed, 30 Jul 2025 23:58:32 +0300 Subject: implemented ^T command: allows typing by code and getting characters from stdin or the user * n:^T always prints bytes (cf. :^A) * ^T without arguments returns a codepoint or byte from stdin. In interactive mode, this currentply places a cursor in the message line and waits for a keypress. --- tests/testsuite.at | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'tests') diff --git a/tests/testsuite.at b/tests/testsuite.at index 9f84a23..a5390d6 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -204,6 +204,13 @@ TE_CHECK([[@EB'test.txt' 2T]], 0, stdout, ignore) AT_FAIL_IF([test `$GREP -v "^Info:" stdout | wc -l` -ne 2], 0, ignore, ignore) AT_CLEANUP +AT_SETUP([Type out and get char]) +TE_CHECK([[1058,1045,1057,1058^T]], 0, stdout, ignore) +AT_FAIL_IF([test "`$GREP -v "^Info:" stdout`" != "ТЕСТ"], 0, ignore, ignore) +AT_CHECK([[echo -n "ТЕСТ" | $SCITECO -e '<^TUa Qa:; Qa=>']], 0, stdout, ignore) +AT_FAIL_IF([test `$GREP -v "^Info:" stdout | wc -l` -ne 4], 0, ignore, ignore) +AT_CLEANUP + AT_SETUP([Convert between line and glyph positions]) TE_CHECK([[@I/1^J2^J3/J 2^QC :^Q-3"N(0/0)']], 0, ignore, ignore) AT_CLEANUP -- cgit v1.2.3