(bind-func test_g_ptr0 (lambda () (let ((sum 0.0) (i 0)) (dotimes (i 10) (pset! g_ptr0 i (i64tod i)) (set! sum (+ sum (pref g_ptr0 i)))) sum)))