diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2019-06-30 22:25:06 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2019-06-30 22:25:06 -0700 |
commit | f299b992d9c177d153b166774bc0f1c54e742cc2 (patch) | |
tree | 2e29d693b061038fa820ce4db33ab2ef19947305 /lib.c | |
parent | 49d071158d2d3c8b35906f8bc01ac038cc8fc8f6 (diff) | |
download | txr-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.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -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); |