loading expect package in a Windows xp service

[sardine...@gmail.com]

Is it possible to use expect in a Windows xp service?
When I tried to load expect in a Windows xp service (using tclsvc.exe)
I got "Could not start the service ... on Local Computer - Error 1067:
The process terminated unexpectedly"
The service without the "package require Expect" statement works just
fine.
The service when started as an application also works just fine.

when I tried to catch the error with the following:

set fout [open C:/temp/expectService.txt a]
puts $fout "Loading expect package."
if {[catch {package require Expect} errorCode]} {
puts $fout $errorCode
flush $fout
} else {
puts $fout "expected loaded ok"
flush $fout
}
close $fout

all I got was: "Loading expect package."
When I tried to run it as an application, I got what I expected:

Loading expect package.
expected loaded ok

My system:
Windows xp, sp2
ActiveState tcl: 8.4.16

Can somebody help?