[svn:parrot] r47302 - branches/gc_massacre/src/gc
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Wed Jun 2 13:32:27 UTC 2010
Author: mikehh
Date: Wed Jun 2 13:32:27 2010
New Revision: 47302
URL: https://trac.parrot.org/parrot/changeset/47302
Log:
add documentation
Modified:
branches/gc_massacre/src/gc/list.c
Modified: branches/gc_massacre/src/gc/list.c
==============================================================================
--- branches/gc_massacre/src/gc/list.c Wed Jun 2 13:21:07 2010 (r47301)
+++ branches/gc_massacre/src/gc/list.c Wed Jun 2 13:32:27 2010 (r47302)
@@ -29,6 +29,10 @@
=over 4
+=item C<struct Linked_List* Parrot_gc_allocate_linked_list(PARROT_INTERP)>
+
+Allocate a doubly link list
+
=cut
*/
@@ -44,6 +48,16 @@
return res;
}
+/*
+
+=item C<void Parrot_gc_destroy_linked_list(PARROT_INTERP, Linked_List* list)>
+
+Destroy the specified list (free up memory associated with the list)
+
+=cut
+
+*/
+
PARROT_EXPORT
void
Parrot_gc_destroy_linked_list(SHIM_INTERP, ARGMOD(Linked_List* list))
@@ -53,6 +67,17 @@
mem_sys_free(list);
}
+/*
+
+=item C<void Parrot_gc_list_append(PARROT_INTERP, Linked_List *list,
+List_Item_Header *item)>
+
+Append an item to the list
+
+=cut
+
+*/
+
PARROT_EXPORT
void
Parrot_gc_list_append(SHIM_INTERP, ARGMOD(Linked_List *list), ARGMOD(List_Item_Header *item))
@@ -77,6 +102,17 @@
#endif
}
+/*
+
+=item C<List_Item_Header* Parrot_gc_list_remove(PARROT_INTERP, Linked_List
+*list, List_Item_Header *item)>
+
+Remove an item from the list, returning the (pointer to) item
+
+=cut
+
+*/
+
PARROT_EXPORT
List_Item_Header*
Parrot_gc_list_remove(SHIM_INTERP, ARGMOD(Linked_List *list), ARGMOD(List_Item_Header *item))
@@ -105,6 +141,16 @@
return item;
}
+/*
+
+=item C<List_Item_Header* Parrot_gc_list_pop(PARROT_INTERP, Linked_List *list)>
+
+Pop an item off the list - i.e. get the first item in the list and remove it.
+
+=cut
+
+*/
+
PARROT_EXPORT
List_Item_Header*
Parrot_gc_list_pop(PARROT_INTERP, ARGIN(Linked_List *list))
@@ -116,6 +162,16 @@
return Parrot_gc_list_remove(interp, list, list->first);
}
+/*
+
+=item C<int Parrot_gc_list_check(PARROT_INTERP, Linked_List *list)>
+
+Check the validity of the list
+
+=cut
+
+*/
+
int
Parrot_gc_list_check(SHIM_INTERP, ARGIN(Linked_List *list))
{
@@ -135,6 +191,17 @@
return 1;
}
+/*
+
+=item C<int Parrot_gc_list_is_owned(PARROT_INTERP, Linked_List *list,
+List_Item_Header *item)>
+
+Returns True if the is owned by the list
+
+=cut
+
+*/
+
int
Parrot_gc_list_is_owned(SHIM_INTERP, ARGIN(Linked_List *list), ARGIN(List_Item_Header *item))
{
More information about the parrot-commits
mailing list