replace old_race calls with get_race.

src/monsters.c

@@ -380,20 +380,15 @@ static order *monster_move(region * r, unit * u)
     if (monster_is_waiting(u)) {
         return NULL;
     }
-    switch (old_race(u_race(u))) {
-    case RC_FIREDRAGON:
-    case RC_DRAGON:
-    case RC_WYRM:
+    if (fval(u_race(u), RCF_DRAGON)) {
         d = richest_neighbour(r, u->faction, 1);
-        break;
-    case RC_TREEMAN:
-        d = treeman_neighbour(r);
-        break;
-    default:
-        d = random_neighbour(r, u);
-        break;
     }
-
+    else if (get_race(RC_TREEMAN)==u_race(u)) {
+        d = treeman_neighbour(r);
+    }
+    else {
+        d = random_neighbour(r, u);
+    }
     /* falls kein geld gefunden wird, zufaellig verreisen, aber nicht in
      * den ozean */
 

src/spells.c

@@ -2742,6 +2742,8 @@ static race *unholy_race(const race *rc) {
     case RC_GHOUL:
         target_race = get_race(RC_GHOUL_LORD);
         break;
+    default:
+        target_race = NULL;
     }
     return target_race;
 }