blob: 6579b921b0e3a550575aa9e112514daec94c5505 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
;;;; serialization.lisp
(in-package :dnd)
(defun hall-of-fame-hero-view (hero)
(json:to-json
(list :name (hero-name hero)
:uid (uid hero)
:renown (renown hero)
:title (hero-title hero)
:class (hero-class hero))))
|