diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-07-04 01:28:36 +0200 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-07-04 20:24:26 +0200 |
| commit | ce1a2b1b428e95d300af478fb0b36ca3773f7f84 (patch) | |
| tree | 4779ff7dfbd9005a17124bef9f8d00476c11fe69 /tests | |
| parent | 7bc7662f3cd1ceaf55e00f3d5f84e9772574afc8 (diff) | |
| download | sciteco-ce1a2b1b428e95d300af478fb0b36ca3773f7f84.tar.gz | |
implemented <^B> for returning the current date
* It is encoded with the same formula as on VAX/VMS on TECO-11, on TECOC and TECO-64.
* As an extension, when colon-modified it returns the number of seconds since the epoch.
It might be even more useful to return the microseconds since the epoch, but that would require
64-bit integers, which can theoretically be disabled at build time.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/testsuite.at | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/testsuite.at b/tests/testsuite.at index c50061a..a1b8ada 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -283,6 +283,11 @@ TE_CHECK([[@EC'dd if=/dev/zero bs=512 count=1' Z= Z-512"N(0/0)']], 0, ignore, ig TE_CHECK([[0,128ED @EC'dd if=/dev/zero bs=512 count=1' Z= Z-512"N(0/0)']], 0, ignore, ignore) AT_CLEANUP +AT_SETUP([Timestamps]) +# TODO: Test the date (^B) and time (:^B) variants as well. +TE_CHECK([[::^BUa ::^B-Qa"<(0/0)']], 0, ignore, ignore) +AT_CLEANUP + # # Command-line editing. # |