boot3/Libs/InterfaceSrcs/lists.c
Elliot Nunn 5b0f0cc134 Bring in CubeE sources
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.
2017-12-26 10:02:57 +08:00

126 lines
2.6 KiB
C

/* Lists.c
*
* This form of glue requires linking to Interface.o, which seems
* goofy because we have glue jumping to glue. Someday it should
* be rewritten to go right to the correct trap.
*
* Modifications:
* 18 Jan 88 KLH lclick & lnew need explicit return statement for new c.
* 11 Feb 88 KLH Changed C headers to work with new C compiler:
* Changed to using standard glue in Interface.o, so
* much glue removed from CInterface.o.
* List manager changes include sending all mixed case
* calls to ROM or Interface.o. For calls passing Cells
* by reference (as they had been) we added the following
* calls:
* laddtocell
* lclrcell
* ldraw
* lfind
* lgetcell
* lnew
* lrect
* lsetcell
* lsetselect
* *** MPW 3.0d4 ***
*/
#include <types.h>
#include <quickdraw.h>
#include <windows.h>
#include <lists.h>
void laddtocell(dataPtr, dataLen, theCell, lHandle)
Ptr dataPtr;
short dataLen;
Cell *theCell;
ListHandle lHandle;
{
LAddToCell(dataPtr, dataLen, *theCell, lHandle);
}
void lcellsize(cSize, lHandle)
Point *cSize;
ListHandle lHandle;
{
LCellSize(*cSize, lHandle);
}
Boolean lclick(pt, modifiers, lHandle)
Point *pt;
short modifiers;
ListHandle lHandle;
{
return LClick(*pt, modifiers, lHandle);
}
void lclrcell(theCell, lHandle)
Cell *theCell;
ListHandle lHandle;
{
LClrCell(*theCell, lHandle);
}
void ldraw(theCell, lHandle)
Cell *theCell;
ListHandle lHandle;
{
LDraw(*theCell, lHandle);
}
void lfind( offset, len, theCell, lHandle)
short *len, *offset;
Cell *theCell;
ListHandle lHandle;
{
LFind( offset, len, *theCell, lHandle);
}
void lgetcell(dataPtr, dataLen, theCell, lHandle)
Ptr dataPtr;
short *dataLen;
Cell *theCell;
ListHandle lHandle;
{
LGetCell(dataPtr, dataLen, *theCell, lHandle);
}
ListHandle lnew(rView, dataBounds, cSize, theProc, theWindow, drawIt, HasGrow, ScrollHoriz, ScrollVert)
Rect *rView, *dataBounds;
Point *cSize;
short theProc;
WindowPtr theWindow;
Boolean drawIt;
Boolean HasGrow;
Boolean ScrollHoriz;
Boolean ScrollVert;
{
return LNew(rView, dataBounds, *cSize, theProc, theWindow, drawIt, HasGrow, ScrollHoriz, ScrollVert);
}
void lrect( cellRect, theCell, lHandle)
Rect *cellRect;
Cell *theCell;
ListHandle lHandle;
{
LRect( cellRect, *theCell, lHandle);
}
void lsetcell(dataPtr, dataLen, theCell, lHandle)
Ptr dataPtr;
short dataLen;
Cell *theCell;
ListHandle lHandle;
{
LSetCell(dataPtr, dataLen, *theCell, lHandle);
}
void lsetselect(setIt, theCell, lHandle)
Boolean setIt;
Cell *theCell;
ListHandle lHandle;
{
LSetSelect(setIt, *theCell, lHandle);
}