suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

trying to isolate the crash a bit more

Browse Source
This commit is contained in:
Danny Yoo 2011-06-06 14:24:25 -04:00
parent 2c53a1d102
commit f095311284
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/browser-evaluate.rkt
View File

@ -173,10 +173,11 @@ function sendRequest(url,callback,postData) {
return;
}
if (req.status === 200 && req.statusText === 'Try again') {
req.abort();
delete req.onreadystateschange;
setTimeout(function() { sendRequest(url, callback, postData); }, 0);
return;
}
delete req.onreadystateschange;
callback(req);
}
if (req.readyState == 4) return;
@ -208,9 +209,9 @@ var comet = function() {
sendRequest("/eval",
function(req) {
// debug:
if (window.console && typeof(console.log) === 'function') {
console.log(req.responseText);
}
//if (window.console && typeof(console.log) === 'function') {
// console.log(req.responseText);
//}
try {
var invoke = eval(req.responseText)();
} catch (e) {