bjoli/BjoManual
SHA256
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

substring, after Bjolang's rename of substring/cursors

Browse source 
🤖 Generated with [ECA](https://eca.dev)

Co-Authored-By: eca-agent <git@eca.dev>
This commit is contained in:
Linus Björnstam 2026-10-05 09:02:15 +02:00
parent 1ef2489224
commit 16278c2c92
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
_01.Language-basics.sz
View file

@ -1757,7 +1757,7 @@ A cursor is a position in a string. It is as cheap as an int, but it always sits
(let* ((start (string-cursor-start s)) (let* ((start (string-cursor-start s))
(rest (string-cursor-next s start))) (rest (string-cursor-next s start)))
(string-append (char->string (char-upcase (string-cursor-ref s start))) (string-append (char->string (char-upcase (string-cursor-ref s start)))
(substring/cursors s rest (string-cursor-end s)))))) (substring s rest (string-cursor-end s))))))
(capitalise "ölstuga") ;; "Ölstuga" (capitalise "ölstuga") ;; "Ölstuga"
@ -1765,7 +1765,7 @@ A cursor is a position in a string. It is as cheap as an int, but it always sits
(: first-word (-> string string)) (: first-word (-> string string))
(defun (first-word s) (defun (first-word s)
(match (string-index char-whitespace? s) (match (string-index char-whitespace? s)
((Some c) (substring/cursors s (string-cursor-start s) c)) ((Some c) (substring s (string-cursor-start s) c))
(None s))) (None s)))
(first-word "hello there world") ;; "hello" (first-word "hello there world") ;; "hello"