COFFRE Richard FTO wrote:
>Hi
>
>I have the following code :
>
>output1: %output1.tmp
>output2: %output2.tmp
>output3: %output3.tmp
>
>if exists? output1 [ delete output1 ]
>if exists? output2 [ delete output2 ]
>if exists? output3 [ delete output3 ]
>
>I want to simplify it like this :
>
>for i 1 3 1 [
> output(i): %output(i).tmp
> if exists? output(i) [ delete output(i) ]
>]
>
for i 1 3 1 [
set to-word join 'output i f: join %output reduce [i ".tmp"]
if exists? f [delete f]
]
... but that's not probably the cleanes solution anyway.... :-)
for i 1 3 1 [if exists? file: join %output reduce [i ".tmp"] [delete file] ]
.... a shorter one :-)
-pekr-
>
>Any ideas ?
>
>TIA
>
>Richard Coffre
>France Telecom Orbiscom
>T�l. : 01 47 61 46 28
>"Share what you know, learn what you don't"
>
>
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
