annotate Mac/Modules/ctl/ctlscan.py @ 58925:eecf1bef052d 2.6

Merged revisions 78207 via svnmerge from svn+ssh://pythondev@svn.python.org/python/trunk ........ r78207 | ezio.melotti | 2010-02-17 01:26:09 +0200 (Wed, 17 Feb 2010) | 1 line #7930: fix stripid ........
author Ezio Melotti <ezio.melotti@gmail.com>
date Tue, 16 Feb 2010 23:29:44 +0000
parents 1d84bf5f9478
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
1 # Scan <Controls.h>, generating ctlgen.py.
8083
7ace172c2521 Replaced addpack by handcrafted code to find the bgen stuff.
Jack Jansen <jack.jansen@cwi.nl>
parents: 7437
diff changeset
2 import sys
24576
3e718c3d51ef Enable building of Carbon toolbox modules with unix-Python.
Jack Jansen <jack.jansen@cwi.nl>
parents: 21601
diff changeset
3 from bgenlocations import TOOLBOXDIR, BGENDIR
8083
7ace172c2521 Replaced addpack by handcrafted code to find the bgen stuff.
Jack Jansen <jack.jansen@cwi.nl>
parents: 7437
diff changeset
4 sys.path.append(BGENDIR)
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
5
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
6 from scantools import Scanner
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
7
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
8 def main():
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
9 # input = "Controls.h" # Universal Headers < 3.3
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
10 input = ["Controls.h", "ControlDefinitions.h"] # Universal Headers >= 3.3
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
11 output = "ctlgen.py"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
12 defsoutput = TOOLBOXDIR + "Controls.py"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
13 scanner = MyScanner(input, output, defsoutput)
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
14 scanner.scan()
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
15 scanner.close()
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
16 print "=== Testing definitions output code ==="
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
17 execfile(defsoutput, {}, {})
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
18 print "=== Done scanning and generating, now doing 'import ctlsupport' ==="
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
19 import ctlsupport
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
20 print "=== Done. It's up to you to compile Ctlmodule.c ==="
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
21
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
22 class MyScanner(Scanner):
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
23
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
24 def destination(self, type, name, arglist):
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
25 classname = "Function"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
26 listname = "functions"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
27 if arglist:
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
28 t, n, m = arglist[0]
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
29 if t in ("ControlHandle", "ControlRef") and m == "InMode":
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
30 classname = "Method"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
31 listname = "methods"
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
32 return classname, listname
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
33
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
34 def writeinitialdefs(self):
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
35 self.defsfile.write("def FOUR_CHAR_CODE(x): return x\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
36 self.defsfile.write("from Carbon.TextEdit import *\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
37 self.defsfile.write("from Carbon.QuickDraw import *\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
38 self.defsfile.write("from Carbon.Dragconst import *\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
39 self.defsfile.write("from Carbon.CarbonEvents import *\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
40 self.defsfile.write("from Carbon.Appearance import *\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
41 self.defsfile.write("kDataBrowserItemAnyState = -1\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
42 self.defsfile.write("kControlBevelButtonCenterPopupGlyphTag = -1\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
43 self.defsfile.write("kDataBrowserClientPropertyFlagsMask = 0xFF000000\n")
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
44 self.defsfile.write("\n")
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
45
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
46 def makeblacklistnames(self):
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
47 return [
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
48 'FindControlUnderMouse', # Generated manually, returns an existing control, not a new one.
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
49 'DisposeControl', # Generated manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
50 'KillControls', # Implied by close of dialog
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
51 'SetCtlAction',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
52 'TrackControl', # Generated manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
53 'HandleControlClick', # Generated manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
54 'SetControlData', # Generated manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
55 'GetControlData', # Generated manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
56 'kControlBevelButtonCenterPopupGlyphTag', # Constant with funny definition
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
57 'kDataBrowserClientPropertyFlagsMask', # ditto
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
58 'kDataBrowserItemAnyState', # and ditto
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
59 # The following are unavailable for static 68k (appearance manager)
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
60 ## 'GetBevelButtonMenuValue',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
61 ## 'SetBevelButtonMenuValue',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
62 ## 'GetBevelButtonMenuHandle',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
63 ## 'SetBevelButtonTransform',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
64 'SetBevelButtonGraphicAlignment',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
65 'SetBevelButtonTextAlignment',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
66 'SetBevelButtonTextPlacement',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
67 ## 'SetImageWellTransform',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
68 ## 'GetTabContentRect',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
69 ## 'SetTabEnabled',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
70 ## 'SetDisclosureTriangleLastValue',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
71 ## # Unavailable in CW Pro 3 libraries
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
72 ## 'SetUpControlTextColor',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
73 ## # Unavailable in Jack's CW Pro 5.1 libraries
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
74 ## 'GetControlRegion',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
75 ## 'RemoveControlProperty',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
76 ## 'IsValidControlHandle',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
77 ## 'SetControl32BitMinimum',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
78 ## 'GetControl32BitMinimum',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
79 ## 'SetControl32BitMaximum',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
80 ## 'GetControl32BitMaximum',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
81 ## 'SetControl32BitValue',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
82 ## 'GetControl32BitValue',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
83 ## 'SetControlViewSize',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
84 ## 'GetControlViewSize',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
85 # Generally Bad News
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
86 'GetControlProperty',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
87 'SetControlProperty',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
88 'GetControlPropertySize',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
89 'SendControlMessage', # Parameter changed from long to void* from UH3.3 to UH3.4
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
90 'CreateTabsControl', # wrote manually
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
91 'GetControlAction', # too much effort for too little usefulness
7437
3740ff2ee053 Regenerated from Universal Headers 3.0.1. Some new calls are
Jack Jansen <jack.jansen@cwi.nl>
parents: 6061
diff changeset
92
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
93 # too lazy for now
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
94 'GetImageWellContentInfo',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
95 'GetBevelButtonContentInfo',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
96 # OS8 only
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
97 'GetAuxiliaryControlRecord',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
98 'SetControlColor',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
99 ]
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
100
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
101 def makeblacklisttypes(self):
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
102 return [
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
103 'ProcPtr',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
104 # 'ControlActionUPP',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
105 'Ptr',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
106 'ControlDefSpec', # Don't know how to do this yet
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
107 'ControlDefSpec_ptr', # ditto
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
108 'Collection', # Ditto
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
109 # not-yet-supported stuff in Universal Headers 3.4:
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
110 'ControlColorUPP',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
111 'ControlKind', # XXX easy: 2-tuple containing 2 OSType's
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
112 # 'ControlTabEntry_ptr', # XXX needed for tabs
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
113 # 'ControlButtonContentInfoPtr',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
114 # 'ControlButtonContentInfo', # XXX ugh: a union
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
115 # 'ControlButtonContentInfo_ptr', # XXX ugh: a union
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
116 'ListDefSpec_ptr', # XXX see _Listmodule.c, tricky but possible
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
117 'DataBrowserItemID_ptr', # XXX array of UInt32, for BrowserView
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
118 'DataBrowserItemUPP',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
119 'DataBrowserItemDataRef', # XXX void *
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
120 'DataBrowserCallbacks', # difficult struct
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
121 'DataBrowserCallbacks_ptr',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
122 'DataBrowserCustomCallbacks',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
123 'DataBrowserCustomCallbacks_ptr',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
124 ## 'DataBrowserTableViewColumnDesc',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
125 ## 'DataBrowserListViewColumnDesc',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
126 'CFDataRef',
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
127 'DataBrowserListViewHeaderDesc', # difficult struct
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
128 ]
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
129
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
130 def makerepairinstructions(self):
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
131 return [
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
132 ([("void_ptr", "*", "InMode"), ("long", "*", "InMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
133 [("InBuffer", "*", "*")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
134
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
135 ([("void", "*", "OutMode"), ("long", "*", "InMode"),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
136 ("long", "*", "OutMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
137 [("VarVarOutBuffer", "*", "InOutMode")]),
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
138
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
139 ## # For TrackControl
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
140 ## ([("ProcPtr", "actionProc", "InMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
141 ## [("FakeType('(ControlActionUPP)0')", "*", "*")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
142 ## ([("ControlActionUPP", "actionProc", "InMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
143 ## [("FakeType('(ControlActionUPP)0')", "*", "*")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
144
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
145 # For GetControlTitle
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
146 ([('Str255', 'title', 'InMode')],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
147 [('Str255', 'title', 'OutMode')]),
11531
8cfcd273fa5c Changes by Corran Webster to support {Get,Set}ControlData and
Jack Jansen <jack.jansen@cwi.nl>
parents: 10357
diff changeset
148
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
149 ([("ControlHandle", "*", "OutMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
150 [("ExistingControlHandle", "*", "*")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
151 ([("ControlRef", "*", "OutMode")], # Ditto, for Universal Headers
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
152 [("ExistingControlHandle", "*", "*")]),
11531
8cfcd273fa5c Changes by Corran Webster to support {Get,Set}ControlData and
Jack Jansen <jack.jansen@cwi.nl>
parents: 10357
diff changeset
153
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
154 ([("Rect_ptr", "*", "ReturnMode")], # GetControlBounds
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
155 [("void", "*", "ReturnMode")]),
11531
8cfcd273fa5c Changes by Corran Webster to support {Get,Set}ControlData and
Jack Jansen <jack.jansen@cwi.nl>
parents: 10357
diff changeset
156
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
157 ([("DataBrowserListViewColumnDesc", "*", "OutMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
158 [("DataBrowserListViewColumnDesc", "*", "InMode")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
159
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
160 ([("ControlButtonContentInfoPtr", 'outContent', "InMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
161 [("ControlButtonContentInfoPtr", '*', "OutMode")]),
21461
3303f2d92cef Added support for tab controls and initial (incomplete) support
Just van Rossum <just@letterror.com>
parents: 21417
diff changeset
162
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
163 ([("ControlButtonContentInfo", '*', "OutMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
164 [("ControlButtonContentInfo", '*', "InMode")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
165
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
166 ([("ControlActionUPP", 'liveTrackingProc', "InMode")],
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
167 [("ControlActionUPPNewControl", 'liveTrackingProc', "InMode")]),
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
168 ]
2267
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
169
7411b6a06920 Committed a more or less working version.
Guido van Rossum <guido@python.org>
parents:
diff changeset
170 if __name__ == "__main__":
32736
c3a096bfbd6b Whitespace normalization, via reindent.py.
Tim Peters <tim.peters@gmail.com>
parents: 31091
diff changeset
171 main()