Welcome to the CHICKEN Scheme pasting service

still barfing added by kevinfish on Fri Mar 3 10:21:50 2017


(cpuid  ci #x21452459  return: pointer:)

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




Error: (#f) "during expansion of (define690 ...) - in `define' - lambda-list expected": ((define (ci 558179417) ((lazy-ffi:function-ptr ((lazy-ffi:function (quote QueryInterface) (quote lazy-ffi:1488532850.06748959)) ci)) return: pointer:)))
Call history: 
   (rename661 (##core#syntax lazy-ffi:function-ptr))
   (##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:1488532850.06748959)) (quote660 ()))) (quote660 ())))) (##sys#cons ?name (quote660 ()))) (quote660 ()))
   (##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:1488532850.06748959)) (quote660 ()))) (quote660 ())))) (##sys#cons ?name (quote660 ())))
   (##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:1488532850.06748959)) (quote660 ()))) (quote660 ()))))
   (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:1488532850.06748959)) (quote660 ()))) (quote660 ())))
   (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ())))
   (rename661 (##core#syntax quote))
   (##sys#cons (rename661 (##core#syntax QueryInterface)) (quote660 ()))
   (rename661 (##core#syntax QueryInterface))
   (##sys#cons (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488532850.06748959)) (quote660 ()))) (quote660 ()))
   (##sys#cons (rename661 (##core#syntax quote)) (##sys#cons (rename661 (##core#syntax lazy-ffi:1488532850.06748959)) (quote660 ())))
   (rename661 (##core#syntax quote))
   (##sys#cons (rename661 (##core#syntax lazy-ffi:1488532850.06748959)) (quote660 ()))
   (rename661 (##core#syntax lazy-ffi:1488532850.06748959))
   (##sys#cons ?name (quote660 ()))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which one-argument R5RS procedure returns 1 when given `'(1 2 3)' as input?
Visually impaired? Let me spell it for you (wav file) download WAV