Node:Configuring the Tcl/Tk Library Module under Windows, Next:, Previous:Installing the Tcl/Tk Library Module under UNIX, Up:Interfacing with Tcl/Tk



Configuring the Tcl/Tk Library Module under Windows

Question:
I need to use a different Tcl/Tk version from the one SICStus is compiled against. How do I do?

The symptom of this is that Windows complains about not finding tcl<ver>.dll.

See the release notes for what version of Tcl/Tk was used to build SICStus. If you want to use another Tcl/Tk version, you need to recompile library(tcltk). You can do this by following these steps:

(Please do not embark on this unless you are fairly familiar with command-prompts and compilation procedures).

  1. You need MSVC version 6.0 or later. 5.x or 4.x might work but have not been tested.
  2. Build a new Tcl/Tk foreign resource (assuming Bash/Cygwin):
    $ cd library/x86-win32-nt-4
    $ mkdir tcltk_new
    $ cd tcltk_new
    $ splfr --cflag=-Ic:/path/to/Tcl/include
    ../../tcltk/*.c ../../tcltk.pl c:/path/to/Tcl/lib/tcl84.lib
    c:/path/to/Tcl/lib/tk84.lib
    $ cp tcltk.dll ../tcltk.dll
    

    If you do not have a shell that expands "*.c", you need to replace "../../tcltk/*.c" with the name of all C source files in ../../tcltk. Also, don't forget to adjust the actual paths to your Tcl/Tk installation directory.

    The following sample session shows how it may look:

    $ splfr --cflag=-Ih:/MS_Windows_2000/Tcl/include ../../tcltk/*.c ../../tcltk.pl h:/MS_Windows_2000/Tcl/lib/tcl84.lib h:/MS_Windows_2000/Tcl/lib/tk84.lib
    SICStus 3.12.2 ...
    Licensed to SICS
    
    % tcltk_glue_1084_1044046414.c generated, 20 msec
    % tcltk_glue.h generated, 20 msec
    tcl.c
    ../../tcltk/tcl.c(223) : warning C4090: 'function' : different 'const' qualifiers
    ../../tcltk/tcl.c(223) : warning C4024: 'sptcl_save_error' : different types for formal and actual parameter 2
    ../../tcltk/tcl.c(323) : warning C4090: 'function' : different 'const' qualifiers
    ../../tcltk/tcl.c(323) : warning C4024: 'sptcl_save_error' : different types for formal and actual parameter 2
    ../../tcltk/tcl.c(374) : warning C4090: 'function' : different 'const' qualifiers
    ../../tcltk/tcl.c(374) : warning C4024: 'sptcl_save_error' : different types for formal and actual parameter 2
    tk.c
    ../../tcltk/tk.c(134) : warning C4090: 'function' : different 'const' qualifiers
    ../../tcltk/tk.c(134) : warning C4024: 'sptcl_save_error' : different types for formal and actual parameter 2
    ../../tcltk/tk.c(162) : warning C4090: 'function' : different 'const' qualifiers
    ../../tcltk/tk.c(162) : warning C4024: 'sptcl_save_error' : different types for formal and actual parameter 2
    tkappini.c
    tkterm.c
    util.c
    tcltk_glue_1084_1044046414.c
       Creating library dummy.lib and object dummy.exp
    $ cp tcltk.dll ../tcltk.dll
    

  3. Test your new resource:
    $ sicstus -i
    SICStus 3.12.2 ...
    Licensed to SICS
    | ?- use_module(library(tcltk)).
    % loading c:/program files/sicstus prolog 3.10.0/library/tcltk.po...
    % module tcltk imported into user
    %  loading foreign resource c:/program files/sicstus prolog 3.10.0/library/x86-win32-nt-4/tcltk.dll in module tcltk
    % loaded c:/program files/sicstus prolog 3.10.0/library/tcltk.po in module tcltk, 10 msec 14744 bytes