We want to be able apply the literate programming tool from inside itself. To that end, we need to isolate it from the base vocabulary.
forth-wordlist wordlist dup set-current 2 set-order