You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

10 lines
266 B

fetch-text = (url) ->
(res) <- fetch url .then
res.text!
window.add-event-listener \load, (ev) !->
(prelude) <-! fetch-text 'prelude.f' .then
(index) <-! fetch-text 'index.f' .then
jsf = new JSFORTH
jsf.evaluate-lines prelude
jsf.evaluate-lines index