aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/forth2012/search/previous.frt
blob: 8d78394957b0145fa6da4cc44d1dab161f17dba3 (plain)
1
2
3
4
5
6
7
8
\ remove the first entry in the search order list

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

: previous
  get-order nip 1- set-order
;