Lines Matching refs:newline
113 : skip-newline ( -- )
118 : skip-newline-ws ( -- bool )
133 = ifnot drop skip-newline 0 ret then
145 over ifnot 2drop skip-newline 0 ret then
189 \ Test whether a character is whitespace (but not a newline).
193 \ Read next character, skipping whitespace (except newline).
235 from-base64 dup 0< if drop skip-newline 3 ret then
240 from-base64 dup 0< if drop skip-newline 3 ret then
249 skip-newline-ws ifnot drop 3 ret then
255 from-base64 dup 0< if drop skip-newline 3 ret then
261 drop skip-newline-ws ifnot 3 ret then
267 from-base64 dup 0< if drop skip-newline 3 ret then
279 `- <> if skip-newline 3 send-event ret then
283 skip-newline 2 send-event ;
295 skip-newline 3 send-event