// stdio.asm:	WORD p_read_word,'READ-WORD',fasm

anchor:p_read_word[]

=== Word: READ-WORD
....
Data stack: ( stream -- char* n )
....

"READ-WORD" is a function word that "reads" the next whitespace
separated word from the given stream and returns the [n:char*] duoble
cell pointer for it. The characters of the word are copied to
<<p_pad,PAD>>, and there is a limit of 1024 characters.

At the end of the stream READ-WORD returns 0 length.