diff options
Diffstat (limited to 'tests/stringtest.lisp')
-rw-r--r-- | tests/stringtest.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/stringtest.lisp b/tests/stringtest.lisp index aa4898c..57a7ec4 100644 --- a/tests/stringtest.lisp +++ b/tests/stringtest.lisp @@ -4,6 +4,6 @@ (for 0 (length str) (lambda (i) (if (= (mod i 60) 0) - (sys-put-string stdout (concat "<" (substr str i 10) ">")) + (sys-put-string stdout (concat "<" (substr i 10 str) ">")) '()))) (print "") |