Skip to content

Commit

Permalink
Fix type declarations
Browse files Browse the repository at this point in the history
Order of declarations was reversed.
  • Loading branch information
sdilts committed Oct 28, 2023
1 parent 31a8749 commit 3ec15ef
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions lisp/state.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -17,11 +17,11 @@
;; (defmethod initialize-instance :after ((object mahogany-state) &key &allow-other-keys))

(defun server-state-reset (state)
(declare (type state mahogany-state))
(declare (type mahogany-state state))
(setf (mahogany-state-server state) nil))

(defun server-stop (state)
(declare (type state mahogany-state))
(declare (type mahogany-state state))
(hrt:hrt-server-stop (mahogany-state-server state)))

(defun server-keystate-reset (state)
Expand Down

0 comments on commit 3ec15ef

Please sign in to comment.