	; Some macros for embedding function names in assember code.
	; To embed names, 'Desk_AS_EMBED_FNNAMES' must be set to 1.
	; This can be done with:
	; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 1" ...
	; To turn off, use:
	; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 0" ...
	;
	; Julian Smith 19 Dec 1996
	
	
 	IF Desk_AS_EMBED_FNNAMES=1
		
		MACRO
		Desk_ASMacros_EMBED_FNNAME $name
		
$name.name
		DCB	"$name", 0
		ALIGN
$name.offset
		DCD	&ff000000 :OR: ($name.offset-$name.name)
		
		MEND
		
	ELSE
		
		MACRO
		Desk_ASMacros_EMBED_FNNAME $name
		MEND
		
	ENDIF
	
	MACRO
	Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME	$name
	EXPORT	$name
$name
	MEND
	
	
	MACRO
	Desk_ASMacros_EXTERNALFUNCTION	$name
	Desk_ASMacros_EMBED_FNNAME	$name
	Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME	$name
	MEND
	
	END
