diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-07-12 07:31:00 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-12 07:31:00 -0700 |
commit | 15a53bb5c786ff4f3ea7e4bae0c980f4caaf07d0 (patch) | |
tree | 3f500eb7716ab9b6a0490bf7f93ddaa2f40553a3 /tests/010/json.tl | |
parent | e2722255a719fa6abdeb9822572931028abd6ac6 (diff) | |
download | txr-15a53bb5c786ff4f3ea7e4bae0c980f4caaf07d0.tar.gz txr-15a53bb5c786ff4f3ea7e4bae0c980f4caaf07d0.tar.bz2 txr-15a53bb5c786ff4f3ea7e4bae0c980f4caaf07d0.zip |
tests: json: fix accidentally excluded tests.
* tests/010/json.tl: Fix several tests being excluded from
the (mtest ...) form to which they are expected to belong,
one of them having an extra quote in the expected value, too.
Diffstat (limited to 'tests/010/json.tl')
-rw-r--r-- | tests/010/json.tl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/010/json.tl b/tests/010/json.tl index 8d414b2e..46bcc23d 100644 --- a/tests/010/json.tl +++ b/tests/010/json.tl @@ -150,8 +150,8 @@ (file-get-jsons name) (1.0 t null) (file-get-string name) "1\ntrue\nnull\n" (command-put-json `cat > @name` #(#() #())) t - (file-get-string name) "[[],[]]\n") + (file-get-string name) "[[],[]]\n" (command-get-json `cat @name`) #(#() #()) (command-put-jsons `cat > @name` '(#() 1.0 nil)) t (file-get-string name) "[]\n1\nfalse\n" - (command-get-jsons `cat @name`) '(#() 1.0 nil)) + (command-get-jsons `cat @name`) (#() 1.0 nil))) |