Fix a possible memory leak in dtoa

nobu · nobu · commit 44693ee32990 · 2025-12-24T14:05:41.000+09:00
Fix rubyGH-15061
diff --git a/missing/dtoa.c b/missing/dtoa.c
@@ -547,10 +547,13 @@ Balloc(int k)
 }
 
 static void
-Bfree(Bigint *v)
+Bclear(Bigint **vp)
 {
-    FREE(v);
+    Bigint *v = *vp;
+    *vp = NULL;
+    if (v) FREE(v);
 }
+#define Bfree(v) Bclear(&(v))
 
 #define Bcopy(x,y) memcpy((char *)&(x)->sign, (char *)&(y)->sign, \
 (y)->wds*sizeof(Long) + 2*sizeof(int))

Original file line number	Diff line number	Diff line change
`@@ -547,10 +547,13 @@ Balloc(int k)`
`547`	`547`	`}`
`548`	`548`
`549`	`549`	`static void`
`550`		`-Bfree(Bigint *v)`
	`550`	`+Bclear(Bigint **vp)`
`551`	`551`	`{`
`552`		`- FREE(v);`
	`552`	`+ Bigint v = vp;`
	`553`	`+ *vp = NULL;`
	`554`	`+ if (v) FREE(v);`
`553`	`555`	`}`
	`556`	`+#define Bfree(v) Bclear(&(v))`
`554`	`557`
`555`	`558`	`#define Bcopy(x,y) memcpy((char )&(x)->sign, (char )&(y)->sign, \`
`556`	`559`	`(y)->wdssizeof(Long) + 2sizeof(int))`