Making someone a monkey and then human again immediately in the genetics console removes like half of their organs

[Bokkiewokkie]

Round ID:

7136

Reproduction:

Put person in genetics tube
Activate monkey gene, and then de-activate monkey gene
Person comes out dying to death

Runtime log

proc name: transfer identity (/datum/dna/proc/transfer_identity)
usr: [user]
usr.loc: (Medical (134, 113, 3))
src: /datum/dna (/datum/dna)
call stack:
/datum/dna (/datum/dna): transfer identity([user mob] (/mob/living/carbon/human), 32)
the monkey (6) (/mob/living/carbon/monkey): humanize(823)
Monkified (/datum/mutation/race): on losing(the monkey (6) (/mob/living/carbon/monkey))
/datum/dna (/datum/dna): force lose(Monkified (/datum/mutation/race))
/datum/dna (/datum/dna): check block(/datum/mutation/race (/datum/mutation/race))
the monkey (6) (/mob/living/carbon/monkey): domutcheck()
the DNA scanner access console (/obj/machinery/computer/scan_consolenew): ui act("pulse_gene", /list (/list), /datum/tgui (/datum/tgui), /datum/ui_state/default (/datum/ui_state/default))
/datum/tgui (/datum/tgui): on message("act/pulse_gene", /list (/list), /list (/list))
/datum/tgui_window (/datum/tgui_window): on message("act/pulse_gene", /list (/list), /list (/list))
tgui Topic(/list (/list))
[user] (/client): Topic("type=act%2Fpulse_gene&payload=...", /list (/list), null, null)