set miscarry, abort, kill, to discard babies before removing pregnancy hediff

Source/Modules/Pregnancy/Hediffs/Hediff_BasePregnancy.cs

@@ -107,7 +107,7 @@ namespace rjw
 
 			//(debug->add heddif)
 			//init empty preg, instabirth, cause error during birthing
-			//Initialize(pawn, father);
+			//Initialize(pawn, Trytogetfather(ref pawn));
 		}
 
 		public override bool Visible => is_discovered;
@@ -160,23 +160,30 @@ namespace rjw
 
 		public virtual void Miscarry()
 		{
+			if (!babies.NullOrEmpty())
+				foreach (Pawn baby in babies)
+				{
+					baby.Discard();
+				}
 			pawn.health?.RemoveHediff(this);
 		}
 
 		/// <summary>
 		/// Called on abortion (noy implemented yet)
 		/// </summary>
-		public virtual void Abort() { }
+		public virtual void Abort() 
+		{
+			Miscarry();
+		}
 
 		/// <summary>
 		/// Mechanoids can remove pregnancy
 		/// </summary>
 		public virtual void Kill()
 		{
-			pawn.health?.RemoveHediff(this);
+			Miscarry();
 		}
 
-
 		[SyncMethod]
 		public Pawn partstospawn(Pawn baby, Pawn mother, Pawn dad)
 		{