marcuskammer/dev.metalisp.sbt
1
1
Fork 0
Code Issues 1 Pull requests Projects 1 Releases Packages Wiki Activity Actions

Add compile time optimization for function

Browse source
This commit is contained in:
Marcus Kammer 2023-09-20 11:02:54 +02:00
parent 31d447e562
commit 0b9fe00e9f
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/pattern/questionnaire.lisp
View file

@ -132,14 +132,14 @@ an error if an unknown type is passed."
((string= type "text") #'ctrl)
(t (error "Unknown type ~A" type))))
(declaim (ftype (function (string string string) function) apply-input-form))
(defun apply-input-form (type group item)
"Apply the chosen input form function to generate HTML for a single form
element.
"Apply the chosen input form function to generate HTML for a single form element.
TYPE: A string specifying the HTML input type like 'radio', 'checkbox', 'text',
etc.
GROUP: Specifies the name attribute for the input elements.
GROUP: A string specifying the name attribute for the input elements.
ITEM: The particular choice item that this form element represents.