chore!: add '?' suffix to math:even and math:odd, adding aliases before deprecating and removing

Author: SuperFola

List.ark

@@ -223,7 +223,7 @@
 # @details The original list is not modified.
 # =begin
 # (import std.Math)
-# (print (list:filter [1 2 3 4 5 6 7 8 9] math:even))  # [2 4 6 8]
+# (print (list:filter [1 2 3 4 5 6 7 8 9] math:even?))  # [2 4 6 8]
 # =end
 # @author https://github.com/rstefanic
 (let filter (fun (_L _f) {

Math.ark

@@ -169,12 +169,24 @@
 # @brief Return true if the number is even, false otherwise
 # @param _n the number
 # @author https://github.com/rstefanic
-(let even (fun (_n) (= 0 (mod _n 2))))
+(let even? (fun (_n) (= 0 (mod _n 2))))
+
+# @brief Return true if the number is even, false otherwise
+# @details **Deprecated, use `even?`**
+# @param _n the number
+# @author https://github.com/rstefanic
+(let even even?)
+
+# @brief Return true if the number is odd, false otherwise
+# @param _n the number
+# @author https://github.com/rstefanic
+(let odd? (fun (_n) (= 1 (abs (mod _n 2)))))
 
 # @brief Return true if the number is odd, false otherwise
+# @details **Deprecated, use `odd?`**
 # @param _n the number
 # @author https://github.com/rstefanic
-(let odd (fun (_n) (= 1 (abs (mod _n 2)))))
+(let odd odd?)
 
 # @brief Get the minimum between two numbers
 # @param _a the first number

Range.ark

@@ -61,7 +61,7 @@
 # =begin
 # (import std.Math)
 # (let obj (range:range 1 10))
-# (print (range:filter obj math:even))  # [2 4 6 8]
+# (print (range:filter obj math:even?))  # [2 4 6 8]
 # =end
 # @author https://github.com/SuperFola
 (let filter (fun (_range _fun) {

tests/list-tests.ark

@@ -1,5 +1,5 @@
 (import std.List)
-(import std.Math :even)
+(import std.Math :even?)
 (import std.Testing)
 
 (let a [1 2 3])
@@ -69,7 +69,7 @@
         (test:eq (list:dropWhile a (fun (c) (< c 5))) []) })
 
     (test:case "filter" {
-        (test:eq (list:filter a math:even) [2])
+        (test:eq (list:filter a math:even?) [2])
         (test:eq (list:filter a (fun (e) (> e 100))) [])
         (test:eq (list:filter [] (fun (e) (> e 100))) []) })
 

tests/math-tests.ark

@@ -33,10 +33,10 @@
 
     (test:eq (math:abs -1) 1)
     (test:eq (math:abs 1) 1)
-    (test:expect (math:even 2))
-    (test:expect (math:even -2))
-    (test:expect (math:odd 1))
-    (test:expect (math:odd -1))
+    (test:expect (math:even? 2))
+    (test:expect (math:even? -2))
+    (test:expect (math:odd? 1))
+    (test:expect (math:odd? -1))
     (test:eq (math:min 1 2) 1)
     (test:eq (math:min 1 -2) -2)
     (test:eq (math:min 0.5 0.2) 0.2)

tests/range-tests.ark

@@ -1,5 +1,5 @@
 (import std.Range:*)
-(import std.Math :even)
+(import std.Math :even?)
 (import std.Testing)
 
 (test:suite range {
@@ -17,7 +17,7 @@
     (range:forEach r (fun (e)
         (test:neq e nil)))
 
-    (let filtered (range:filter r math:even))
+    (let filtered (range:filter r math:even?))
     (test:eq filtered [0 2 4 6 8])
 
     (let mapped (range:map r (fun (e) (* e e))))