Adding missing emscripten files.

Fixes issue #247.
This commit is contained in:
Alex Shinn 2015-02-25 07:43:35 +09:00
parent 956b968ab4
commit f7be2d452e
3 changed files with 17 additions and 0 deletions

2
lib/chibi/emscripten.scm Normal file
View file

@ -0,0 +1,2 @@
(define (wait-on-event!) (%call/cc abort))

8
lib/chibi/emscripten.sld Normal file
View file

@ -0,0 +1,8 @@
(define-library (chibi emscripten)
(cond-expand
(emscripten
(import (chibi) (chibi ast))
(export eval-script! integer-eval-script string-eval-script
wait-on-event!)
(include "emscripten.scm")
(include-shared "emscripten"))))

View file

@ -0,0 +1,7 @@
(cond-expand
(emscripten
(c-system-include "emscripten.h")
(define-c void (eval-script! "emscripten_run_script") (string))
(define-c int (integer-eval-script "emscripten_run_script_int") (string))
(define-c string (string-eval-script "emscripten_run_script_string") (string))))