X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=forth.jl.git;a=blobdiff_plain;f=src%2Flib_7_vocab.4th;h=0631ff057b271ffb21616f76716c1f1076c07f17;hp=99900a06d89cadd2b8ee38397049cf7d42a1d19e;hb=698e6c176256cd3b3a4fa8a647feec57db3a8c14;hpb=97b6b09881f94f55d0419d8557d2b00f816a18cb

diff --git a/src/lib_7_vocab.4th b/src/lib_7_vocab.4th
index 99900a0..0631ff0 100644
--- a/src/lib_7_vocab.4th
+++ b/src/lib_7_vocab.4th
@@ -10,7 +10,7 @@
 
         >link
 
-        DUP @ CURRENT @ VOCAB>LATEST !      ( set LATEST to point to the previous word )
+        dup @ current @ 1+ !      ( set LATEST to point to the previous word )
 ;
 
 \ Mark word as hidden