;
; dynAnchor.sh
;
; Useful handle RMA allocation for dynamite
;
; © 1994 Straylight
;

;----- Overview -------------------------------------------------------------
;
; Functions provided:
;
;   danc_alloc
;   danc_free
;   danc_quit

; --- danc_alloc ---
;
; On entry:	--
;
; On exit:	R0 == pointer to block allocated, or V set and pointer to
;		      error
;
; Use:		Allocates an anchor to use with dynamite from the RMA,
;		in a very quick way indeed.

		IMPORT	danc_alloc

; --- danc_free ---
;
; On entry:	R0 == pointer to block
;
; On exit:	Registers preserved
;
; Use:		Frees an anchor allocated using danc_alloc.

		IMPORT	danc_free

; --- danc_quit ---
;
; On entry:	--
;
; On exit:	--
;
; Use:		Frees everyone's anchors nicely when the module quits.

		IMPORT	danc_quit

;----- That's all, folks ----------------------------------------------------

		END