From 1c3cecbb1a75bae5c04e5c32ba0a259b33a74c23 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 17 Jan 2016 10:57:15 -0800
Subject: partition* bugfix: incorrect behavior for 0.

lib.c (partition_star): In the special case that the indices
argument is given as the integer zero, the function wrongly
returned just the remaining piece of the sequence after zero,
rather than a list containing this piece.
---
 lib.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib.c b/lib.c
index db10a056..6168bb52 100644
--- a/lib.c
+++ b/lib.c
@@ -2019,7 +2019,7 @@ val partition_star(val seq, val indices)
     return cons(seq, nil);
 
   if (indices == zero)
-    return nullify(rest(seq));
+    return cons(nullify(rest(seq)), nil);
 
   if (!seqp(indices)) {
     indices = cons(indices, nil);
-- 
cgit v1.2.3