changes

[cdsspec-compiler.git] / benchmark / chase-lev-deque-bugfix / deque.h

diff --git a/benchmark/chase-lev-deque-bugfix/deque.h b/benchmark/chase-lev-deque-bugfix/deque.h
index f188a8fd9657c18888a4fcd93ab04a18eead3cc7..0e2fb2b269f7212f8c0d078784d65fce14d4a090 100644 (file)
--- a/benchmark/chase-lev-deque-bugfix/deque.h
+++ b/benchmark/chase-lev-deque-bugfix/deque.h
@@ -37,12 +37,15 @@ typedef struct {
         id_tag_t *tag;
         @InitVar:
             __deque = new_spec_list();
+                       model_print("init_list\n");
             tag = new_id_tag(); // Beginning of available id
                @Cleanup:
-                       if (__deque)
-                               free_spec_list(__deque);
+                       if (__deque) {
+                               //free_spec_list(__deque);
+                               model_print("free_list\n");
+                       }
                        if (tag)
-                               free_id_tag();
+                               free_id_tag(tag);
         @DefineFunc:
             tag_elem_t* new_tag_elem(call_id_t id, int data) {
                 tag_elem_t *e = (tag_elem_t*) CMODEL_MALLOC(sizeof(tag_elem_t));