mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2024-12-29 07:29:15 +00:00
5b0f0cc134
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.
55 lines
852 B
OpenEdge ABL
55 lines
852 B
OpenEdge ABL
{
|
|
File: TerminalToolsPriv.p
|
|
|
|
Contains: xxx put contents here xxx
|
|
|
|
Written by: xxx put writers here xxx
|
|
|
|
Copyright: © 1990 by Apple Computer, Inc., all rights reserved.
|
|
|
|
Change History (most recent first):
|
|
|
|
<1> 3/14/90 BBH first checked in
|
|
|
|
To Do:
|
|
}
|
|
|
|
|
|
{$IFC UNDEFINED UsingIncludes}
|
|
{$SETC UsingIncludes := 0}
|
|
{$ENDC}
|
|
|
|
{$IFC NOT UsingIncludes}
|
|
UNIT TerminalToolsPriv;
|
|
INTERFACE
|
|
{$ENDC}
|
|
|
|
{$IFC UNDEFINED TerminalToolsPriv}
|
|
{$SETC TerminalToolsPriv := 1}
|
|
|
|
|
|
CONST
|
|
{ Private Terminal Tool Messages }
|
|
tmPeekLineMsg = 200;
|
|
|
|
TYPE
|
|
|
|
LineInfoH = ^LineInfoPtr;
|
|
LineInfoPtr = ^LineInfoRec;
|
|
LineInfoRec = RECORD
|
|
linePtr : Ptr;
|
|
lineSize : INTEGER;
|
|
attrPtr : Ptr;
|
|
attrSize : INTEGER;
|
|
lineAttrPtr : Ptr;
|
|
lineAttrSize : INTEGER;
|
|
END;
|
|
|
|
{$ENDC} { TerminalToolsPriv }
|
|
|
|
{$IFC NOT UsingIncludes}
|
|
END.
|
|
{$ENDC}
|
|
|
|
|