:bug: Fix match map

diff --git a/include/match.h b/include/match.h
index dbdb6a2f99610e7c6f38528c6f577f64c75d8943..d28f5381687617b70231bfc9b38dc3b9a6187e67 100644 (file)
--- a/include/match.h
+++ b/include/match.h
@@ -7,11 +7,13 @@ struct Match_ {
 
 ANN static inline void match_map(struct Match_ * const match, Exp e) {
   const Map map = &match->map;
+  Exp next = NULL;
   map_init(map);
   do {
+    next = e->next;
     e->next = NULL;
     map_set(map, (vtype)e, 0);
-  } while((e = e->next));
+  } while((e = next));
 }
 
 ANN static inline void match_unmap(struct Match_ * const match) {