mirror of
https://github.com/Aurorastation/Aurora.3.git
synced 2026-01-28 10:12:01 +00:00
389466360e
Refactored sorting. Added test to verify all horizon areas (outside exceptions) are marked as station areas. Added test to verify shuttle areas are not marked as station areas. Refactored how the area sorting var is made and used. Added a global list of all areas.
56 lines
2.3 KiB
Plaintext
56 lines
2.3 KiB
Plaintext
ABSTRACT_TYPE(/datum/unit_test/area_configuration)
|
|
name = "AREA CONFIG: Test stairs types"
|
|
groups = list("generic")
|
|
priority = 1
|
|
|
|
/datum/unit_test/area_configuration/exoplanet_area_with_exoplanet_base_turfs
|
|
name = "AREA CONFIG: Exoplanet areas must have exoplanet base turfs"
|
|
|
|
/datum/unit_test/area_configuration/exoplanet_area_with_exoplanet_base_turfs/start_test()
|
|
var/test_status = UNIT_TEST_PASSED
|
|
|
|
for(var/area/exoplanet/exoplanet_area_typepath in subtypesof(/area/exoplanet))
|
|
//No need for abstract areas to respect this really
|
|
if(is_abstract(exoplanet_area_typepath))
|
|
TEST_DEBUG("Skipping abstract exoplanet area [exoplanet_area_typepath]")
|
|
continue
|
|
|
|
TEST_DEBUG("Now testing exoplanet area [exoplanet_area_typepath]")
|
|
|
|
//The bounds have to be set based on the direction of the stairs, that must be set in code for sanity
|
|
if(!istype(exoplanet_area_typepath::base_turf, /turf/simulated/floor/exoplanet))
|
|
test_status = TEST_FAIL("The exoplanet area [exoplanet_area_typepath] does not have an exoplanet base turf!")
|
|
|
|
else
|
|
TEST_NOTICE("The exoplanet area [exoplanet_area_typepath] has an exoplanet base turf.")
|
|
TEST_DEBUG("The exoplanet area [exoplanet_area_typepath] has [exoplanet_area_typepath::base_turf] as its base turf.")
|
|
|
|
if(test_status == UNIT_TEST_PASSED)
|
|
TEST_PASS("All exoplanet areas have an exoplanet base turf.")
|
|
|
|
return test_status
|
|
|
|
/datum/unit_test/area_configuration/shuttles_area_not_station_area
|
|
name = "AREA CONFIG: Shuttle areas must not be station areas"
|
|
|
|
/datum/unit_test/area_configuration/shuttles_area_not_station_area/start_test()
|
|
var/test_status = UNIT_TEST_PASSED
|
|
|
|
for(var/area/shuttle/shuttle_area_typepath in subtypesof(/area/shuttle))
|
|
//No need for abstract areas to respect this really
|
|
if(is_abstract(shuttle_area_typepath))
|
|
TEST_DEBUG("Skipping abstract shuttle area [shuttle_area_typepath]")
|
|
continue
|
|
|
|
TEST_DEBUG("Now testing shuttle area [shuttle_area_typepath]")
|
|
if(shuttle_area_typepath::station_area)
|
|
test_status = TEST_FAIL("The shuttle area [shuttle_area_typepath] is a station area!")
|
|
else
|
|
TEST_NOTICE("The shuttle area [shuttle_area_typepath] is not a station area.")
|
|
TEST_DEBUG("The shuttle area [shuttle_area_typepath] is not a station area.")
|
|
|
|
if(test_status == UNIT_TEST_PASSED)
|
|
TEST_PASS("All shuttle areas are not station areas.")
|
|
|
|
return test_status
|