Added comment about clear bitset! result

Oldes · Jun 8, 2020 · d234395 · d234395
1 parent e5442eb
commit d234395
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/t-bitset.c b/src/core/t-bitset.c
@@ -641,7 +641,11 @@
 		return (VAL_TAIL(value) == 0) ? R_TRUE : R_FALSE;
 
 	case A_CLEAR:
+		//O: which version is better?
+		// version 1: clearing series and resetting length as well -> clear make bitset! {01} == make bitset! #{}
 		Clear_Series(VAL_SERIES(value));
+		// version 2: clearing series but keeping its length -> ... == make bitset! #{00}
+		// CLEAR(SERIES_DATA(VAL_SERIES(value)), SERIES_SPACE(VAL_SERIES(value)));
 		break;
 
 	case A_AND: