diff options
| author | colin <colin@cicadas.surf> | 2023-11-20 19:02:59 -0800 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2023-11-20 19:02:59 -0800 |
| commit | 10bb613d023468f1b00f02e8f3c9a61de22610ed (patch) | |
| tree | 9c97e521c2a44267becb3e18f25fe61162cc16e1 /src/lazybones.lisp | |
| parent | c201a822f264041a1b9169824c0f9acbfae9cf6e (diff) | |
parenscript client gen
Diffstat (limited to 'src/lazybones.lisp')
| -rw-r--r-- | src/lazybones.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lazybones.lisp b/src/lazybones.lisp index 97c7d40..ca168a5 100644 --- a/src/lazybones.lisp +++ b/src/lazybones.lisp @@ -332,6 +332,9 @@ Returns NIL on failure." (list (string-upcase var-name) (read-from-string (first decoder?))) (list (string-upcase var-name)))))) +(defun endpoint-route-variables (endpoint) + (route-variables (endpoint-dispatch-pattern endpoint))) + (defun route-variables (pattern) (loop for term in pattern when (listp term) |