[Avida-SVN] r1873 - development/source/cpu

[matt at myxo.css.msu.edu]

Author: matt
Date: 2007-07-31 12:36:23 -0400 (Tue, 31 Jul 2007)
New Revision: 1873

Modified:
   development/source/cpu/cHardwareCPU.cc
Log:
Add sterilize instruction.

Modified: development/source/cpu/cHardwareCPU.cc
===================================================================
--- development/source/cpu/cHardwareCPU.cc	2007-07-31 13:31:28 UTC (rev 1872)
+++ development/source/cpu/cHardwareCPU.cc	2007-07-31 16:36:23 UTC (rev 1873)
@@ -330,6 +330,8 @@
     tInstLibEntry<tMethod>("put-repro", &cHardwareCPU::Inst_TaskPutRepro),
     tInstLibEntry<tMethod>("metabolize", &cHardwareCPU::Inst_TaskPutResetInputsRepro),        
 
+    tInstLibEntry<tMethod>("sterilize", &cHardwareCPU::Inst_Sterilize),
+    
     tInstLibEntry<tMethod>("spawn-deme", &cHardwareCPU::Inst_SpawnDeme),
     
     // Suicide
@@ -2580,6 +2582,12 @@
   return true;
 }
 
+bool cHardwareCPU::Inst_Sterilize(cAvidaContext& ctx)
+{
+  organism->GetPhenotype().IsFertile() = false;
+  return true;
+}
+
 bool cHardwareCPU::Inst_Kazi5(cAvidaContext& ctx)
 {
   const int reg_used = FindModifiedRegister(REG_AX);