With Louis' data and this script:
Rebol []
Then: now/time
Data: sort/skip map read/lines %test.txt
function [Line [string!]] [Loaded] [
trim Line
if not empty? Line [
Loaded: load/next Line
reduce [
Loaded/1
Line
]
]
] 2
write/lines %Sorted.txt map Data
func [N [integer!] Line [string!]] [
Line
]
print now/time - Then
halt
I got a time of two seconds (0:00:02) on my machine with Rebol/View. It's a
AMD Athlon XP 1600+, 1.40GHz with 512MB of RAM.
The first line of %Sorted.txt is:
002 umwn merimnwn dunatai prosqeinai epi thn hlikian
and the last line is:
521 tou qeou
I suspect that my machine's hardware makes most of the difference in time.
Louis, if you want, I can email the sorted text back to you. Just let me
know.
I hope that helps!
Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-
----- Original Message -----
From: "Louis A. Turk" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, September 07, 2002 9:04 AM
Subject: [REBOL] Re: Sort by first part of line
> Hi Everybody,
>
> You guys are great! I've been following this thread with amazement. I am
> so interested I can hardly keep my mind on other urgent projects which
> unfortunately I cannot put aside right now.
>
> Anyway, here is the data to be sorted if perchance it might be useful for
> timing purposes (691KB):
>
> http://www.pusatberita.com/test.txt
>
> Louis
>
> PS And many thanks to all of you for helping me like you always do.
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
>
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
