id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
701	require-extension has a hygiene problem	Alaric Snell-Pym		"It appears that require-extension doesn't work if you've locally rebound QUOTE:

{{{
alaric@ubuntu:~/personal/tmp$ cat test.scm 
(let ((quote 1))
     (require-extension aes))
alaric@ubuntu:~/personal/tmp$ csi -script test.scm

Error: unbound variable: aes

	Call history:

	<syntax>	  (let ((quote 1)) (require-extension aes))
	<syntax>	  (##core#let ((quote 1)) (require-extension aes))
	<syntax>	  (##core#begin (##core#require-extension (aes) #t))
	<syntax>	  (##core#require-extension (aes) #t)
	<syntax>	  (##core#begin (##core#begin (##core#begin (##sys#require (quote aes))) (import aes)) (##core#undefin......
	<syntax>	  (##core#begin (##core#begin (##sys#require (quote aes))) (import aes))
	<syntax>	  (##core#begin (##sys#require (quote aes)))
	<syntax>	  (##sys#require (quote aes))
	<syntax>	  (quote aes)
	<syntax>	  (import aes)
	<syntax>	  (import scheme chicken foreign extras)
	<syntax>	  (##core#undefined)
	<syntax>	  (##core#undefined)
	<syntax>	  (##core#undefined)
	<eval>	  (##sys#require (quote aes))
	<eval>	  (quote aes)	<--
alaric@ubuntu:~/personal/tmp$ csc test.scm
alaric@ubuntu:~/personal/tmp$ ./test 

Error: unbound variable: aes

	Call history:

	quote0	  	<--
}}}"	defect	closed	major		expander	4.7.x	wontfix