Received: by 10.180.73.134 with SMTP id l6mr898282wiv.1.1350507689251;
        Wed, 17 Oct 2012 14:01:29 -0700 (PDT)
Path: q10ni65166182wif.0!nntp.google.com!goblin1!goblin2!goblin.stu.neva.ru!feeder.erje.net!newsreader4.netcologne.de!news.netcologne.de!feed.xsnews.nl!ramfeed-2.ams.xsnews.nl!post-feeder-01.xsnews.nl!frontend-F10-10.ams.news.kpn.nl
From: Coos Haak <chfo...@hccnet.nl>
Subject: Re: ANN: USBboot
Newsgroups: comp.lang.forth
User-Agent: 40tude_Dialog/2.0.15.1nl
MIME-Version: 1.0
References: <e97cb0f3-0159-4afc-8ebc-070cf9b614ab@googlegroups.com> <9cde7b00-fb3d-4832-9328-ac10e4f8b61f@googlegroups.com> <49e1d560-23ed-4d1d-9cc4-f338cac8aa28@w2g2000vbc.googlegroups.com>
Date: Wed, 17 Oct 2012 22:59:53 +0200
Message-ID: <1e1xw6gqtg66p.a348i6lrg5d6.dlg@40tude.net>
Lines: 37
Organization: KPN.com
NNTP-Posting-Host: 84.80.150.84
X-Trace: 1350507804 news.kpn.nl 22221 84.80.150.84@kpn/84.80.150.84:57034
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: 8bit

Op Mon, 15 Oct 2012 09:29:00 -0700 (PDT) schreef Howerd:

> On Oct 15, 12:32 pm, jfong <jf...@ms4.hinet.net> wrote:
>> Howerd ... wrote：
>>
>>> I have just released USBboot, a selection of three files to make a USB drive bootable :
>>> .....
>>> USBboot.exe is written in the SwiftForth dialect of Forth.
>>
>>     What SwiftForth version you use? I had try to include USBboot.f under
>> version 3.2.5 but failed when encounter the word (u.r).
>>
>> Jach
>>
>>
> 
> Hi Jach,
> 
> I have SwiftForth version 3.4.1 14-Sep-2011 .
> 
> Here is the code for (u.r) :
> 
>: (U.R) ( u n -- addr len )
>    >R 0 (D.) R@ OVER - 0 MAX 0 ?DO BL HOLD LOOP #> R> MIN ;
> 
> Best regards,
> Howerd

What is the last MIN for? It truncates '12345 3 U.R' to '123'
Maybe useful for tables, but no Forth with .R words I know does this, all
will print '12345'

-- 
Coos

CHForth, 16 bit DOS applications
http://home.hccnet.nl/j.j.haak/forth.html