[Prev][Next][Index][Thread]
Re: Reducing exe size?
On 14 Dec 2001, Chris Double wrote:
> define method main () => ()
> local method for-each-file( directory, name, type )
> when(type == #"file")
> let old-name = concatenate(directory, name);
> let new-name = concatenate($destination-directory, name);
> format-out("Copying %s to %s\n", old-name, new-name);
> copy-file(old-name, new-name, if-exists: #"replace");
> end when;
> end method for-each-file;
>
> do-directory(for-each-file, $source-directory);
> end method main;
>
Thanks, I learned a lot from this code.
I couldn't find a split-string function in the core libs but found your
dylanlibs page and the sequence-utilities which seems to be the
answer. Right now I simply imported it into my project but is there some
standard/good way where to put libs like this?
Sorry for repeatedly bugging this list; I'll grow up in time (and when my
dylan books arrives!) ;-)
Regards,
Robert
References: