/*
    (C) 1995-96 AROS - The Amiga Replacement OS
    $Id: setlocalitempurge.c,v 1.1 1997/02/03 16:44:28 digulla Exp $

    Desc:
    Lang: english
*/
#include "iffparse_intern.h"

/*****************************************************************************

    NAME */
#include <proto/iffparse.h>

	AROS_LH2(void, SetLocalItemPurge,

/*  SYNOPSIS */
	AROS_LHA(struct LocalContextItem *, localItem, A0),
	AROS_LHA(struct Hook             *, purgeHook, A1),

/*  LOCATION */
	struct Library *, IFFParseBase, 33, IFFParse)

/*  FUNCTION
	Inserts a custom purge hook for the given local context item.
	The purge hook will be freed when the system wants to delete a local
	context item.

    INPUTS
	localItem  -  pointer to a local context item.
	purgeHook  -  pointer to a hook sructure initialized with the purge function.

    RESULT

    NOTES
	The purgehook must call FreeLocalItem() on the local context item after
	doing its own resource freeing.


    EXAMPLE

    BUGS

    SEE ALSO
	AllocLocalItem(), FreeLocalItem()

    INTERNALS

    HISTORY
  27-11-96    digulla automatically created from
	  iffparse_lib.fd and clib/iffparse_protos.h

*****************************************************************************/
{
    AROS_LIBFUNC_INIT
    AROS_LIBBASE_EXT_DECL(struct Library *,IFFParseBase)

    /* Self - explaining */
    GetIntLCI(localItem)->lci_PurgeHook = purgeHook;

    return;

    AROS_LIBFUNC_EXIT
} /* SetLocalItemPurge */