Changes in doc/generic_types/evaluation/cfa-stack.c [309be81:75ac87e]

File:

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

doc/generic_types/evaluation/cfa-stack.c

@@ -8 +8 @@
 
 forall(otype T) void ?{}(stack(T)* s) {
-        ?{}( s->head, 0 );
+        ?{}( &s->head, 0 );
 }
 
@@ -25 +25 @@
 
 forall(otype T) void push(stack(T)* s, T value) {
-        s->head = new( value, s->head );
+        s->head = ((stack_node(T)*)malloc()){ value, s->head };
 }