TFC/tfcconnection-zola
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

basics of testing framework

Browse source
This commit is contained in:
Chris Cochrun 2024-04-30 06:49:02 -05:00
parent 19dfedaf80
commit f83054b752
2 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
shell.nix
View file

@ -12,6 +12,8 @@ let
cl-smtp cl-smtp
log4cl log4cl
cl_plus_ssl cl_plus_ssl
fiveam
slite
pkgs.openssl pkgs.openssl
pkgs.openssl.out pkgs.openssl.out
pkgs.openssl.dev pkgs.openssl.dev

4
src/main.lisp
View file

@ -7,6 +7,7 @@
(asdf:load-system 'lass) (asdf:load-system 'lass)
(asdf:load-system 'cl-smtp) (asdf:load-system 'cl-smtp)
(asdf:load-system 'log4cl) (asdf:load-system 'log4cl)
(asdf:load-system 'fiveam)
(defpackage tfcserver (defpackage tfcserver
(:use :cl :com.inuoe.jzon :spinneret :serapeum)) (:use :cl :com.inuoe.jzon :spinneret :serapeum))
@ -539,3 +540,6 @@ with the image attached"
(hunchentoot:stop *server*) (hunchentoot:stop *server*)
(uiop:quit))) (uiop:quit)))
(error (c) (format t "Woops, an unknown error occured:~&~a~&" c)))) (error (c) (format t "Woops, an unknown error occured:~&~a~&" c))))
(fiveam:test testing-things
(fiveam:is (= 2 (+ 1 1))))