Add a test for the msgsuffix char(8) hack.

This commit is contained in:
Dianne Skoll
2024-11-13 21:59:23 -05:00
parent d042263d3d
commit d7f5582a45
2 changed files with 29 additions and 2 deletions

View File

@@ -5921,15 +5921,35 @@ Explicit delta should be seen - don't count OMITS
REM 18 Feb +0 MSG Explicit delta should not be seen.
../tests/test.rem(1170): Trig = Monday, 18 February, 1991
# Test msgsuffix
FSET msgsuffix(x) "On the next line"
REM MSG Hello
../tests/test.rem(1174): Trig = Saturday, 16 February, 1991
Entering UserFN msgsuffix(5000)
Leaving UserFN msgsuffix(5000) => "On the next line"
Hello
On the next line
FSET msgsuffix(x) char(8) + " on the same line"
../tests/test.rem(1176): Function msgsuffix redefined (previously defined at ../tests/test.rem:1173)
REM MSG Hello
../tests/test.rem(1177): Trig = Saturday, 16 February, 1991
Entering UserFN msgsuffix(5000)
char(8) => "\b"
"\b" + " on the same line" => "\b on the same line"
Leaving UserFN msgsuffix(5000) => "\b on the same line"
Hello on the same line
# Output expression-node stats
DEBUG +s
# Don't want Remind to queue reminders
EXIT
Var hash: total = 141; maxlen = 4; avglen = 2.104
Func hash: total = 16; maxlen = 2; avglen = 0.516
Func hash: total = 17; maxlen = 2; avglen = 0.548
Dedup hash: total = 0; maxlen = 0; avglen = 0.000
Expression nodes allocated: 128
Expression nodes high-water: 73
Expression nodes high-water: 74
Expression nodes leaked: 0
Parse level high-water: 25

View File

@@ -1169,6 +1169,13 @@ REM 18 Feb ++0 MSG Explicit delta should not be seen.
REM 18 Feb +1 MSG Explicit delta should be seen - don't count OMITS
REM 18 Feb +0 MSG Explicit delta should not be seen.
# Test msgsuffix
FSET msgsuffix(x) "On the next line"
REM MSG Hello
FSET msgsuffix(x) char(8) + " on the same line"
REM MSG Hello
# Output expression-node stats
DEBUG +s
# Don't want Remind to queue reminders