From 1d9bc02f315cd8a0abbece347ed398677524a258 Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Sun, 18 Sep 2016 14:03:24 -0400
Subject: Fix erasing default graph iterators

---
 src/sord.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/sord.c')

diff --git a/src/sord.c b/src/sord.c
index 9a0dd58..218234b 100644
--- a/src/sord.c
+++ b/src/sord.c
@@ -1266,7 +1266,7 @@ sord_erase(SordModel* sord, SordIter* iter)
 
 	SordNode* quad = NULL;
 	for (unsigned i = 0; i < NUM_ORDERS; ++i) {
-		if (sord->indices[i]) {
+		if (sord->indices[i] && (i < GSPO || tup[3])) {
 			if (zix_btree_remove(sord->indices[i], tup, (void**)&quad,
 			                     i == iter->order ? &iter->cur : NULL)) {
 				return (i == 0) ? SERD_ERR_NOT_FOUND : SERD_ERR_INTERNAL;
-- 
cgit v1.2.1