[racket] kernel interpreter in racket

I'm trying to make a kernel interpreter in Racket, I've based the code on Qoppa (https://github.com/kmcallister/qoppa) 		 	   		  
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20130503/291875f9/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: kernel.rkt
Type: application/octet-stream
Size: 4001 bytes
Desc: not available
URL: <http://lists.racket-lang.org/users/archive/attachments/20130503/291875f9/attachment-0001.obj>