Various small fixes. The demo now starts to limp along.

This commit is contained in:
Jack Jansen 2001-07-14 14:00:50 +00:00
parent e1608529d1
commit f0ded2f0bc
3 changed files with 36 additions and 2 deletions

View File

@ -191,7 +191,7 @@ static PyObject *TXNObj_TXNAdjustCursor(TXNObjectObject *_self, PyObject *_args)
RgnHandle ioCursorRgn;
PyMac_PRECHECK(TXNAdjustCursor);
if (!PyArg_ParseTuple(_args, "O&",
ResObj_Convert, &ioCursorRgn))
OptResObj_Convert, &ioCursorRgn))
return NULL;
TXNAdjustCursor(_self->ob_itself,
ioCursorRgn);

View File

@ -37,13 +37,42 @@ class MyScanner(Scanner_OSX):
return classname, listname
def writeinitialdefs(self):
self.defsfile.write("def FOUR_CHAR_CODE(x): return x\n")
self.defsfile.write("""
def FOUR_CHAR_CODE(x): return x
false = 0
true = 1
kTXNClearThisControl = 0xFFFFFFFF
kTXNClearTheseFontFeatures = 0x80000000
kTXNDontCareTypeSize = 0xFFFFFFFF
kTXNDecrementTypeSize = 0x80000000
kTXNUseCurrentSelection = 0xFFFFFFFF
kTXNStartOffset = 0
kTXNEndOffset = 0x7FFFFFFF
MovieFileType = FOUR_CHAR_CODE('moov')
""")
def makeblacklistnames(self):
return [
"TXNGetFontDefaults", # Arg is too difficult
"TXNSetFontDefaults", # Arg is too difficult
"TXNInitTextension", # done manually
# Constants with funny definitions
"kTXNClearThisControl",
"kTXNClearTheseFontFeatures",
"kTXNDontCareTypeSize",
"kTXNDecrementTypeSize",
"kTXNUseCurrentSelection",
"kTXNStartOffset",
"kTXNEndOffset",
"kTXNQDFontNameAttributeSize",
"kTXNQDFontFamilyIDAttributeSize",
"kTXNQDFontSizeAttributeSize",
"kTXNQDFontStyleAttributeSize",
"kTXNQDFontColorAttributeSize",
"kTXNTextEncodingAttributeSize",
"status",
"justification",
]
def makegreylist(self):
@ -84,6 +113,10 @@ class MyScanner(Scanner_OSX):
# In buffers are passed as void *
([("void", "*", "OutMode"), ("ByteCount", "*", "InMode")],
[("MlteInBuffer", "*", "InMode")]),
# The AdjustCursor region handle is optional
([("RgnHandle", "ioCursorRgn", "InMode")],
[("OptRgnHandle", "*", "*")])
]
if __name__ == "__main__":

View File

@ -107,6 +107,7 @@ TXNBackgroundType = Type("TXNBackgroundType", "l")
DragReference = OpaqueByValueType("DragReference", "DragObj")
DragTrackingMessage = Type("DragTrackingMessage", "h")
RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
OptRgnHandle = OpaqueByValueType("RgnHandle", "OptResObj")
GWorldPtr = OpaqueByValueType("GWorldPtr", "GWorldObj")
MlteInBuffer = VarInputBufferType('void *', 'ByteCount', 'l')