blob: 5a04f0b07f6754b295f8c0c04e6890876f6d357d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
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)
)
|