Various tweaks.
This commit is contained in:
@ -125,7 +125,8 @@ POSIX_BOOT = common/boot.fs common/conditionals.fs common/vocabulary.fs \
|
||||
common/hide_calls.fs common/ansi.fs \
|
||||
posix/posix.fs posix/posix_highlevel.fs posix/termios.fs common/locals.fs \
|
||||
common/utils.fs common/highlevel.fs common/filetools.fs posix/posix_desktop.fs \
|
||||
common/tasks.fs common/streams.fs common/blocks.fs posix/autoboot.fs \
|
||||
common/tasks.fs common/streams.fs common/blocks.fs posix/telnetd.fs \
|
||||
posix/autoboot.fs \
|
||||
common/fini.fs
|
||||
$(GEN)/posix_boot.h: common/source_to_string.js $(POSIX_BOOT) | $(GEN)
|
||||
echo "ok" | cat $(POSIX_BOOT) - | $< boot $(VERSION) $(REVISION) >$@
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
( Telnet )
|
||||
vocabulary telnetd telnetd definitions also sockets also internals
|
||||
|
||||
8080 constant port
|
||||
23 constant port
|
||||
-1 value sockfd -1 value clientfd
|
||||
: bs, ( n -- ) dup 256 / c, c, ;
|
||||
: s, ( n -- ) dup c, 256 / c, ;
|
||||
|
||||
@ -3,7 +3,7 @@ include posix/sockets.fs
|
||||
|
||||
vocabulary telnetd telnetd definitions also posix
|
||||
|
||||
8080 constant port
|
||||
5555 constant port
|
||||
-1 value sockfd -1 value clientfd
|
||||
: bs, ( n -- ) dup 256 / c, c, ;
|
||||
: s, ( n -- ) dup c, 256 / c, ;
|
||||
@ -38,4 +38,3 @@ defer broker
|
||||
|
||||
only forth definitions
|
||||
|
||||
telnetd server
|
||||
|
||||
@ -296,6 +296,7 @@ pinchange ( xt pin -- ) Call xt when pin changes.
|
||||
<p>Example:</p>
|
||||
|
||||
<pre>
|
||||
17 input pinMode
|
||||
: test ." pinvalue: " 17 digitalRead . cr ;
|
||||
' test 17 pinchange
|
||||
</pre>
|
||||
|
||||
Reference in New Issue
Block a user