paren:skip-whitespace

• (paren:skip-whitespace text pos dir) -> exact-integer
      text : (instance text%)
      pos : exact-integer
      dir : (union 'forward 'backward)

  If dir is 'forward, this returns the position of the first non-whitespace character in text after pos. If dir is 'backward, it returns the first non-whitespace character before pos.