1 files changed, 0 insertions, 93 deletions
diff --git a/src/spells4.c b/src/spells4.c
index f01930ec..5a099483 100644
--- a/src/spells4.c
+++ b/src/spells4.c
@@ -629,96 +629,3 @@ void lua_cast_school_spell(s32b s, bool_ no_cost)
 	p_ptr->redraw |= PR_MANA;
 	p_ptr->window |= PW_PLAYER;
 }
-
-void dice_init(dice_type *dice, long base, long num, long sides)
-{
-	assert(dice != NULL);
-
-	dice->base = base;
-	dice->num = num;
-	dice->sides = sides;
-}
-
-bool_ dice_parse(dice_type *dice, cptr s)
-{
-	long base, num, sides;
-
-	if (sscanf(s, "%ld+%ldd%ld", &base, &num, &sides) == 3)
-	{
-		dice_init(dice, base, num, sides);
-		return TRUE;
-	}
-
-	if (sscanf(s, "%ld+d%ld", &base, &sides) == 2)
-	{
-		dice_init(dice, base, 1, sides);
-		return TRUE;
-	}
-
-	if (sscanf(s, "d%ld", &sides) == 1)
-	{
-		dice_init(dice, 0, 1, sides);
-		return TRUE;
-	}
-
-	if (sscanf(s, "%ldd%ld", &num, &sides) == 2)
-	{
-		dice_init(dice, 0, num, sides);
-		return TRUE;
-	}
-
-	if (sscanf(s, "%ld", &base) == 1)
-	{
-		dice_init(dice, base, 0, 0);
-		return TRUE;
-	}
-
-	return FALSE;
-}
-
-void dice_parse_checked(dice_type *dice, cptr s)
-{
-	bool_ result = dice_parse(dice, s);
-	if (!result)
-	{
-		abort();
-	}
-}
-
-long dice_roll(dice_type *dice)
-{
-	assert(dice != NULL);
-	return dice->base + damroll(dice->num, dice->sides);
-}
-
-void dice_print(dice_type *dice, char *output)
-{
-	char buf[16];
-
-	output[0] = '\0';
-
-	if (dice->base > 0)
-	{
-		sprintf(buf, "%ld", dice->base);
-		strcat(output, buf);
-	}
-
-	if ((dice->num > 0) || (dice->sides > 0))
-	{
-		if (dice->base > 0)
-		{
-			strcat(output, "+");
-		}
-
-		if (dice->num > 1)
-		{
-			sprintf(buf, "%ld", dice->num);
-			strcat(output, buf);
-		}
-
-		strcat(output, "d");
-
-		sprintf(buf, "%ld", dice->sides);
-		strcat(output, buf);
-	}
-}