expect fails to build on Panther

[face@…]

admin@x:admin:124 $ port
MacPorts 1.700

admin@x:admin:122 $ sudo port clean --work expect
--->  Cleaning expect
admin@x:admin:123 $ sudo port upgrade -d -v expect
--->  Fetching expect
--->  Verifying checksum(s) for expect
--->  Extracting expect
--->  Applying patches to expect
--->  Configuring expect
--->  Building expect
Error: Target org.macports.build returned: shell command " cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_release_ports_devel_expect/work/expect-5.43" && make all " returned error 2
Command output: exp_main_tk.c:351: error: parse error before '&' token
exp_main_tk.c:351: error: conflicting types for `Tcl_DStringFree'
/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_release_ports_devel_expect/work/tcl8.4.14/generic/tclDecls.h:416: error: previous declaration of `Tcl_DStringFree'
exp_main_tk.c:351: warning: data definition has no type or storage class
exp_main_tk.c:355: warning: parameter names (without types) in function declaration
exp_main_tk.c:355: error: conflicting types for `Tcl_ResetResult'
/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_release_ports_devel_expect/work/tcl8.4.14/generic/tclDecls.h:716: error: previous declaration of `Tcl_ResetResult'
exp_main_tk.c:355: warning: data definition has no type or storage class
exp_main_tk.c:356: error: parse error before "if"
exp_main_tk.c:367: error: redefinition of `code'
exp_main_tk.c:350: error: `code' previously defined here
exp_main_tk.c:367: error: `interp' undeclared here (not in a function)
exp_main_tk.c:367: error: initializer element is not constant
exp_main_tk.c:367: warning: data definition has no type or storage class
exp_main_tk.c:368: error: parse error before "if"
exp_main_tk.c:376: error: redefinition of `code'
exp_main_tk.c:367: error: `code' previously defined here
exp_main_tk.c:376: error: `interp' undeclared here (not in a function)
exp_main_tk.c:376: error: `TK_VERSION' undeclared here (not in a function)
exp_main_tk.c:376: error: initializer element is not constant
exp_main_tk.c:376: warning: data definition has no type or storage class
exp_main_tk.c:377: error: parse error before "if"
exp_main_tk.c:385: error: redefinition of `code'
exp_main_tk.c:376: error: `code' previously defined here
exp_main_tk.c:385: error: `interp' undeclared here (not in a function)
exp_main_tk.c:385: error: initializer element is not constant
exp_main_tk.c:385: warning: data definition has no type or storage class
exp_main_tk.c:387: error: parse error before ':' token
{standard input}:110:FATAL:Symbol _code already defined.
make: *** [exp_main_tk.o] Error 1

Error: Unable to upgrade port: 1

[markd@…]

Can you 'clean --all' and reinstall the port? And what version of Tcl do you have installed?