summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJuan Manuel Tomás <jtomas1815@gmail.com>2025-07-09 17:01:16 -0300
committerJuan Manuel Tomás <jtomas1815@gmail.com>2025-07-09 17:01:16 -0300
commitb7043b9eef8ba63161593f629e5396fce06123a0 (patch)
tree61a7c4ca2a6b47ca209ae00f825fa76f25bbd1cc
parent31fa68324c6af5719d8901acd58c67847e915921 (diff)
downloadcursed-main.tar.gz
cursed-main.zip
Fix type initializationHEADmain
-rw-r--r--cursed.lisp4
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))))