From d2343953d7bbf6955ef9f1c50875f46ab74c6f5e Mon Sep 17 00:00:00 2001 From: Oldes Date: Mon, 8 Jun 2020 10:32:27 +0200 Subject: [PATCH] Added comment about `clear bitset!` result --- src/core/t-bitset.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/core/t-bitset.c b/src/core/t-bitset.c index 86c0cf7b71..6e2ee2af8e 100644 --- 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: