Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 05:06:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Need to zero out the malloced constructor results in case not all

Browse source 
fields are initialized.
This commit is contained in:
Alex Shinn 2011-08-09 00:31:09 +09:00
parent 3b44424140
commit ff884b7314
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tools/chibi-ffi
View file

@ -1093,6 +1093,8 @@
"));\n" "));\n"
" r = sexp_cpointer_value(res) = malloc(sizeof(" " r = sexp_cpointer_value(res) = malloc(sizeof("
(or (type-struct-type name) "") " " (type-name name) "));\n" (or (type-struct-type name) "") " " (type-name name) "));\n"
" memset(r, 0, sizeof("
(or (type-struct-type name) "") " " (type-name name) "));\n"
" sexp_freep(res) = 1;\n" " sexp_freep(res) = 1;\n"
(lambda () (lambda ()
(let lp ((ls args) (i 0)) (let lp ((ls args) (i 0))