diff options
Diffstat (limited to 'src/game.lisp')
| -rw-r--r-- | src/game.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/game.lisp b/src/game.lisp index 08184fc..24f5581 100644 --- a/src/game.lisp +++ b/src/game.lisp @@ -6,6 +6,7 @@ :change-zone :get-profit :get-profit-in-zone + :get-cur-zone :commodities-panel)) (in-package :game) @@ -16,7 +17,8 @@ (zones :initarg :zones :accessor zones) (cur-zone :initarg :start-zone - :accessor cur-zone))) + :accessor cur-zone + :reader get-cur-zone))) (defun new-game (player start-zone zones) (make-instance 'game |