mirror of
https://github.com/cybergirlvannie/OpenSS13.git
synced 2026-02-10 03:17:36 +00:00
24 lines
452 B
Plaintext
24 lines
452 B
Plaintext
|
|
/proc/dd_run_tests()
|
|
|
|
var/test_classes = typesof(/obj/test)
|
|
for(var/class in test_classes)
|
|
var/obj/test/tester = new class( )
|
|
for(var/test in tester.verbs)
|
|
call(tester, test)()
|
|
if (!( tester.success ))
|
|
else
|
|
//Foreach continue //goto(59)
|
|
if (!( tester.success ))
|
|
world << "Test failed."
|
|
return
|
|
//Foreach goto(26)
|
|
world << "All tests passed."
|
|
return
|
|
|
|
/obj/test/proc/die(message)
|
|
|
|
src.success = 0
|
|
CRASH(message)
|
|
return
|