From fbab5e252f22de37d42cc6c2a014d690a9312565 Mon Sep 17 00:00:00 2001 From: Robin Haberkorn Date: Sun, 13 Jul 2025 18:35:32 +0300 Subject: implemented command for reading a file into the current buffer * This command exists in Video TECO. In Video TECO it also supports reading multiple files with a glob pattern -- we do not support that as I am not convinced of its usefulness. * teco_view_load() has been extended, so it can read into dot without discarding the existing document. --- tests/testsuite.at | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'tests') diff --git a/tests/testsuite.at b/tests/testsuite.at index b0db94d..8d4daa7 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -245,6 +245,12 @@ TE_CHECK([[@EB/foo/ @I/XXX/ :EF :Q*"N(0/0)' @EB/foo/ Z-3"N(0/0)']], 0, ignore, i TE_CHECK([[@EB/foo/ 1EF :Q*"=(0/0)']], 0, ignore, ignore) AT_CLEANUP +AT_SETUP([Read file into current buffer]) +AT_DATA([test.txt], [[0123456789 +]]) +TE_CHECK([[@I/Helloworld/5R @ER"test.txt" .-5-11"N(0/0)']], 0, ignore, ignore) +AT_CLEANUP + AT_SETUP([8-bit cleanliness]) TE_CHECK([[0@I//J 0A"N(0/0)' :@S/^@/"F(0/0)']], 0, ignore, ignore) TE_CHECK([[@EQa//0EE 1U*0EE 0:@EUa/f^@^@/ :Qa-4"N(0/0)' Ga Z-4"N(0/0)']], 0, ignore, ignore) -- cgit v1.2.3