diff --git a/DataStr/List.cpp b/DataStr/List.cpp
index 0b88e988c963453b15e85c30dc1ed12f39bf290d..c2b541a5f8fc191210080ccf622c8e5a78b3643b 100644
--- a/DataStr/List.cpp
+++ b/DataStr/List.cpp
@@ -1,4 +1,4 @@
-/* $Id: List.cpp,v 1.6 2000-11-26 18:43:48 geuzaine Exp $ */
+/* $Id: List.cpp,v 1.7 2000-11-27 10:58:45 geuzaine Exp $ */
 
 #include <stdlib.h>
 #include <stdio.h>
@@ -149,6 +149,11 @@ void *List_Pointer_NoChange(List_T *liste, int index)
   return(&liste->array[index * liste->size]);
 }
 
+void *List_Pointer_Fast(List_T *liste, int index)
+{
+  return(&liste->array[index * liste->size]);
+}
+
 void List_Sort(List_T *liste, int (*fcmp)(const void *a, const void *b))
 {
   qsort(liste->array,liste->n,liste->size,fcmp);
diff --git a/DataStr/List.h b/DataStr/List.h
index 95d1c1d318336ed513564a1c13f0d00755ac3d11..21400802fa623d14ca046402506641edf1ba6747 100644
--- a/DataStr/List.h
+++ b/DataStr/List.h
@@ -1,4 +1,4 @@
-/* $Id: List.h,v 1.4 2000-11-26 15:43:45 geuzaine Exp $ */
+/* $Id: List.h,v 1.5 2000-11-27 10:58:45 geuzaine Exp $ */
 #ifndef _LIST_H_
 #define _LIST_H_
 
@@ -29,6 +29,7 @@ void    List_Put(List_T *liste, int index, void *data);
 void    List_Pop(List_T *liste);
 void   *List_Pointer(List_T *liste, int index);
 void   *List_Pointer_NoChange(List_T *liste, int index);
+void   *List_Pointer_Fast(List_T *liste, int index);
 void    List_Sort(List_T *liste, int (*fcmp)(const void *a, const void *b));
 int     List_Search(List_T *liste, void *data, int (*fcmp)(const void *a, const void *b));
 int     List_ISearch(List_T *liste, void *data, int (*fcmp)(const void *a, const void *b));