.hd getwrd "get a word from a line buffer" "02/04/83"
integer function getwrd (in, i, out)
integer in (ARB), out (ARB)
integer i
.sp
Library:  vswtlb (standard Subsystem library)
.fs
'Getwrd' retrieves the next word from the line buffer 'in' at current
position 'i', and places it in 'out'.  A word is a string of characters
delimited by blanks or newlines (also EOS, if the word occurs at the
end of the line).  The new current position is updated in 'i', and
the length of the word is returned as the function value.
.im
Any blanks, starting at the current position 'i' in the string, are
skipped.
Characters from 'in' are then copied to 'out', starting at
position 'i',
until the next character to be copied is either an EOS, a blank, or
a NEWLINE.  When this happens, the count of characters is returned.
.am
i, out
.sa
ctoc (2)