summaryrefslogtreecommitdiffstats
path: root/lib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2021-12-20 07:42:29 -0800
committerKaz Kylheku <kaz@kylheku.com>2021-12-20 07:42:29 -0800
commit6d51949c4820f8eeebd6aacfb443c11b2465f6ab (patch)
treea583ab0ea91bfeb825ccb647950b943316f2ecfd /lib.c
parentc1c205100d246a39c9b92a5d1b2296a59783d7d4 (diff)
downloadtxr-6d51949c4820f8eeebd6aacfb443c11b2465f6ab.tar.gz
txr-6d51949c4820f8eeebd6aacfb443c11b2465f6ab.tar.bz2
txr-6d51949c4820f8eeebd6aacfb443c11b2465f6ab.zip
less: bug, vectors not supported.
* lib.c (less_tab_init): Add missing initialization for VEC, with a priority above CONS: all vectors are greater than conses. The BUF priority is bumped to 7. * test/012/less.tl: New file.
Diffstat (limited to 'lib.c')
-rw-r--r--lib.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib.c b/lib.c
index 36b6186d..79ad82a0 100644
--- a/lib.c
+++ b/lib.c
@@ -6227,11 +6227,12 @@ static void less_tab_init(void)
type_prec[STR] = 3;
type_prec[SYM] = 4;
type_prec[LCONS] = 5;
+ type_prec[VEC] = 6;
type_prec[LSTR] = 3;
type_prec[BGNUM] = 1;
type_prec[FLNUM] = 1;
type_prec[RNG] = 2;
- type_prec[BUF] = 6;
+ type_prec[BUF] = 7;
for (l = 0; l <= MAXTYPE; l++)
for (r = 0; r <= MAXTYPE; r++) {