
		; STKSIZE.A
		;
		; returns the size of available	stack, doesn't take into
		; account the stuff used by this routine.

		section	text,code
		xdef	_stksize

tc_SPLower	EQU	58
ThisTask	EQU	276

;Prototype	LONG	stksize(VOID);
_stksize:
		move.l	4.w,a0		    ; EXEC
		move.l	ThisTask(a0),a0	    ; me
		move.l	sp,d0
		sub.l	tc_SPLower(a0),d0   ; available	stack
		rts

