(define-extern test-function (function int int int int int))
(test-function 1 2 3 4)

  (let ((x 1)
	(y (test-function 1 2 3 4))
	(z 3))
    y)