summaryrefslogtreecommitdiffstats
path: root/tools/genStubs.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-05-15 04:54:19 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-05-15 04:54:19 (GMT)
commitb68b8009bd3e885e1b2b4b6204c92d9791ea6f1b (patch)
treea87710d391e060d7a0af577ec69ea1143ffb9c48 /tools/genStubs.tcl
parentd7dccda78eed3f2ba6f123ccff8c61b9f7d4bfe0 (diff)
parent7ac6053161fe49bc32f962b38e67f94f172ce709 (diff)
downloadtcl-b68b8009bd3e885e1b2b4b6204c92d9791ea6f1b.zip
tcl-b68b8009bd3e885e1b2b4b6204c92d9791ea6f1b.tar.gz
tcl-b68b8009bd3e885e1b2b4b6204c92d9791ea6f1b.tar.bz2
Revert part of [5caa06383d] move Tcl_MacOSXOpenBundleResources and Tcl_MacOSXOpenVersionedBundleResources from the UNIX stub table back to its own osx stub table, instead let cygwin make use of the win32 stub table
Diffstat (limited to 'tools/genStubs.tcl')
-rw-r--r--tools/genStubs.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/genStubs.tcl b/tools/genStubs.tcl
index a7b463c..93a3669 100644
--- a/tools/genStubs.tcl
+++ b/tools/genStubs.tcl
@@ -536,8 +536,8 @@ proc genStubs::makeSlot {name decl index} {
append text $rtype " *" $lfname "; /* $index */\n"
return $text
}
- if {[string range $rtype end-7 end] == "CALLBACK"} {
- append text [string trim [string range $rtype 0 end-8]] " (CALLBACK *" $lfname ") "
+ if {[string range $rtype end-8 end] == "__stdcall"} {
+ append text [string trim [string range $rtype 0 end-9]] " (__stdcall *" $lfname ") "
} else {
append text $rtype " (*" $lfname ") "
}