From ed899e4aa351aa7a13bc6b019bd88d808214d86c Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Thu, 4 May 2017 22:23:22 -0700
Subject: length: support buffer objects.

* lib.c (length): Handle BUF case via length_buf.
---
 lib.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib.c b/lib.c
index 7725e4f0..87a7dfad 100644
--- a/lib.c
+++ b/lib.c
@@ -9051,6 +9051,8 @@ val length(val seq)
     return length_vec(seq);
   case RNG:
     return minus(to(seq), from(seq));
+  case BUF:
+    return length_buf(seq);
   case COBJ:
     if (seq->co.cls == hash_s)
       return hash_count(seq);
-- 
cgit v1.2.3