Compatibility 2

code/modules/events/supply_demand_vr.dm

@@ -274,8 +274,7 @@
 /datum/event/supply_demand/proc/choose_chemistry_items(var/differentTypes)
 	// Checking if they show up in health analyzer is good huristic for it being a drug
 	var/list/medicineReagents = list()
-	for(var/path in typesof(/datum/chemical_reaction) - /datum/chemical_reaction)
-		var/datum/chemical_reaction/CR = path // Stupid casting required for reading
+	for(var/decl/chemical_reaction/instant/CR in SSchemistry.chemical_reactions)
 		var/datum/reagent/R = SSchemistry.chemical_reagents[initial(CR.result)]
 		if(R && R.scannable)
 			medicineReagents += R
@@ -288,8 +287,7 @@
 
 /datum/event/supply_demand/proc/choose_bar_items(var/differentTypes)
 	var/list/drinkReagents = list()
-	for(var/path in typesof(/datum/chemical_reaction) - /datum/chemical_reaction)
-		var/datum/chemical_reaction/CR = path // Stupid casting required for reading
+	for(var/decl/chemical_reaction/instant/drinks/CR in SSchemistry.chemical_reactions)
 		var/datum/reagent/R = SSchemistry.chemical_reagents[initial(CR.result)]
 		if(istype(R, /datum/reagent/drink) || istype(R, /datum/reagent/ethanol))
 			drinkReagents += R

code/modules/reagents/reactions/instant/instant_vr.dm

@@ -401,5 +401,13 @@
 				for(var/j = 1, j <= rand(1, 3), j++)
 					step(C, pick(NORTH,SOUTH,EAST,WEST))
 
+/decl/chemical_reaction/instant/slime/sapphire_mutation
+	name = "Slime Mutation Toxins"
+	id = "slime_mutation_tox"
+	result = "mutationtoxin"
+	required_reagents = list("blood" = 5)
+	result_amount = 30
+	required = /obj/item/slime_extract/sapphire
+
 /decl/chemical_reaction/instant/biomass
 	result_amount = 6	// Roughly 120u per phoron sheet

code/modules/reagents/reagents/other_vr.dm

@@ -28,14 +28,6 @@
 					BI.forceMove(torso)
 					torso.implants += BI
 
-/datum/chemical_reaction/slime/sapphire_mutation
-	name = "Slime Mutation Toxins"
-	id = "slime_mutation_tox"
-	result = "mutationtoxin"
-	required_reagents = list("blood" = 5)
-	result_amount = 30
-	required = /obj/item/slime_extract/sapphire
-
 /datum/reagent/nif_repair_nanites
 	name = "Programmed Nanomachines"
 	id = "nifrepairnanites"