Diff for /gforth/arch/misc/key.fs between versions 1.1 and 1.5

version 1.1, 1997/05/29 19:43:09 version 1.5, 2007/12/31 18:40:25
Line 1 Line 1
 \ misc-key.fs basic-io for misc processor               01feb97jaw  \ misc-key.fs basic-io for misc processor               01feb97jaw
   
   \ Copyright (C) 1998,2000,2003,2004 Free Software Foundation, Inc.
   
 c: key? $ffff x@ 0<> ;  \ This file is part of Gforth.
   
   \ Gforth is free software; you can redistribute it and/or
   \ modify it under the terms of the GNU General Public License
   \ as published by the Free Software Foundation, either version 3
   \ of the License, or (at your option) any later version.
   
   \ This program is distributed in the hope that it will be useful,
   \ but WITHOUT ANY WARRANTY; without even the implied warranty of
   \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   \ GNU General Public License for more details.
   
   \ You should have received a copy of the GNU General Public License
   \ along with this program. If not, see http://www.gnu.org/licenses/.
   
   c: (key?) $ffff x@ 0<> ;
   
 c: (key)  BEGIN key? UNTIL $fffe x@ ;  c: (key)  BEGIN key? UNTIL $fffe x@ ;
   

Removed from v.1.1  
changed lines
  Added in v.1.5


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