From 6f1368eaa97ece56ba314282dd7c3d65878857ac Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andr=C3=A1s=20B=20Nagy?=
 <20251272+BNAndras@users.noreply.github.com>
Date: Fri, 2 Oct 2026 19:49:12 -0700
Subject: [PATCH] Remove unneeded CI script

---
 script/ci.ss | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 script/ci.ss

diff --git a/script/ci.ss b/script/ci.ss
deleted file mode 100644
index 912b6934..00000000
--- a/script/ci.ss
+++ /dev/null
@@ -1,24 +0,0 @@
-
-(define (run-ci exercisms)
-  (for-each run-tests exercisms)
-  (system "touch ci"))
-
-(define (run-tests exercism)
-  (display (format "running tests for ~a" exercism))
-  (newline)
-  (let* ((dir (format "exercises/practice/~a" exercism))
-         (result (system
-                  (format "cp input/skeleton-makefile ~a/Makefile && cd ~a && make check-all solution=.meta/example.scm"
-                          dir
-                          dir))))
-    (unless (zero? result)
-      (error 'run-ci "failed test" exercism))))
-
-;; Run tests for all directory expect for exercises named in except.
-(define (run-all-tests . except)
-  (let ((blacklist
-         (map (lambda (x) (if (symbol? x) (symbol->string x) x)) except)))
-   (for-each run-tests
-             (filter
-              (lambda (x) (andmap (lambda (y) (not (equal? x y))) blacklist))
-              (directory-list "exercises/practice/")))))