algebrite/test-harness.coffee

ok_tests = 0
ko_tests = 0

logout = (s) ->
	console.log s


run_test = (s) ->
	i = 0
	t = ""

	test_flag = 1

	run("clearall")

	run("e=quote(e)")

	for i in [0...s.length] by 2

		console.log("starting example: " + s[i])
		#alert("starting example: " + s[i])
		# document.write("starting example: " + s[i] )
		

		out_count = 0

		try
			resultFromRun = run(s[i])
		catch error
			console.log error
			init()


		if (resultFromRun == s[i+1])
			# document.write(" ...ok</br>")
			console.log("ok example: " + s[i])
			# alert("ok example: " + s[i])
			ok_tests++
			continue

		ko_tests++
		# document.write(" ...fail</br>")
		console.log("\n")
		console.log("test failed: " + s[i])

		console.log("expected: " + s[i+1])

		console.log("obtained: " + resultFromRun)
		console.log("\n")

		# alert "test failed: " + s[i] + " expected: " + s[i+1] + " obtained: " + resultFromRun


	test_flag = 0

# these tests do not use "run" but still need a "stop" context