alx/ueforth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Drop CR LF specialization for telnetd in light of change in overall handling.

Browse Source
This commit is contained in:
Brad Nelson
2022-06-07 23:40:15 -07:00
parent c2d9615833
commit 298de57027
1 changed files with 1 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
posix/telnetd.fs
View File

@ -22,8 +22,7 @@ sockaddr telnet-port sockaddr client variable client-len
defer broker
: telnet-emit' ( ch -- ) >r rp@ 1 clientfd write-file rdrop if broker then ;
: telnet-emit ( ch -- ) dup nl = if 13 telnet-emit' then telnet-emit' ;
: telnet-emit ( ch -- ) >r rp@ 1 clientfd write-file rdrop if broker then ;
: telnet-type ( a n -- ) for aft dup c@ telnet-emit 1+ then next drop ;
: telnet-key ( -- n ) 0 >r rp@ 1 clientfd read-file swap 1 <> or if rdrop broker then r> ;