box-comment-out-selection in scheme:text<%>
This method comments out a selection in the text by putting it into a comment box.
( -> void
send a-scheme:text box-comment-out-selection start-pos end-pos)
start-pos = : (union 'start exact-integer)
'start
end-pos = : (union 'end exact-integer)'end
Removes the region from start-pos to end-pos
from the editor and inserts a comment box with that region
of text inserted into the box.
If start-pos is 'start, the starting point of
the selection is used. If end-pos is 'end,
the ending point of the selection is used.