From 8c7be4c3bbd6cfb35375dd8cadfd7e56f361c60c Mon Sep 17 00:00:00 2001
From: =?utf8?q?Alexis=20Laferri=C3=A8re?= <alexis.laf@xymus.net>
Date: Sat, 14 Jun 2014 07:27:48 -0400
Subject: [PATCH] emscripten: add general features to lib
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Signed-off-by: Alexis Laferrière <alexis.laf@xymus.net>
---
 lib/emscripten.nit |   13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lib/emscripten.nit b/lib/emscripten.nit
index 65fe1f4..7fc5e76 100644
--- a/lib/emscripten.nit
+++ b/lib/emscripten.nit
@@ -15,3 +15,16 @@
 # limitations under the License.
 
 module emscripten is platform
+
+`{
+	#include <emscripten.h>
+`}
+
+redef class String
+	fun run_js do run_js_native(self.escape_to_js.to_cstring)
+	private fun run_js_native(script: NativeString) `{ emscripten_run_script(script); `}
+
+	fun escape_to_js: String do return self.replace('\n', "\\n")
+
+	fun alert do "alert('{self.escape_to_js}')".run_js
+end
-- 
1.7.9.5