Re: [Chicken-users] spellcheck benchmark

[Sunnan]

(Forgot to select "reply to all", so I just sent it to R.B. initially, 
sorry.)
Ruhi Bloodworth wrote:

> Here's my first go at the spellcheck benchmark.
>
> Any improvements ?
>  
Sure... shorter, shorter! For example, there's no need to use a main
when the toplevel will do just fine, and there's no need to set a
variable for things you only use once (in this case input and line), and
chicken has an "unless" form.

; declarations go here

(define dict (make-hash-table string=? 10000))

(for-each-line (cute hash-table-set! dict <> #t)
          (open-input-file "User.Dict.Words"))

(for-each-line (lambda (word)
        (unless (hash-table-ref dict word)
            (print word))))

This is very slow on my computer, however.