Commit 61c6ee4d authored by bernd's avatar bernd

examples on commands

parent a9c49965
This diff is collapsed.
......@@ -626,7 +626,7 @@ net2o-base
+net2o: >time-offset ( n -- ) \ set time offset
o IF time-offset 64! ELSE 64drop THEN ;
+net2o: context ( -- ) \ make context active
o IF context! THEN ;
o IF context! ELSE ." Can't " THEN ." establish a context!" F cr ;
: time-offset! ( -- ) ticks 64dup lit, >time-offset time-offset 64! context ;
: reply-key, ( -- )
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment