TudbuT/spl
1
0
Fork 0
Code Issues Pull requests Projects Releases 5 Packages Wiki Activity Actions

fix readf1

Browse source
This commit is contained in:
Daniella / Tove 2024-11-15 18:17:48 +01:00
parent 700fb1e266
commit 4c09cfe929
Signed by: TudbuT
GPG key ID: B3CF345217F202D3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
spl/std.spl
View file

@ -63,7 +63,7 @@ construct _str_ext {
!!- pat this str-readf !!- pat this str-readf
} }
readf1 { str | with pat this ; readf1 { str | with pat this ;
!!- pat this:readf 0:get !!- pat this:readf dup null eq not if { :0 }
} }
uppercase { str | with this ; uppercase { str | with this ;
this _array :cmap<{ | with chr ; this _array :cmap<{ | with chr ;