[Chicken-users] Embedding example from manual

[john]

I pasted in the first example in
http://galinha.ucpel.tche.br/Embedding to try out. The define-external
is missing a closing bracket and I think it needs a (return-to-host)
at the end.

(define (bar x) (gc) (* x x))

(define-external (baz (int i)) double
 (sqrt i))

(return-to-host)

I wanted to check before editing the wiki.

Cheers.