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 | ee01337ac9dec818c0066c479391a1fabe3529ed (patch) | |
tree | 2e29d693b061038fa820ce4db33ab2ef19947305 | |
parent | 2683dc20596840470e91363dfde4857d9650661d (diff) | |
download | txr-ee01337ac9dec818c0066c479391a1fabe3529ed.tar.gz txr-ee01337ac9dec818c0066c479391a1fabe3529ed.tar.bz2 txr-ee01337ac9dec818c0066c479391a1fabe3529ed.zip |
empty: handle buffers.
* lib.c (empty): Handle BUF in switch.
-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); |