(bind-func init_sample_data (lambda () (set! vplay1 #f) (set! sampledata1dirty #f) (set! sampledata1 (malloc (* 3 600 400))) void))