1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
#! /bin/sh
#
# Trying to generate a loadable module for Tcl/Tk8.1.1 on
# WindowsNT using Cygwin20 cross-compiler running under
# RedHat6.0.
# Step -1:
# Make a copy of winsock.h into winsock2.h. "Winsock2.h" is needed by
# tclWinPort.h. tclWinPort.h is included by tclStubLib.c in step 3.
#
# Step 0:
# Make sure the cross-compiler tools are on PATH and remove
# old files.
#
PATH=$PATH:/opt/cygwin20/bin
rm -f simple.o stublib.o simple.dll
# Step 1:
# Generate the C source code into "simple.c"
#
cat >simple.c <<\END
#include <tcl.h>
int Simple_Init(Tcl_Interp *interp){
Tcl_InitStubs(interp,"8.1",0);
Tk_InitStubs(interp,"8.1",0);
return TCL_OK;
}
END
# Step 2:
# Compile the C source code yielding simple.o
#
i586-cygwin32-gcc \
-I/home/drh/tcltk/tcl8.1.1/generic \
-mno-cygwin \
-DUSE_TCL_STUBS=1 \
-c simple.c
# Step 3:
# Compile the Stub libraries yielding tclstub.o and tkstub.o
#
i586-cygwin32-gcc \
-I/home/drh/tcltk/tcl8.1.1/generic \
-I/home/drh/tcltk/tcl8.1.1/win \
-mno-cygwin \
-o tclstub.o \
-c /home/drh/tcltk/tcl8.1.1/generic/tclStubLib.c
i586-cygwin32-gcc \
-I/home/drh/tcltk/tcl8.1.1/generic \
-I/home/drh/tcltk/tcl8.1.1/win \
-I/home/drh/tcltk/tk8.1.1/generic \
-I/home/drh/tcltk/tk8.1.1/win \
-I/home/drh/tcltk/tk8.1.1/xlib \
-mno-cygwin \
-o tkstub.o \
-c /home/drh/tcltk/tk8.1.1/generic/tkStubLib.c
# Step 4:
# Generate the DEF file
#
cat >simple.def <<\END
EXPORTS
Simple_Init
END
# Step 5:
# Use dllwrap to build the DLL. Note: tclstub81.lib is copied out
# of the binary tk8.1 distribution from Scriptics.
#
i586-cygwin32-dllwrap \
--def simple.def \
-v \
--driver-name i586-cygwin32-gcc \
--dlltool-name i586-cygwin32-dlltool \
--as i586-cygwin32-as \
--dllname simple.dll \
--target i386-mingw32 -mno-cygwin \
simple.o tclstub.o tkstub.o
|
