lib/emscripten.nit

   1 # This file is part of NIT ( http://www.nitlanguage.org ).
   2 #
   3 # Copyright 2014 Alexis Laferrière <alexis.laf@xymus.net>
   4 #
   5 # Licensed under the Apache License, Version 2.0 (the "License");
   6 # you may not use this file except in compliance with the License.
   7 # You may obtain a copy of the License at
   8 #
   9 #     http://www.apache.org/licenses/LICENSE-2.0
  10 #
  11 # Unless required by applicable law or agreed to in writing, software
  12 # distributed under the License is distributed on an "AS IS" BASIS,
  13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14 # See the License for the specific language governing permissions and
  15 # limitations under the License.
  16
  17 module emscripten is platform
  18
  19 `{
  20         #include <emscripten.h>
  21         #include <gc.h>
  22 `}
  23
  24 redef class String
  25         fun run_js do run_js_native(self.escape_to_js.to_cstring)
  26         private fun run_js_native(script: NativeString) `{ emscripten_run_script(script); `}
  27
  28         fun escape_to_js: String do return self.replace('\n', "\\n")
  29
  30         fun alert do "alert('{self.escape_to_js}')".run_js
  31 end
  32
  33 redef class Sys
  34         redef fun force_garbage_collection `{ GC_FORCE_COLLECT(); `}
  35
  36         # The emscripten GC *must* be manually invoked, it will not act by itself
  37         fun suggest_garbage_collection `{ GC_MAYBE_COLLECT(); `}
  38 end