Changeset 4016 for trunk/ProjectFortress/demos

Timestamp:

07/28/09 06:46:39 (4 months ago)

Author:

jmaessen

Message:

[demos] Fixed wordcount2 to only output first 100 entries---matching
wordcount and avoiding printing "fail'd" in the output!

Files:

• trunk/ProjectFortress/demos/wordcount2.fss (modified) (1 diff)

trunk/ProjectFortress/demos/wordcount2.fss

@@ -123 +123 @@
     inv = nanoTime()
     time("Inverted database",acq,inv)
-    for (c,m) <- seq(invDatabase.reverse()) do
+    entries = <|[\(ZZ32, List[\String\])\] (c,m) | (c,m) <- invDatabase.reverse() |>
+    for (c,m) <- seq(entries[0#100]) do
         println(m ": " c " times")
     end