1 files changed, 2 insertions, 0 deletions
diff --git a/lib.c b/lib.c
index 6e14e618..4c345615 100644
--- a/lib.c
+++ b/lib.c
@@ -9179,6 +9179,8 @@ val sub(val seq, val from, val to)
   case NIL:
     return nil;
   case COBJ:
+    if (seq->co.cls == carray_s)
+      return carray_sub(seq, from, to);
     seq = nullify(seq);
     /* fallthrough */
   case CONS: