aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/forth2012/search/also.frt
blob: 8934ce497d22ef5ea85c6e8567070d7d8c0a0cbb (plain)
1
2
3
4
5
6
7
8
\ duplicate first wordlist entry

\ #require get-order.frt
\ #require set-order.frt

: also ( -- ) 
  get-order over swap 1+ set-order 
;