Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: Sort Problem

From: tomc:darkwing:uoregon at: 15-Nov-2001 10:42

comment: { to benchmarkers only considering the efficency of my effort } foo: parse read/lines %gsorted.txt none bar: copy [] foreach line foo [append/only bar parse line none] sort/compare bar (func[a b][(load a/2) > (load b/2)]) clear foo foreach line bar[append foo rejoin [line/1 " " line/2 newline]] write %gsorted.txt to-string foo On Thu, 15 Nov 2001, Dr. Louis A. Turk wrote: