use more beautiful mathematics in std/stol

This commit is contained in:
Daniella / Tove 2022-03-06 16:01:01 +01:00
parent a077789685
commit 4d02146777

View file

@ -171,8 +171,7 @@ func stol {
s rem =s "remove first digit" # s rem =s "remove first digit" #
} }
ne if { n neg =n } n ( ne 2 * 1 - neg ) _long *
n
} }
func char { _array 0 aget } func char { _array 0 aget }