From 81ea62973900969c189e7fb6e53e787a7b4a8e1d Mon Sep 17 00:00:00 2001 From: Tom Harrison Date: Tue, 16 Apr 2024 22:27:09 +1000 Subject: [PATCH] [master] Add init for map node type so as to fix memory errors in insert. --- modules/map.dt | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/modules/map.dt b/modules/map.dt index 32b0da08..417c9f10 100644 --- a/modules/map.dt +++ b/modules/map.dt @@ -177,6 +177,12 @@ must also implement `LessThanComparable`. (struct extern ((first (uq Tk)) (second (uq Tv))))) + (def init + (fn extern bool ((val (ref (uq pairtypenode)))) + (memset (cast val (p void)) 0 (sizeof (uq pairtypenode))) + (init (:@ val first)) + (init (:@ val second)))) + (def setf-move-init (fn extern bool ((dst (p (uq pairtypenode))) (src (rv-ref (uq pairtypenode))))