From 614566488b4e82015d5df30c951052edfe2e7bff Mon Sep 17 00:00:00 2001
From: riton <riton@riton.home>
Date: Tue, 25 Mar 2025 00:21:46 +0300
Subject: =?UTF-8?q?test=20sistemi=20ba=C5=9Flang=C4=B1c=C4=B1?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 html-jen.asd      |  9 ++++++++-
 testler/test.lisp | 13 +++++++++++++
 2 files changed, 21 insertions(+), 1 deletion(-)
 create mode 100644 testler/test.lisp

diff --git a/html-jen.asd b/html-jen.asd
index e2532cd..200e777 100644
--- a/html-jen.asd
+++ b/html-jen.asd
@@ -10,4 +10,11 @@
                (:file "ana"))
   :build-operation "program-op"
   :build-pathname "html-üret"
-  :entry-point "html-jen::ana")
+  :entry-point "html-jen::ana"
+  :in-order-to ((test-op (test-op "html-jen/testler"))))
+
+(defsystem "html-jen/testler"
+  :depends-on ("html-jen")
+  :pathname "testler/"
+  :components ((:file "test"))
+  :perform (test-op (o c) (symbol-call :html-jen/testler :testleri-çalıştır)))
diff --git a/testler/test.lisp b/testler/test.lisp
new file mode 100644
index 0000000..5a04f0b
--- /dev/null
+++ b/testler/test.lisp
@@ -0,0 +1,13 @@
+(defpackage :html-jen/testler
+  (:use :common-lisp :html-jen))
+
+(in-package :html-jen/testler)
+
+(defun test-test ()
+  (assert (= 3 (+ 1 2)))
+  (unless (= 3 2)
+    (error "hata")))
+
+(defun testleri-çalıştır ()
+  ;; (test-test)
+  )
-- 
cgit v1.2.3