diff scripttags.js @ 9:37d7f60a8ea1

Allow use of tabletproglang programs in script tags
author Mike Pavone <pavone@retrodev.com>
date Wed, 21 Mar 2012 21:15:32 -0700
parents
children 4d87c38404d6
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/scripttags.js	Wed Mar 21 21:15:32 2012 -0700
@@ -0,0 +1,21 @@
+
+function compileAndRun(src)
+{
+	var ast = parser.parse(src);
+	var js = ast.toJSModule();
+	mainModule = eval(js)();
+	mainModule.main();
+}
+
+onReady(function() {
+	var tags = qall('script[type="text/tabletprog"]');
+	for (var i = 0; i < tags.length; ++i) {
+		if (tags[i].src) {
+			get(tags[i].src, function(req) {
+				compileAndRun(req.responseText);
+			});
+		} else {
+			compileAndRun(tags[i].innerHTML);
+		}
+	}
+});