Fully implements remove_{one,all,at}.

1 files changed, 14 insertions, 0 deletions

diff --git a/data/tests/extra_functionals.fate b/data/tests/extra_functionals.fate
index bc629cb..cdbebb3 100644
--- a/data/tests/extra_functionals.fate
+++ b/data/tests/extra_functionals.fate
@@ -55,4 +55,18 @@
 (set int_list_b (shuffle int_list_a))
 (shuffle! int_list_c)
 
+(set int_list_c (var int_list_a))
+(remove_one! 6 int_list_a)
+
+(= (var int_list_a) (remove_one 6 int_list_c))
+
+(set int_list_b (var int_list_a))
+(remove_all! 3 int_list_a)
+
+(= (var int_list_a) (remove_all 3 int_list_b))
+
+(set int_list_c (var int_list_a))
+(remove_at! 4 int_list_a)
+(= (var int_list_a) (remove_at 4 int_list_c))
+
 (end)