fix: add missing list
This commit is contained in:
parent
6f860bbb29
commit
6ff7eca031
1 changed files with 1 additions and 1 deletions
2
game.scm
2
game.scm
|
@ -173,7 +173,7 @@
|
||||||
(append part
|
(append part
|
||||||
(if (= start 0 )
|
(if (= start 0 )
|
||||||
'()
|
'()
|
||||||
(substring (car string-list) 0 start))
|
(list (substring (car string-list) 0 start)))
|
||||||
(list (func (substring (car string-list) start (+ start len))))
|
(list (func (substring (car string-list) start (+ start len))))
|
||||||
(if (= (+ start len) (string-length (car string-list)))
|
(if (= (+ start len) (string-length (car string-list)))
|
||||||
'()
|
'()
|
||||||
|
|
Loading…
Reference in a new issue