Welcome to the CHICKEN Scheme pasting service

Test egg bug? pasted by hanDerPeder on Wed Jun 4 19:37:58 2014

(let ((foo '((bar . 2))))
  (test '((bar . 2)) foo))

=>

Error: during expansion of (test-syntax-error3412 ...) - no rule matches form: (test-syntax-error (quote test) "the test expression should come last " (test "some text" (quote ((bar . 2))) foo))

	Call history:

	<syntax>	  (let ((foo (quote ((bar . 2))))) (test "some text" (quote ((bar . 2))) foo))
	<syntax>	  (##core#let ((foo (quote ((bar . 2))))) (test "some text" (quote ((bar . 2))) foo))	<--
[ permalink | raw ]

simpler example added by hanDerPeder on Thu Jun 5 09:50:06 2014

(let ((x 'a))
  (test 'a x))

=>

Error: during expansion of (test-syntax-error1043 ...) - no rule matches form: (test-syntax-error (quote test) "the test expression should come last " (test #f (quote a) a))

	Call history:

	<syntax>	  (let ((a (quote a))) (test (quote a) a))
	<syntax>	  (##core#let ((a (quote a))) (test (quote a) a))	<--
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which egg implements the CHICKEN wiki?
Visually impaired? Let me spell it for you (wav file) download WAV