mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2025-01-14 21:29:53 +00:00
4325cdcc78
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included. The Tools directory, containing mostly junk, is also excluded.
84 lines
3.0 KiB
Plaintext
84 lines
3.0 KiB
Plaintext
;
|
|
; File: TextEditInit.a
|
|
;
|
|
; Contains: More cutback code for TextEdit. To be included in TextEditPatch.a
|
|
;
|
|
; Written by: Sue Bartalo
|
|
;
|
|
; Copyright: © 1990 by Apple Computer, Inc., all rights reserved.
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <5> 8/14/90 DTY Changed to linked patch.
|
|
; <4> 7/10/90 SMB NEEDED for 7.0 & SIXPACK: Must import GestaltTEVersion.
|
|
; <3> 7/10/90 SMB NEEDED for 7.0 & SIXPACK: Oops! Shouldn't cutback
|
|
; GestaltTEVersion!
|
|
; <2> 6/22/90 SMB NEEDED FOR SIXPACK & 7.0! (only added this comment!)
|
|
; <1> 6/22/90 SMB New! Added so that this code could also be cutback in 'ptch' 0.
|
|
;
|
|
;___________________________________________________________________________________________________
|
|
; To Do:
|
|
;___________________________________________________________________________________________________
|
|
|
|
IF SysVers>= $606 THEN
|
|
|
|
INCLUDE 'SysPrivateEqu.a'
|
|
INCLUDE 'GestaltEqu.a' ; <18Aug89smb>
|
|
|
|
Blanks On
|
|
String AsIs
|
|
|
|
|
|
TextEditInit Proc Export
|
|
|
|
Export TEGlobalInit
|
|
Import GestaltTEVersion ; <4>
|
|
|
|
;----------------------------------------------------------------------
|
|
;
|
|
; PROCEDURE TEGlobalInit
|
|
; <27June89smb>
|
|
;
|
|
; To be called from StartInit, in order to assign vectors
|
|
; and clear expandMem globals only once.
|
|
;
|
|
;----------------------------------------------------------------------
|
|
TEGlobalInit
|
|
; when TextEdit 3.0 is ptch0, need this code
|
|
move.l #gestaltTextEditVersion, d0 ; <8Aug89smb>
|
|
leaResident GestaltTEVersion, a0
|
|
_NewGestalt
|
|
rts
|
|
|
|
EndProc
|
|
|
|
MakePatch xDoErase,ExpandMemRec.vDoErase
|
|
MakePatch xCaretDisplay,ExpandMemRec.vCaretDisplay
|
|
MakePatch xGetLRPosition,ExpandMemRec.vGetLRPosition
|
|
MakePatch xGetRLPosition,ExpandMemRec.vGetRLPosition
|
|
MakePatch xOnLineEnd,ExpandMemRec.vOnLineEnd
|
|
MakePatch xCaretInsideRun,ExpandMemRec.vCaretInsideRun
|
|
MakePatch xSetDirection,ExpandMemRec.vSetDirection
|
|
MakePatch xGetDirection,ExpandMemRec.vGetDirection
|
|
MakePatch xGetStylesInOrder,ExpandMemRec.vGetStylesInOrder
|
|
MakePatch xteGetFormatOrder,ExpandMemRec.vteGetFormatOrder
|
|
MakePatch xGetWidth,ExpandMemRec.vGetWidth
|
|
MakePatch xGetCurScript,ExpandMemRec.vGetCurScript
|
|
MakePatch xOnSameLine,ExpandMemRec.vOnSameLine
|
|
MakePatch xMeasureWidth,ExpandMemRec.vMeasureWidth
|
|
MakePatch xMeasureWholeRun,ExpandMemRec.vMeasureWholeRun
|
|
MakePatch xHiliteLineEnds,ExpandMemRec.vHiliteLineEnds
|
|
MakePatch xInvrtRectangle,ExpandMemRec.vInvrtRectangle
|
|
MakePatch xPixelWidths,ExpandMemRec.vPixelWidths
|
|
MakePatch xTEBufferText,ExpandMemRec.vTEBufferText
|
|
MakePatch xDumpBuffer,ExpandMemRec.vDumpBuffer
|
|
MakePatch xCursorMovement,ExpandMemRec.vCursorMovement
|
|
MakePatch xTestRunDirection,ExpandMemRec.vTestRunDirection
|
|
MakePatch xBufferChar,ExpandMemRec.vBufferChar
|
|
MakePatch xSetFont2Keyboard,ExpandMemRec.vSetFont2Keyboard
|
|
MakePatch xSetKeyboard2Font,ExpandMemRec.vSetKeyboard2Font
|
|
MakePatch xStyleGuts,ExpandMemRec.vStyleGuts
|
|
MakePatch xConcatRuns,ExpandMemRec.vConcatRuns
|
|
|
|
ENDIF ; IF SysVers>= $606
|