Changeset 8b001bd for doc/papers/general/evaluation/cfa-stack.c

Timestamp:

Mar 9, 2018, 1:08:32 PM (6 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, with_gc

Children:

3d8f2f8

Parents:

81e8ab0 (diff), e59f0bf (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

more changes

File:

• doc/papers/general/evaluation/cfa-stack.c (modified) (2 diffs)

doc/papers/general/evaluation/cfa-stack.c

@@ -6 +6 @@
         stack_node(T) * next;
 };
+
+forall( otype T ) void clear( stack(T) & s ) with( s ) {
+        for ( stack_node(T) * next = head; next; ) {
+                stack_node(T) * crnt = next;
+                next = crnt->next;
+                ^(*crnt){};
+                free(crnt);
+        }
+        head = 0;
+}
 
 forall( otype T ) void ?{}( stack(T) & s ) { (s.head){ 0 }; }
@@ -17 +27 @@
         }
         *crnt = 0;
-}
-
-forall( otype T ) void clear( stack(T) & s ) with( s ) {
-        for ( stack_node(T) * next = head; next; ) {
-                stack_node(T) * crnt = next;
-                next = crnt->next;
-                ^(*crnt){};
-                free(crnt);
-        }
-        head = 0;
 }