diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-15 15:00:14 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-15 15:00:14 (GMT) |
| commit | 95d312be7c89d1ccbc6d5c18c056993dfd2acfe4 (patch) | |
| tree | bba6dc6a2219db714d4413de45a1aa2101da03ce | |
| parent | 782d1af3c042bd0df300550ae2d506ba63554549 (diff) | |
| download | tcl-95d312be7c89d1ccbc6d5c18c056993dfd2acfe4.zip tcl-95d312be7c89d1ccbc6d5c18c056993dfd2acfe4.tar.gz tcl-95d312be7c89d1ccbc6d5c18c056993dfd2acfe4.tar.bz2 | |
Fix bug in genStubs.tcl: If the macosx section doesn't contain any macosx-specific entries, no section at all is created
<p>revert previous workaround in tclInt.decls
FossilOrigin-Name: 3c4decb155b1400f6f1e09b375a7d683d17bf3dc
| -rw-r--r-- | generic/tclInt.decls | 2 | ||||
| -rw-r--r-- | tools/genStubs.tcl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index a176bca..bdae099 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -903,7 +903,7 @@ declare 12 unix { declare 13 unix { char *TclpInetNtoa(struct in_addr addr) } -declare 29 {macosx unix} { +declare 29 unix { int TclWinCPUID(unsigned int index, unsigned int *regs) } diff --git a/tools/genStubs.tcl b/tools/genStubs.tcl index c29f6c9..db26629 100644 --- a/tools/genStubs.tcl +++ b/tools/genStubs.tcl @@ -827,7 +827,7 @@ proc genStubs::forAllStubs {name slotProc onAll textVar append text [addPlatformGuard $plat $temp {} true] } ## macosx ## - if {$block(macosx) && !$block(aqua) && !$block(x11)} { + if {($block(unix) || $block(macosx)) && !$block(aqua) && !$block(x11)} { set temp {} set lastNum -1 foreach plat {unix macosx} { |