aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/help-words.frt
blob: e3e85cd6dcffa574fd26af6e51653dd82f732c9a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

\ requires help

get-current
help-wl set-current

: emit 
  ." ( c -- ) "
  ." R:( -- ) "
  ." emits a single character on the terminal, calls pause" ;
  
: key 
  ." ( -- c ) "
  ." R: ( -- ) "
  ." waits for a key stroke, calls pause "
;


set-current