"browser-dom" in
-: get-element ( id -- element )
- document { "element" } "" "getElementById" { "string" } alien-invoke ;
-
-: property ( name element -- value )
- alien-property ;
+: $ ( string -- result )
+ #! Call JQuery's $ function
+ window { "result" } "" "$" { "string" } alien-invoke ;
+
"scratchpad" in
-"Bootstrap code loaded" alert
\ No newline at end of file
factor.cont.data_stack.push(document);
factor.call_next(next);
});
+
+/* Run initial factor code */
+$(document).ready(function() {
+ $.get("/responder/fjsc-resources/bootstrap.factor", function(result) {
+ factor.server_eval(result, function() { });
+ });
+});