From 17102697e9937a1f74ce7fbda368d92521639cb8 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Mon, 16 Jul 2018 23:33:00 +0800 Subject: [PATCH] no need to zero out calloc result in ffi --- tools/chibi-ffi | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/tools/chibi-ffi b/tools/chibi-ffi index 13f1f12a..e30f39f2 100755 --- a/tools/chibi-ffi +++ b/tools/chibi-ffi @@ -1233,11 +1233,12 @@ "*sizeof(tmp" (type-index a) "[0])")) (lambda () (cat "sizeof(tmp" (type-index a) "[0])"))) ");\n" - (lambda () - (if (and (symbol? len) (not (eq? len 'null))) - (cat " tmp" (type-index a) "[" - (lambda () (scheme->c-converter 'unsigned-int len)) - "*sizeof(tmp" (type-index a) "[0])] = 0;\n")))))) + ;; (lambda () + ;; (if (and (symbol? len) (not (eq? len 'null))) + ;; (cat " tmp" (type-index a) "[" + ;; (lambda () (scheme->c-converter 'unsigned-int len)) + ;; "*sizeof(tmp" (type-index a) "[0])] = 0;\n"))) + ))) ((and (type-result? a) (type-value a)) (cat " tmp" (type-index a) " = " (lambda () (write-value func (type-value a))) ";\n"))