Diff for /gforth/string.fs between versions 1.3 and 1.4

version 1.3, 2000/09/23 15:06:02 version 1.4, 2000/09/23 15:46:59
Line 16 Line 16
   
 \ You should have received a copy of the GNU General Public License  \ You should have received a copy of the GNU General Public License
 \ along with this program; if not, write to the Free Software  \ along with this program; if not, write to the Free Software
 \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
   
 : delete   ( buffer size count -- )  : delete   ( buffer size count -- )
   over min >r  r@ - ( left over )  dup 0>    over min >r  r@ - ( left over )  dup 0>

Removed from v.1.3  
changed lines
  Added in v.1.4


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