Diff for /gforth/history.fs between versions 1.35 and 1.37

version 1.35, 2004/12/27 20:05:53 version 1.37, 2004/12/31 13:23:57
Line 1 Line 1
 \ command line edit and history support                 16oct94py  \ command line edit and history support                 16oct94py
   
 \ Copyright (C) 1995,2000,2003 Free Software Foundation, Inc.  \ Copyright (C) 1995,2000,2003,2004 Free Software Foundation, Inc.
   
 \ This file is part of Gforth.  \ This file is part of Gforth.
   
Line 218  Create prefix-found  0 , 0 , Line 218  Create prefix-found  0 , 0 ,
     prefix-found @ IF  bl (ins)  THEN  0 ;      prefix-found @ IF  bl (ins)  THEN  0 ;
   
 : kill-prefix  ( key -- key )  : kill-prefix  ( key -- key )
   dup #tab <> IF  0 0 prefix-found 2!  THEN ;    dup #tab <> IF  prefix-off  THEN ;
   
 [IFUNDEF] everyline defer everyline [THEN]  [IFUNDEF] everyline defer everyline [THEN]
   

Removed from v.1.35  
changed lines
  Added in v.1.37


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>