{ File: ToolIntf.p As of MPW 3.0, interface files were reorganized to more closely match "Inside Macintosh" reference books and be more consistant from language to language. Interfaces for the Macintosh toolbox calls are now found in the files included below. This file is provided for compatibility with old sources. Pascal Interface to the Macintosh Libraries Copyright Apple Computer, Inc. 1988 All Rights Reserved } {$IFC UNDEFINED UsingIncludes} {$SETC UsingIncludes := 0} {$ENDC} {$IFC NOT UsingIncludes} UNIT ToolIntf; INTERFACE {$ENDC} {$IFC UNDEFINED UsingToolIntf} {$SETC UsingToolIntf := 1} {$I+} {$SETC ToolIntfIncludes := UsingIncludes} {$SETC UsingIncludes := 1} {$IFC UNDEFINED UsingEvents} {$I $$Shell(PInterfaces)Events.p} {$ENDC} {$IFC UNDEFINED UsingControls} {$I $$Shell(PInterfaces)Controls.p} {$ENDC} {$IFC UNDEFINED UsingDesk} {$I $$Shell(PInterfaces)Desk.p} {$ENDC} {$IFC UNDEFINED UsingWindows} {$I $$Shell(PInterfaces)Windows.p} {$ENDC} {$IFC UNDEFINED UsingTextEdit} {$I $$Shell(PInterfaces)TextEdit.p} {$ENDC} {$IFC UNDEFINED UsingDialogs} {$I $$Shell(PInterfaces)Dialogs.p} {$ENDC} {$IFC UNDEFINED UsingFonts} {$I $$Shell(PInterfaces)Fonts.p} {$ENDC} {$IFC UNDEFINED UsingLists} {$I $$Shell(PInterfaces)Lists.p} {$ENDC} {$IFC UNDEFINED UsingMenus} {$I $$Shell(PInterfaces)Menus.p} {$ENDC} {$IFC UNDEFINED UsingResources} {$I $$Shell(PInterfaces)Resources.p} {$ENDC} {$IFC UNDEFINED UsingScrap} {$I $$Shell(PInterfaces)Scrap.p} {$ENDC} {$IFC UNDEFINED UsingToolUtils} {$I $$Shell(PInterfaces)ToolUtils.p} {$ENDC} {$SETC UsingIncludes := ToolIntfIncludes} {$ENDC} { UsingToolIntf } {$IFC NOT UsingIncludes} END. {$ENDC}