diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2025-10-09 22:46:39 +0200 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-10-11 00:13:25 +0200 |
commit | 804804d41814f1f2309e2f31b672074a79dfb2dd (patch) | |
tree | 8f7614a1612af990dd3fab125244725f3aa43ea3 /test | |
parent | 818688ab0242a5d4329f9a690e6c119e4b3d34da (diff) |
Rewrite record parsing to be more strict
Diffstat (limited to 'test')
-rw-r--r-- | test/storage.et | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/test/storage.et b/test/storage.et index 035a64b..1510c38 100644 --- a/test/storage.et +++ b/test/storage.et @@ -558,7 +558,18 @@ test ObjectFormat: # Small record local: send "store-raw EOF" - send "rec 8\nnum:n 1\n" + send "rec 28\nnum:n 1\ntext:t abc\nempty:e \n" + send "EOF" + expect /store-done ($refpat)/ capture r + + send "load-type $r" + expect /load-type (.*)/ capture type + guard (type == "rec") + + # Record with multiline items + local: + send "store-raw EOF" + send "rec 34\nfirst:t abc\n\tdef\nsecond:t \tx\n\ty\tz\n" send "EOF" expect /store-done ($refpat)/ capture r @@ -578,7 +589,7 @@ test ObjectFormat: guard (type == "rec") # Invalid records - for content in [ "rec 6\nnum 1\n", "rec 6\nnum:n\n" ]: + for content in [ "rec 6\nnum 1\n", "rec 6\nnum:n\n", "rec 7\nnum:n 1" ]: send "store-raw EOF" send "$content" send "EOF" |