New lookup-reloadable-entry-point interface.

This commit is contained in:
Tony Garnock-Jones 2014-11-14 18:24:02 -05:00
parent f3e297d1da
commit d6ce78e728

View File

@ -32,10 +32,10 @@
(poll-signal "../signals/.fetchindex"
"Index refresh signal received"
(reloadable-entry-point->procedure
(lookup-reloadable-entry-point 'refresh-packages!)))
(lookup-reloadable-entry-point 'refresh-packages! "packages.rkt")))
(poll-signal "../signals/.rerender"
"Static rerender request received"
(reloadable-entry-point->procedure
(lookup-reloadable-entry-point 'rerender-all!)))
(lookup-reloadable-entry-point 'rerender-all! "site.rkt")))
(sleep 0.5)
(loop)))))