opal 0.0.1

data/runtime/compar.js

@@ -0,0 +1,73 @@
+/* 
+ * compar.js
+ * opal
+ * 
+ * Created by Adam Beynon.
+ * Copyright 2010 Adam Beynon.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ * 
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ * 
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ */
+
+
+var rb_mComparable;
+
+function rb_cmp_equal(x, y) {
+  if (x == y) return true;
+  // rescue..
+}
+
+function rb_cmp_gt(x, y) {
+  var c = rb_funcall(x, "<=>", 1, y);
+  if (c > 0) return true;
+  return false;
+}
+
+function rb_cmp_ge(x, y) {
+  var c = rb_funcall(x, "<=>", 1, y);
+  if (c >= 0) return true;
+  return false;
+}
+
+function rb_cmp_lt(x, y) {
+  var c = rb_funcall(x, "<=>", 1, y);
+  if (c < 0) return true;
+  return false;
+}
+
+function rb_cmp_le(x, y) {
+  var c = rb_funcall(x, "<=>", 1, y);
+  if (c <= 0) return true;
+  return false;
+}
+
+function rb_cmp_between(obj, min, max) {
+  if (RTEST(rb_cmp_lt(obj, min))) return false;
+  if (RTEST(rb_cmp_gt(obj, max))) return false;
+  return true;
+}
+
+function Init_Comparable() {
+  rb_mComparable = rb_define_module("Comparable");
+  rb_define_method(rb_mComparable, "==", rb_cmp_equal, 1);
+  rb_define_method(rb_mComparable, ">", rb_cmp_gt, 1);
+  rb_define_method(rb_mComparable, ">=", rb_cmp_ge, 1);
+  rb_define_method(rb_mComparable, "<", rb_cmp_lt, 1);
+  rb_define_method(rb_mComparable, "<=", rb_cmp_le, 1);
+  rb_define_method(rb_mComparable, "between?", rb_cmp_between, 2);
+}

data/runtime/dir.js

@@ -0,0 +1,115 @@
+/* 
+ * dir.js
+ * opal
+ * 
+ * Created by Adam Beynon.
+ * Copyright 2010 Adam Beynon.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ * 
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ * 
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ */
+
+
+var rb_cDir;
+
+// glob
+// /^\/app\/.*\/charles\/[^\/]*\.rb$/
+//   \/app\/.*\/[^\/]*\.rb
+function rb_dir_s_glob(argc, argv, dir) {
+  if (argc > 1) throw "unsupported Dir.glob.. FIXME"
+  
+  var result = [], eof = false;
+  
+  var scanner = new vn_ruby_string_scanner(argv[0]);
+  while (!eof) {
+    // ** does not HAVE to include a dir, so capture **/ to match .* which will
+    // match a dir, or no dir.. allows both to work together.
+    if (scanner.scan(/^\*\*\//)) {
+      result.push('.*');
+    }
+    else if (scanner.scan(/^\*\*/)) {
+      result.push('.*');
+    }
+    else if (scanner.scan(/^\//)) {
+      result.push('\\/');
+    }
+    else if (scanner.scan(/^\*/)) {
+      result.push('[^\\/]*');
+    }
+    else if (scanner.scan(/^[a-zA-Z_]+/)) {
+      result.push(scanner.matched);
+    }
+    else if (scanner.scan(/^\./)) {
+      result.push('\\.');
+    }
+    else {
+      eof = true;
+    }
+    // if (result.length > 108)
+    // throw result.join("") + scanner.peek(10);
+  }
+  
+  var reg =  new RegExp('^' + result.join("") + '$');
+  var matching = [];
+  for (prop in vn_fs_path_hash) {
+    if (reg.exec(prop)) {
+      matching.push(prop);
+    }
+  }
+  return matching;
+}
+
+function Init_Dir() {
+  
+  rb_cDir = rb_define_class("Dir", rb_cObject);
+  // rb_include_module(rb_cDir, rb_mEnumerable);
+  
+  // rb_define_alloc_func(rb_cDir, rb_dir_s_alloc);
+  // rb_define_singleton_method(rb_cDir, "open", rb_dir_s_open, -1);
+  // rb_define_singleton_method(rb_cDir, "foreach", rb_dir_foreach, -1);
+  // rb_define_singleton_method(rb_cDir, "entries", rb_dir_entries, -1);
+  // 
+  // rb_define_method(rb_cDir,"initialize", rb_dir_initialize, -1);
+  // rb_define_method(rb_cDir,"path", rb_dir_path, 0);
+  // rb_define_method(rb_cDir,"inspect", rb_dir_inspect, 0);
+  // rb_define_method(rb_cDir,"read", rb_dir_read, 0);
+  // rb_define_method(rb_cDir,"each", rb_dir_each, 0);
+  // rb_define_method(rb_cDir,"rewind", rb_dir_rewind, 0);
+  // rb_define_method(rb_cDir,"tell", rb_dir_tell, 0);
+  // rb_define_method(rb_cDir,"seek", rb_dir_seek, 1);
+  // rb_define_method(rb_cDir,"pos", rb_dir_tell, 0);
+  // rb_define_method(rb_cDir,"pos=", rb_dir_set_pos, 1);
+  // rb_define_method(rb_cDir,"close", rb_dir_close, 0);
+  // 
+  // rb_define_singleton_method(rb_cDir,"chdir", rb_dir_s_chdir, -1);
+  // rb_define_singleton_method(rb_cDir,"getwd", rb_dir_s_getwd, 0);
+  // rb_define_singleton_method(rb_cDir,"pwd", rb_dir_s_getwd, 0);
+  // rb_define_singleton_method(rb_cDir,"chroot", rb_dir_s_chroot, 1);
+  // rb_define_singleton_method(rb_cDir,"mkdir", rb_dir_s_mkdir, -1);
+  // rb_define_singleton_method(rb_cDir,"rmdir", rb_dir_s_rmdir, 1);
+  // rb_define_singleton_method(rb_cDir,"delete", rb_dir_s_rmdir, 1);
+  // rb_define_singleton_method(rb_cDir,"unlink", rb_dir_s_rmdir, 1);
+  // 
+  rb_define_singleton_method(rb_cDir,"glob", rb_dir_s_glob, -1);
+  // rb_define_singleton_method(rb_cDir,"[]", rb_dir_s_aref, -1);
+  // rb_define_singleton_method(rb_cDir,"exist?", rb_file_directory_p, 1);
+  // rb_define_singleton_method(rb_cDir,"exists?", rb_file_directory_p, 1);
+  // 
+  // rb_define_singleton_method(rb_cFile,"fnmatch", rb_file_s_fnmatch, -1);
+  // rb_define_singleton_method(rb_cFile,"fnmatch?", rb_file_s_fnmatch, -1);
+}

data/runtime/enum.js

@@ -0,0 +1,74 @@
+/* 
+ * enum.js
+ * opal
+ * 
+ * Created by Adam Beynon.
+ * Copyright 2010 Adam Beynon.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ * 
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ * 
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ */
+
+
+
+var rb_mEnumerable;
+
+function Init_Enumerable() {
+  rb_mEnumerable = rb_define_module("Enumerable");
+  
+  // rb_define_method(rb_mEnumerable, "to_a", rb_enum_to_a, -1);
+  // rb_define_method(rb_mEnumerable, "entries", rb_enum_to_a, -1);
+
+  // rb_define_method(rb_mEnumerable, "sort", rb_enum_sort, 0);
+  // rb_define_method(rb_mEnumerable, "sort_by", rb_enum_sort_by, 0);
+  // rb_define_method(rb_mEnumerable, "grep", rb_enum_grep, 1);
+  // rb_define_method(rb_mEnumerable, "count", rb_enum_count, -1);
+  // rb_define_method(rb_mEnumerable, "find", rb_enum_find, -1);
+  // rb_define_method(rb_mEnumerable, "detect", rb_enum_find, -1);
+  // rb_define_method(rb_mEnumerable, "find_index", rb_enum_find_index, -1);
+  // rb_define_method(rb_mEnumerable, "find_all", rb_enum_find_all, 0);
+  // rb_define_method(rb_mEnumerable, "select", rb_enum_find_all, 0);
+  // rb_define_method(rb_mEnumerable, "reject", rb_enum_reject, 0);
+  // rb_define_method(rb_mEnumerable, "collect", rb_enum_collect, 0);
+  // rb_define_method(rb_mEnumerable, "map", rb_enum_collect, 0);
+  // rb_define_method(rb_mEnumerable, "inject", rb_enum_inject, -1);
+  // rb_define_method(rb_mEnumerable, "reduce", rb_enum_inject, -1);
+  // rb_define_method(rb_mEnumerable, "partition", rb_enum_partition, 0);
+  // rb_define_method(rb_mEnumerable, "group_by", rb_enum_group_by, 0);
+  // rb_define_method(rb_mEnumerable, "first", rb_enum_first, -1);
+  // rb_define_method(rb_mEnumerable, "all?", rb_enum_all, 0);
+  // rb_define_method(rb_mEnumerable, "any?", rb_enum_any, 0);
+  // rb_define_method(rb_mEnumerable, "one?", rb_enum_one, 0);
+  // rb_define_method(rb_mEnumerable, "none?", rb_enum_none, 0);
+  // rb_define_method(rb_mEnumerable, "min", rb_enum_min, 0);
+  // rb_define_method(rb_mEnumerable, "max", rb_enum_max, 0);
+  // rb_define_method(rb_mEnumerable, "minmax", rb_enum_minmax, 0);
+  // rb_define_method(rb_mEnumerable, "min_by", rb_enum_min_by, 0);
+  // rb_define_method(rb_mEnumerable, "max_by", rb_enum_max_by, 0);
+  // rb_define_method(rb_mEnumerable, "minmax_by", rb_enum_minmax_by, 0);
+  // rb_define_method(rb_mEnumerable, "member?", rb_enum_member, 1);
+  // rb_define_method(rb_mEnumerable, "include?", rb_enum_member, 1);
+  // rb_define_method(rb_mEnumerable, "each_with_index", rb_enum_each_with_index, -1);
+  // rb_define_method(rb_mEnumerable, "reverse_each", rb_enum_reverse_each, -1);
+  // rb_define_method(rb_mEnumerable, "zip", rb_enum_zip, -1);
+  // rb_define_method(rb_mEnumerable, "take", rb_enum_take, 1);
+  // rb_define_method(rb_mEnumerable, "take_while", rb_enum_take_while, 0);
+  // rb_define_method(rb_mEnumerable, "drop", rb_enum_drop, 1);
+  // rb_define_method(rb_mEnumerable, "drop_while", rb_enum_drop_while, 0);
+  // rb_define_method(rb_mEnumerable, "cycle", rb_enum_cycle, -1);
+}

data/runtime/file.js

@@ -0,0 +1,165 @@
+/* 
+ * file.js
+ * opal
+ * 
+ * Created by Adam Beynon.
+ * Copyright 2010 Adam Beynon.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ * 
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ * 
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ */
+
+
+/**
+  @class File
+  @super Object
+  
+  File.
+*/
+var rb_cFile;
+
+/**
+  Base object to store file/dir directory structure
+  
+  Vienna FileSystem Root ("/")
+  
+  Every entry has:
+    . as a self referring link to current dir
+    .. as a link to the parent dir
+    $ holds the current dirname (not whole path, just node name)
+    
+    every other entry is then a file (child) belonging to the directory.
+    Objects as childs represent directories, where as a string refers to a
+    file, where the string content is the file content.
+    
+    Directory names do not include a path seperator, and cannot be 0 length.
+    0 length is reserved for root directory.
+*/
+var vn_fs_root = {};
+// roots' parent directory points to itself, only exception to rule.
+vn_fs_root[".."] = vn_fs_root["."] = vn_fs_root;
+vn_fs_root['$'] = "";
+
+/**
+  Object/hash, from full file/dir names to either the file contents, for files,
+  or the directory structure, for directories. Makes accessing explicit file
+  paths easier, instead of splitting the path and manually going through the
+  tree, e.g:
+  
+  ...
+  /vendor/vienna/lib/models => [Object object]
+  /vendor/vienna/lib/views/button.rb => "class Button < Control ... end"
+  ...
+*/
+var vn_fs_path_hash = {
+  "/": vn_fs_root
+};
+
+/**
+  define a new file by filename (f), and filecontent (c)
+*/
+function vn_fs_define_file(f, content) {
+  vn_fs_path_hash[f] = content;
+  var p = f.split("/");
+  var i, c = vn_fs_root, b;
+  // for each path segment, except first (which will be empty) and
+  // last, which will be a file, so treat differently
+  for (i = 1; i < p.length - 1; i++) {
+    b = p[i];
+    if (c[b] === undefined) {
+      c[b] = { };
+      c[b]['.'] = c[b];
+      c[b]['..'] = c;
+      c[b]['$'] = b;
+    }
+    c = c[b];
+  }
+  c[p[p.length - 1]] = content;
+}
+
+
+function rb_file_s_dirname(cls, dirname) {
+  return dirname.substr(0, dirname.lastIndexOf('/'));
+  // return "/dirname";
+}
+
+function rb_file_s_join(cls, args) {
+  return args.join("/");
+}
+
+function rb_file_s_expand_path(argc, args, obj) {
+  var res_stack = [], cur;
+  args = args[0].split("/")
+  for (var i = 0; i < args.length; i++) {
+    cur = args[i];
+    if (cur == '..') {
+      res_stack.pop();
+    }
+    else if (cur == '.' || cur == '') {
+      // do nothing
+    }
+    else {
+      res_stack.push(cur);
+    }
+  }
+  return "/" + res_stack.join("/");
+}
+
+function Init_File() {
+  rb_cFile = rb_define_class("File", rb_cObject);
+  
+  // It seems silly to have all of these, but maybe we should have them to keep
+  // code comaptible? Just return current time..?
+  // rb_define_singleton_method(rb_cFile, "stat", rb_file_s_stat, 1);
+  // rb_define_singleton_method(rb_cFile, "lstat", rb_file_s_lstat, 1);
+  // rb_define_singleton_method(rb_cFile, "ftype", rb_file_s_ftype, 1);
+  // 
+  // rb_define_singleton_method(rb_cFile, "atime", rb_file_s_atime, 1);
+  // rb_define_singleton_method(rb_cFile, "mtime", rb_file_s_mtime, 1);
+  // rb_define_singleton_method(rb_cFile, "ctime", rb_file_s_ctime, 1);
+  // 
+  // rb_define_singleton_method(rb_cFile, "utime", rb_file_s_utime, -1);
+  // rb_define_singleton_method(rb_cFile, "chmod", rb_file_s_chmod, -1);
+  // rb_define_singleton_method(rb_cFile, "chown", rb_file_s_chown, -1);
+  // rb_define_singleton_method(rb_cFile, "lchmod", rb_file_s_lchmod, -1);
+  // rb_define_singleton_method(rb_cFile, "lchown", rb_file_s_lchown, -1);
+  // 
+  // rb_define_singleton_method(rb_cFile, "link", rb_file_s_link, 2);
+  // rb_define_singleton_method(rb_cFile, "symlink", rb_file_s_symlink, 2);
+  // rb_define_singleton_method(rb_cFile, "readlink", rb_file_s_readlink, 1);
+  // 
+  // rb_define_singleton_method(rb_cFile, "unlink", rb_file_s_unlink, -2);
+  // rb_define_singleton_method(rb_cFile, "delete", rb_file_s_unlink, -2);
+  // rb_define_singleton_method(rb_cFile, "rename", rb_file_s_rename, 2);
+  // rb_define_singleton_method(rb_cFile, "umask", rb_file_s_umask, -1);
+  // rb_define_singleton_method(rb_cFile, "truncate", rb_file_s_truncate, 2);
+  rb_define_singleton_method(rb_cFile, "expand_path", rb_file_s_expand_path, -1);
+  // rb_define_singleton_method(rb_cFile, "absolute_path", rb_file_s_absolute_path, -1);
+  // rb_define_singleton_method(rb_cFile, "basename", rb_file_s_basename, -1);
+  rb_define_singleton_method(rb_cFile, "dirname", rb_file_s_dirname, 1);
+  // rb_define_singleton_method(rb_cFile, "extname", rb_file_s_extname, 1);
+  // rb_define_singleton_method(rb_cFile, "path", rb_file_s_path, 1);
+  // 
+  // rb_define_const(rb_cFile, "Separator", "/");
+  // rb_define_const(rb_cFile, "SEPARATOR", "/");
+  // rb_define_const(rb_cFile, "PATH_SEPARATOR", "/");
+  // 
+  // rb_define_singleton_method(rb_cFile, "split",  rb_file_s_split, 1);
+  rb_define_singleton_method(rb_cFile, "join",   rb_file_s_join, -1);
+}
+

data/runtime/gem.js

@@ -0,0 +1,241 @@
+/* 
+ * gem.js
+ * opal
+ * 
+ * Created by Adam Beynon.
+ * Copyright 2010 Adam Beynon.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ * 
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ * 
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ */
+
+
+
+/**
+  Gem support: only for gems/bundles in the vngem format. Also provides some gem 
+  methods and classes that are useful. The majority is not implemented however
+  for usage patterns/reasons.
+  
+  name - gem name, e.g. 'vienna'
+  path - bundles will be '/vendor' or similar, app will be '/' or ''
+  content - string content of the vngem file. This will possibly be removed once
+            the content has been parsed and the necessary files have been created.
+  loaded - has this gem/bundle been required()? The content is not parsed or
+            processed until it is required... which usually happens straight away.
+            This property is useful to avoid loading a bundle twice.
+*/
+function vn_gem() {
+  this.name = "";
+  this.path = "";
+  this.content = "";
+  this.loaded = false;
+}
+
+// all gems/apps/bundles, name => gem object
+var vn_gem_all = { };
+
+/**
+  preload the gem at the given path so it will be ready. callbacks used for
+  chaining gem loading
+*/
+function vn_gem_preload(path, name) {
+  // preload.
+}
+
+/**
+  boot a gem with the given name, path and content (i.e. process it)
+*/
+function vn_gem_boot(name, path, content) {
+  var g = new vn_gem();
+  g.name = name;
+  g.path = path;
+  g.content = content;
+  vn_gem_all[name] = g;
+  vm_gem_load(g);
+  return g;
+}
+
+/**
+  Do actual gem processing
+*/
+function vm_gem_load(gem) {
+  if (gem.loaded) throw "Cannot load gem twice... something silly happened"
+  
+  var at = 0;
+  var ch = '';
+  var text = gem.content;
+  
+  // parse a file
+  function parse_file() {
+    var f = get_next(marker_count());
+    var c = get_next(marker_count());
+    vn_fs_define_file(f, c);
+  }
+  
+  // parse gem definiton
+  function parse_gem_def() {
+    var g = get_next(marker_count());
+    var p = get_next(marker_count());
+    console.log('found ' + g + ' at ' + p);
+  }
+  
+  // parse_locales
+  // parse a list of locales that this application has defined
+  function parse_locales() {
+    
+  }
+  
+  // parse a css file..
+  // for IE we might need to use:
+  // var content = get_next(marker_count());
+  // var style = document.createElement("style");
+  // style.setAttribute("type", "text/css");
+  // if (style.styleSheet) {
+  //  // this for internet explorer.. 
+  //  style.styleSheet.cssText = content;
+  // }
+  // else {
+  //  style.appendChild(document.createTextNode(content));
+  // }
+  function parse_css() {
+    var content = get_next(marker_count());
+    var style = document.createElement('style');
+    style.setAttribute("type", "text/css");
+    if (style.styleSheet) {
+      // ie.
+      style.styleSheet.cssText = content;
+    }
+    else {
+      // w3c
+      style.appendChild(document.createTextNode(content));
+    }
+    
+    document.getElementsByTagName('head')[0].appendChild(style);
+  }
+  
+  // get gem format
+  var gem_format = (function() {
+    var marker = text.indexOf('$', at);
+    var format = text.substr(at, marker - at);
+    at = marker + 1;
+    return format;
+  })();
+  
+  // get gem version
+  var gem_version = (function() {
+    var marker = text.indexOf('$', at);
+    var version = text.substr(at, marker - at);
+    at = marker + 1;
+    return version;
+  })();
+  
+  var next = function(c) {
+    if (c && c !== ch) {
+      console.log('bundle parse error: Expected ' + c + ', but instead got ' + ch);
+    }
+    ch = text.charAt(at);
+    at += 1;
+    return ch;
+  };
+  
+  var get_next = function(i) {
+    var result = text.substr(at, i);
+    at += i;
+    return result;
+  };
+  
+  var marker_count = function() {
+    var len = '';
+    next();
+    while (ch >= '0' && ch <= '9') {
+      len += ch;
+      next(); // this will also pass us through the $ at the end of length
+    }
+    return parseInt(len);
+  };
+  
+  while (next()) {
+    switch (ch) {
+      case 'f':
+        parse_file();
+        break;
+      case 'g':
+        parse_gem_def();
+        break;
+      case 'l':
+        parse_locales();
+        break;
+      case 's':
+        parse_string_table();
+        break;
+      case 'p':
+        parse_platform_list();
+        break;
+      case 'c':
+        parse_css();
+        break;
+      default:
+        throw "unknown bundle part " + ch
+    }
+  }
+  
+  // make sure we dont do this again
+  gem.loaded = true;
+  return gem;
+}
+
+
+/**
+  New javascript based "gem" loading
+*/
+
+/**
+  Declare this file contains the gem named 'name' which is located at the path
+  'path'
+*/
+function opal_gem(name, path) {
+  
+};
+
+/**
+  A source file - ruby, yaml etc. NOT Javascript. JS files are handled 
+  seperately so they are eval()'d instantly.
+*/
+function opal_file(path, content) {
+  vn_fs_define_file(path, content);
+};
+
+/**
+  Code - i.e. javascript. Eval these instantly. We retain the path so if an 
+  error occurs, then we can point back to the source file it originates from.
+*/
+function opal_code(path, code) {
+  if (window.execScript) {
+    window.execScript(code);
+  } else {
+    with (window) { eval(code); }
+  }
+};
+
+/**
+  CSS styles - shouldnt be a lot of these, but, if they exist, pop into head of
+  document.
+*/
+function opal_style(content) {
+  
+};