Stacken/c64-livecoding
6
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Make sure error printing don't get non-existent line

Browse source
This commit is contained in:
John Lorentzson 2025-07-13 20:52:10 +02:00
parent a94c6f4e8f
commit 08ea79f2de
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
wip-duuqnd/user-side-compiler/error-handling.lisp
View file

@ -8,7 +8,9 @@
:finally (return start)))) :finally (return start))))
(subseq string (subseq string
start start
(position #\Newline string :start (1+ start))))) (if (< start (length string))
(position #\Newline string :start (1+ start))
nil))))
(defun point-out-source (source) (defun point-out-source (source)
(if (null source) (if (null source)