diff options
| -rw-r--r-- | cursed.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/cursed.lisp b/cursed.lisp index b3fedd7..4afdb75 100644 --- a/cursed.lisp +++ b/cursed.lisp @@ -1,8 +1,8 @@ (in-package #:cursed) (defclass text () - ((data :type 'simple-string :initarg :data :reader data :initform nil) - (index :type '(unsigned-byte 44) :initarg :index :accessor index :initform 0))) + ((data :type simple-string :initarg :data :reader data :initform "") + (index :type (unsigned-byte 44) :initarg :index :accessor index :initform 0))) (defun has-data? (cursor) (< (index cursor) (length (data cursor)))) |