diff --git a/src/spells.c b/src/spells.c
index b40192016..66f5325c9 100644
--- a/src/spells.c
+++ b/src/spells.c
@@ -6596,7 +6596,6 @@ static spelldata spell_functions[] = {
     { "powerful_dragonbreath", sp_dragonodem, 0 },
     { "drain_skills", sp_dragonodem, 0 },
     { "aura_of_fear", sp_flee, 0 },
-    { "shadowcall", sp_shadowcall, 0 },
     { "immolation", sp_immolation, 0 },
     { "firestorm", sp_immolation, 0 },
     { "coldfront", sp_immolation, 0 },
diff --git a/src/spells/combatspells.c b/src/spells/combatspells.c
index 76fd605ff..939433617 100644
--- a/src/spells/combatspells.c
+++ b/src/spells/combatspells.c
@@ -815,42 +815,6 @@ int sp_drainodem(fighter * fi, int level, double power, spell * sp)
 /* ------------------------------------------------------------- */
 /* PRECOMBAT */
 
-int sp_shadowcall(struct castorder * co)
-{
-    fighter * fi = co->magician.fig;
-    int level = co->level;
-    double power = co->force;
-    battle *b = fi->side->battle;
-    region *r = b->region;
-    unit *mage = fi->unit;
-    attrib *a;
-    int force = (int)(get_force(power, 3) / 2);
-    unit *u;
-    const char *rcnames[3] = { "shadowbat", "nightmare", "vampunicorn" };
-    const race *rc = rc_find(rcnames[rng_int() % 3]);
-    message *msg;
-
-    u = create_unit(r, mage->faction, force, rc, 0, NULL, mage);
-    setstatus(u, ST_FIGHT);
-
-    set_level(u, SK_WEAPONLESS, (int)(power / 2));
-    set_level(u, SK_STAMINA, (int)(power / 2));
-    u->hp = u->number * unit_max_hp(u);
-
-    a = a_new(&at_unitdissolve);
-    a->data.ca[0] = 0;
-    a->data.ca[1] = 100;
-    a_add(&u->attribs, a);
-
-    make_fighter(b, u, fi->side, is_attacker(fi));
-    msg =
-        msg_message("sp_shadowcall_effect", "mage amount race", mage, u->number,
-        u_race(u));
-    message_all(b, msg);
-    msg_release(msg);
-    return level;
-}
-
 static fighter *summon_allies(const fighter *fi, const race *rc, int number) {
     attrib *a;
     unit *mage = fi->unit;
diff --git a/src/spells/combatspells.h b/src/spells/combatspells.h
index 4e3173a66..cf07c2a89 100644
--- a/src/spells/combatspells.h
+++ b/src/spells/combatspells.h
@@ -49,7 +49,6 @@ extern "C" {
     int sp_armorshield(struct castorder * co);
     int sp_stun(struct castorder * co);
     int sp_undeadhero(struct castorder * co);
-    int sp_shadowcall(struct castorder * co);
     int sp_immolation(struct castorder * co);
 
 #ifdef __cplusplus