diff --git a/forth/debugging/client.fs b/forth/debugging/client.fs index c60eff0..3f0d5e5 100644 --- a/forth/debugging/client.fs +++ b/forth/debugging/client.fs @@ -282,11 +282,11 @@ variable bootinfo-size ; : (encode-bootpath) ( "{params}" -- bootpath-str bootpath-len) - bl parse 2dup + bl parse 2dup encode-string " /chosen" (find-dev) if " bootpath" rot (property) then - linefeed parse + linefeed parse encode-string " /chosen" (find-dev) if " bootargs" rot (property) then