fix(ci, formatting): update configuration for formatting checks, format Macros.ark

Author: SuperFola

.github/workflows/ci.yml

@@ -17,11 +17,11 @@ jobs:
 
     steps:
       - uses: actions/checkout@v4
+      - run: rm -rf tests
       - name: Format check
         uses: ArkScript-lang/action-format@master
         with:
           folder: .
-          exclude: tests
 
   build:
     runs-on: ubuntu-24.04

Lazy.ark

@@ -12,7 +12,9 @@
   (mut _has_been_called false)
   (mut _memorized_value nil)
 
-  (fun (&f &_has_been_called &_memorized_value) {
+  (fun (&f
+    &_has_been_called
+    &_memorized_value) {
     (if (not _has_been_called) {
       (set _has_been_called true)
       (set _memorized_value (f)) })

Macros.ark

@@ -102,8 +102,7 @@
 #   (print "this will always be executed"))
 # =end
 # @author https://github.com/SuperFola
-(macro unless (cond ...body)
-  (if (not cond) ...body))
+(macro unless (cond ...body) (if (not cond) ...body))
 
 # @brief Iterate until the condition is truthy
 # @param cond condition
@@ -116,5 +115,4 @@
 # (print data)  # [0 1 2 3 4 5 6 7 8 9]
 # =end
 # @author https://github.com/SuperFola
-(macro until (cond body)
-  (while (not cond) body))
+(macro until (cond body) (while (not cond) body))

Math.ark

@@ -145,7 +145,8 @@
 # =end
 # @author https://github.com/SuperFola
 (let complex (fun (real imag)
-  (fun (&real &imag) ())))
+  (fun (&real
+    &imag) ())))
 
 # @brief Compute the addition of two complex number
 # @param _c0 the first complex number

Range.ark

@@ -28,7 +28,11 @@
   (let reset (fun ()
     (set i _a)))
 
-  (fun (&i &_a &_b &asList &reset) {
+  (fun (&i
+    &_a
+    &_b
+    &asList
+    &reset) {
     (if (< i _b) {
       (set i (+ i 1))
       (- i 1) }) }) }))

Testing.ark

@@ -31,14 +31,12 @@
   (let update_case_ptr (fun (val)
     (set case_pointer val)))
 
-  (let need_case? (fun ()
-    (and (not (empty? case_desc)) (!= case_pointer (len cases)))))
+  (let need_case? (fun () (and (not (empty? case_desc)) (!= case_pointer (len cases)))))
 
   (let set_active (fun (bool)
     (set active bool)))
 
-  (fun (
-    &name
+  (fun (&name
     &passed
     &failed
     &failures
@@ -55,8 +53,7 @@
     &update_case_ptr
     &need_case?
     &active
-    &set_active)
-    ()) }))
+    &set_active) ()) }))
 
 # internal, do not use
 (mut _suite nil)