Hello [EMAIL PROTECTED]!
On 18-Dic-99, you wrote:
d> dup: func [ s [string!] n [integer!] /local i r ] [ r: copy ""
d> i: 0 while [ i <= n ] [ i: i + 1 append r s ] r ]
What about:
dup: func [s [string!] n [integer!]] [head insert/dup copy "" s n]
Regards,
Gabriele.
--
o--------------------) .-^-. (----------------------------------o
| Gabriele Santilli / /_/_\_\ \ Amiga Group Italia --- L'Aquila |
| GIESSE on IRC \ \-\_/-/ / http://www.amyresource.it/AGI/ |
o--------------------) `-v-' (----------------------------------o
