1 files changed, 111 insertions, 0 deletions
diff --git a/runtime/tests/testll64.c b/runtime/tests/testll64.c
new file mode 100644
index 00000000..bfe4ae94
--- /dev/null
+++ b/runtime/tests/testll64.c
@@ -0,0 +1,111 @@
+#include "test.h"
+
+/* testll64.c - DO NOT EDIT without updating the expected results in map.test. */
+
+/* 
+   key - long,long
+   val - INT64
+
+   Testing circular buffers, set, get 
+*/
+
+int main ()
+{
+  struct map_node_int64 *ptr;
+  MAP mymap = map_new(4, INT64);
+
+  map_key_long_long (mymap, 1,1);
+  map_set_int64 (mymap, 1);
+  map_key_long_long (mymap, 1,2);
+  map_set_int64 (mymap, 2);
+  map_key_long_long (mymap, 2,1);
+  map_set_int64 (mymap, 3);
+
+  map_key_long_long (mymap, 1,1);
+  printf ("mymap[1,1]=%ld\n", map_get_int64(mymap));
+  map_key_long_long (mymap, 1,2);
+  printf ("mymap[1,2]=%ld\n", map_get_int64(mymap));
+  map_key_long_long (mymap, 2,1);
+  printf ("mymap[2,1]=%ld\n", map_get_int64(mymap));
+
+#if 0
+  map_key_long (mymap, 42);
+  map_set_int64 (mymap, 83);
+
+  map_key_long (mymap, 101);
+  map_set_int64 (mymap, 202);
+  /* at this point, we have 1, 42, and 101 in the array */
+
+  printf ("mymap[%d]=%ld  ", 101, map_get_int64(mymap));
+  map_key_long (mymap, 1);  
+  printf ("mymap[%d]=%ld  ", 1, map_get_int64(mymap));
+  map_key_long (mymap, 42);
+  printf ("mymap[%d]=%ld\n", 42, map_get_int64(mymap));
+
+  map_set_int64 (mymap, 84);  
+  printf ("mymap[%d]=%ld\n", 42, map_get_int64(mymap));
+
+  /* now try to confuse things */
+  /* These won't do anything useful, but shouldn't crash */
+  map_key_long (mymap, 0);  
+  map_key_del (mymap);
+  map_key_long (mymap, 77);  
+  map_key_del (mymap);
+  map_key_del (mymap);
+  map_set_int64 (mymap,1000000);
+
+  /* create and delete a key */
+  map_key_long (mymap, 1024);
+  map_set_int64 (mymap, 2048);  
+  map_key_long (mymap, 1024);
+  printf ("mymap[%d]=%ld\n", 1024, map_get_int64(mymap));
+  map_key_del (mymap);
+  printf ("mymap[%d]=%ld\n", 1024, map_get_int64(mymap));
+  map_key_long (mymap, 10);
+  printf ("mymap[%d]=%ld\n", 10, map_get_int64(mymap));
+
+  printf ("\n");
+  for (ptr = (struct map_node_int64 *)map_start(mymap); ptr; 
+       ptr = (struct map_node_int64 *)map_iter (mymap, (struct map_node *)ptr))
+    printf ("mymap[%ld] = %d\n", ptr->key1.val, (int)ptr->val);
+
+
+  printf ("\n");
+  map_key_long (mymap, 1);   map_key_del (mymap);
+  for (ptr = (struct map_node_int64 *)map_start(mymap); ptr; 
+       ptr = (struct map_node_int64 *)map_iter (mymap, (struct map_node *)ptr))
+    printf ("mymap[%ld] = %d\n", ptr->key1.val, (int)ptr->val);
+
+  printf ("\n");
+  map_key_long (mymap, 42);   map_key_del (mymap);
+  for (ptr = (struct map_node_int64 *)map_start(mymap); ptr; 
+       ptr = (struct map_node_int64 *)map_iter (mymap, (struct map_node *)ptr))
+    printf ("mymap[%ld] = %d\n", ptr->key1.val, (int)ptr->val);
+
+
+  printf ("\n");
+  map_key_long (mymap, 101);   map_key_del (mymap);
+  for (ptr = (struct map_node_int64 *)map_start(mymap); ptr; 
+       ptr = (struct map_node_int64 *)map_iter (mymap, (struct map_node *)ptr))
+    printf ("mymap[%ld] = %d\n", ptr->key1.val, (int)ptr->val);
+  
+  printf ("\n");
+
+  map_key_long (mymap, 10); map_set_int64 (mymap, 20);
+  printf ("mymap[%d]=%ld\n", 10, map_get_int64(mymap));
+
+  /* add 4 new entries, pushing "10" out */
+  int i;
+  for (i = 0; i < 4; i++)
+    {
+      map_key_long (mymap, i);
+      map_set_int64 (mymap, 100 + 2 * i);
+    }
+#endif
+
+  for (ptr = (struct map_node_int64 *)map_start(mymap); ptr; 
+       ptr = (struct map_node_int64 *)map_iter (mymap, (struct map_node *)ptr))
+    printf ("mymap[%ld,%ld] = %d\n", key1int(ptr), key2int(ptr),(int)ptr->val);
+
+  return 0;
+}