http://www.perlmonks.org?node_id=907878


in reply to Re^2: "Tcl.xs:126: error: initializer element is not constant" while installing Tcl-1.02 in Strawberry Perl v5.10 on Windoze XP
in thread "Tcl.xs:126: error: initializer element is not constant" while installing Tcl-1.02 in Strawberry Perl v5.10 on Windoze XP

The offending line in Tcl.xs is:

static int (* tclKit_AppInit)(Tcl_Interp *) = Tcl_Init;

Tcl_Init is defined thusly:

void Tcl_Init(interp) Tcl interp CODE: if (!initialized) { return; } if (tclKit_AppInit(interp) != TCL_OK) { croak(Tcl_GetStringResult(interp)); } Tcl_CreateObjCommand(interp, "::perl::Eval", Tcl_EvalInPerl, (ClientData) NULL, NULL);


I'm not well versed in xs so I'm not sure what the issue is.