cfunction
(string/trimr str &opt set)
Trim trailing whitespace from a byte sequence. If the argument set is
provided, consider only characters in set to be whitespace.
(string/trimr " foo ") # => " foo"
(string/trimr "_!_foo_!_" "_!") # => "_!_foo"