Error: (#f) "during expansion of (define690 ...) - in `define' - lambda-list expected": ((define (ci 558179417 return: pointer:) ((lazy-ffi:function-ptr ((lazy-ffi:function (quote QueryInterface) (quote lazy-ffi:1488531163.05785775)) ci)) return: pointer:)))
Call history: 
<eval>   (rename661 (##core#syntax lazy-ffi:function-ptr))
<eval>   (##sys#cons (##sys#cons (##sys#cons (rename661 (##core#syntax lazy-ffi:function)) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))) (quote660 ())))) (##sys#cons ?name (quote660 ()))) (quote660 ()))
<eval>   (##sys#cons (##sys#cons (rename661 (##core#syntax lazy-ffi:function)) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))) (quote660 ())))) (##sys#cons ?name (quote660 ())))
<eval>   (##sys#cons (rename661 (##core#syntax lazy-ffi:function)) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))) (quote660 ()))))
<eval>   (rename661 (##core#syntax lazy-ffi:function))
<eval>   (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))) (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))) (quote660 ())))
<eval>   (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ())))
<eval>   (rename661 (##core#syntax quote))
<eval>   (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))
<eval>   (rename661 (##core#syntax QueryInterface))
<eval>   (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))) (quote660 ()))
<eval>   (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ())))
<eval>   (rename661 (##core#syntax quote))
<eval>   (##sys#cons (rename661 (##core#syntax lazy-ffi:1488531163.05785775)) (quote660 ()))
<eval>   (rename661 (##core#syntax lazy-ffi:1488531163.05785775))
<eval>   (##sys#cons ?name (quote660 ()))