paku/ningle-fbr
1
0
Fork 0
Code Issues Pull requests Projects Releases2 Packages Activity Actions

Add test for set-routes

Browse source
This commit is contained in:
Akira Tempaku 2024-12-22 18:33:49 +09:00
commit 7641ec5f61
10 changed files with 115 additions and 9 deletions
tests/routes/users
<id>.lispindex.lisp

8
tests/routes/users/<id>.lisp Normal file
View file

@ -0,0 +1,8 @@
(defpackage #:ningle-fbr-test/routes/users/<id>
(:use #:cl)
(:export #:handle-get))
(in-package #:ningle-fbr-test/routes/users/<id>)
(defun handle-get (params)
(let ((id (cdr (assoc :id params))))
id))

8
tests/routes/users/index.lisp Normal file
View file

@ -0,0 +1,8 @@
(defpackage #:ningle-fbr-test/routes/users/index
(:use #:cl)
(:export #:handle-get))
(in-package #:ningle-fbr-test/routes/users/index)
(defun handle-get (params)
(declare (ignore params))
"ok")