You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
webperl-for/web/runtests.html

42 lines
914 B
HTML

<!doctype html>
<html lang="en-us">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>WebPerl Tests</title>
<script src="webperl.js"></script>
<script>
"use strict";
window.onerror = function(event) {
alert('Exception thrown, see JavaScript console'); };
window.addEventListener("load", function () {
document.getElementById('output')
.appendChild( Perl.makeOutputTextarea() );
var status = document.getElementById("status");
Perl.endAfterMain = true;
Perl.addStateChangeListener( function (from,to) {
if (from!="Ended" && to=="Ended")
status.textContent = "Tests finished, see output:";
} );
Perl.init(function () {
status.textContent = "Running tests...";
window.setTimeout(function () {
Perl.start(['/opt/perl/dev/WebPerl.t']);
}, 1);
});
});
</script>
</head>
<body>
<p id="status">Loading tests...</p>
<div id="output"></div>
</body>
</html>