;
;	File:		TerminalsExtensions.a
;
;	Contains:	xxx put contents here xxx
;
;	Written by:	xxx put writers here xxx
;
;	Copyright:	© 1991 by Apple Computer, Inc., all rights reserved.
;
;	Change History (most recent first):
;
;		 <2>	 8/20/91	BH		move TMSetupCleanup from public interfaces
;		 <1>	 6/18/91	BH		first checked in
;
;	To Do:
;

	IF (&TYPE('TERMINALSEXTENSIONS') = 'UNDEFINED') THEN
TERMINALSEXTENSIONS		EQU		1

	IF (&TYPE('TERMINALS') = 'UNDEFINED') THEN
		INCLUDE		'Terminals.a'
	ENDIF

	IF (&TYPE('CTBUTILITIES') = 'UNDEFINED') THEN
		INCLUDE		'CTBUtilities.a'
	ENDIF

tmChooseNoChangeHandle	EQU		1
tmChooseNoDialog		EQU		2
tmChooseNoChangeTool	EQU		4

TMChooseRec	RECORD	0
reserved		ds.l	1
msg				ds.l	1
idleProc		ds.l	1
filterProc		ds.l	1
newTool			ds.b	64
newConfig		ds.l	1
eventProc		ds.l	1
TMChooseRecSize		EQU		*
	Endr
	
TMPChoose			EQU	$333
TMSetupItem			EQU	$31A
	MACRO
	_TMPChoose
	_CTBCall	#TMPChoose
	ENDM

	MACRO
	_TMSetupCleanup
	_CTBCall	#TMSetupCleanup
	ENDM

	ENDIF