summaryrefslogtreecommitdiffstats
path: root/lib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2019-06-30 22:25:06 -0700
committerKaz Kylheku <kaz@kylheku.com>2019-06-30 22:25:06 -0700
commitf299b992d9c177d153b166774bc0f1c54e742cc2 (patch)
tree2e29d693b061038fa820ce4db33ab2ef19947305 /lib.c
parent49d071158d2d3c8b35906f8bc01ac038cc8fc8f6 (diff)
downloadtxr-f299b992d9c177d153b166774bc0f1c54e742cc2.tar.gz
txr-f299b992d9c177d153b166774bc0f1c54e742cc2.tar.bz2
txr-f299b992d9c177d153b166774bc0f1c54e742cc2.zip
empty: handle buffers.
* lib.c (empty): Handle BUF in switch.
Diffstat (limited to 'lib.c')
-rw-r--r--lib.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib.c b/lib.c
index 9cc20045..13a41947 100644
--- a/lib.c
+++ b/lib.c
@@ -10000,6 +10000,8 @@ val empty(val seq)
return eq(length_vec(seq), zero);
case RNG:
return eql(from(seq), to(seq));
+ case BUF:
+ return eq(length_buf(seq), zero);
case COBJ:
if (seq->co.cls == hash_s)
return eq(hash_count(seq), zero);