teach decompiler about literal prims from `#%futures'

original commit: 9be0559936
This commit is contained in:
Matthew Flatt 2010-08-25 14:48:22 -06:00
parent 4b9635cb70
commit 03593e433b

View File

@ -16,6 +16,7 @@
(namespace-require ''#%kernel) (namespace-require ''#%kernel)
(namespace-require ''#%unsafe) (namespace-require ''#%unsafe)
(namespace-require ''#%flfxnum) (namespace-require ''#%flfxnum)
(namespace-require ''#%futures)
(for/list ([l (namespace-mapped-symbols)]) (for/list ([l (namespace-mapped-symbols)])
(cons l (with-handlers ([exn:fail? (lambda (x) #f)]) (cons l (with-handlers ([exn:fail? (lambda (x) #f)])
(compile l))))))] (compile l))))))]