From 48ee786dffaf22f06cd27e2824467cf9ac808fae Mon Sep 17 00:00:00 2001
From: Hourier <hourier@users.sourceforge.jp>
Date: Sat, 1 Aug 2020 12:08:20 +0900
Subject: [PATCH] [Refactor] #40574 Renamed gm_type to glm_type

---
 src/mutation/gain-mutation-switcher.c |   2 +-
 src/mutation/gain-mutation-switcher.h |   4 +-
 src/mutation/mutation-investor.c      |  12 +-
 src/mutation/mutation-util.c          |   2 +-
 src/mutation/mutation-util.h          |   8 +-
 src/mutation/mutation.c               | 605 +++++++++++++++++-----------------
 6 files changed, 316 insertions(+), 317 deletions(-)

diff --git a/src/mutation/gain-mutation-switcher.c b/src/mutation/gain-mutation-switcher.c
index 614b6b762..d97b21cd8 100644
--- a/src/mutation/gain-mutation-switcher.c
+++ b/src/mutation/gain-mutation-switcher.c
@@ -2,7 +2,7 @@
 #include "mutation/mutation-flag-types.h"
 #include "mutation/mutation-util.h"
 
-void switch_gain_mutation(player_type *creature_ptr, gm_type *gm_ptr)
+void switch_gain_mutation(player_type *creature_ptr, glm_type *gm_ptr)
 {
     switch (gm_ptr->choose_mut ? gm_ptr->choose_mut : (creature_ptr->pclass == CLASS_BERSERKER ? 74 + randint1(119) : randint1(193))) {
     case 1:
diff --git a/src/mutation/gain-mutation-switcher.h b/src/mutation/gain-mutation-switcher.h
index fd23bd981..92558fce4 100644
--- a/src/mutation/gain-mutation-switcher.h
+++ b/src/mutation/gain-mutation-switcher.h
@@ -2,5 +2,5 @@
 
 #include "system/angband.h"
 
-typedef struct gm_type gm_type;
-void switch_gain_mutation(player_type *creature_ptr, gm_type *gm_ptr);
+typedef struct glm_type glm_type;
+void switch_gain_mutation(player_type *creature_ptr, glm_type *gm_ptr);
diff --git a/src/mutation/mutation-investor.c b/src/mutation/mutation-investor.c
index df18d6ef6..eb813ff10 100644
--- a/src/mutation/mutation-investor.c
+++ b/src/mutation/mutation-investor.c
@@ -8,7 +8,7 @@
 #include "player/avatar.h"
 #include "view/display-messages.h"
 
-static void sweep_gain_mutation(player_type *creature_ptr, gm_type *gm_ptr)
+static void sweep_gain_mutation(player_type *creature_ptr, glm_type *gm_ptr)
 {
     int attempts_left = 20;
     if (gm_ptr->choose_mut)
@@ -24,7 +24,7 @@ static void sweep_gain_mutation(player_type *creature_ptr, gm_type *gm_ptr)
     }
 }
 
-static void race_dependent_mutation(player_type *creature_ptr, gm_type *gm_ptr)
+static void race_dependent_mutation(player_type *creature_ptr, glm_type *gm_ptr)
 {
     if (gm_ptr->choose_mut != 0)
         return;
@@ -64,7 +64,7 @@ static void race_dependent_mutation(player_type *creature_ptr, gm_type *gm_ptr)
     }
 }
 
-static void neutralize_base_status(player_type *creature_ptr, gm_type *gm_ptr)
+static void neutralize_base_status(player_type *creature_ptr, glm_type *gm_ptr)
 {
     if (gm_ptr->muta_which == MUT3_PUNY) {
         if (creature_ptr->muta3 & MUT3_HYPER_STR) {
@@ -176,7 +176,7 @@ static void neutralize_base_status(player_type *creature_ptr, gm_type *gm_ptr)
     }
 }
 
-static void neutralize_other_status(player_type *creature_ptr, gm_type *gm_ptr)
+static void neutralize_other_status(player_type *creature_ptr, glm_type *gm_ptr)
 {
     if (gm_ptr->muta_which == MUT2_COWARDICE) {
         if (creature_ptr->muta3 & MUT3_FEARLESS) {
@@ -207,8 +207,8 @@ static void neutralize_other_status(player_type *creature_ptr, gm_type *gm_ptr)
  */
 bool gain_mutation(player_type *creature_ptr, MUTATION_IDX choose_mut)
 {
-    gm_type tmp_gm;
-    gm_type *gm_ptr = initialize_gm_type(&tmp_gm, choose_mut);
+    glm_type tmp_gm;
+    glm_type *gm_ptr = initialize_gm_type(&tmp_gm, choose_mut);
     sweep_gain_mutation(creature_ptr, gm_ptr);
     if (!gm_ptr->muta_chosen) {
         msg_print(_("普通になった気がする。", "You feel normal."));
diff --git a/src/mutation/mutation-util.c b/src/mutation/mutation-util.c
index 92cc4f385..7f23e9da2 100644
--- a/src/mutation/mutation-util.c
+++ b/src/mutation/mutation-util.c
@@ -1,6 +1,6 @@
 #include "mutation/mutation-util.h"
 
-gm_type *initialize_gm_type(gm_type *gm_ptr, MUTATION_IDX choose_mut)
+glm_type *initialize_gm_type(glm_type *gm_ptr, MUTATION_IDX choose_mut)
 {
     gm_ptr->muta_class = NULL;
     gm_ptr->muta_which = 0;
diff --git a/src/mutation/mutation-util.h b/src/mutation/mutation-util.h
index f12204c5f..4ef6bfce9 100644
--- a/src/mutation/mutation-util.h
+++ b/src/mutation/mutation-util.h
@@ -2,13 +2,13 @@
 
 #include "system/angband.h"
 
-// Gain Mutation.
-typedef struct gm_type {
+// Gain and Lose Mutation.
+typedef struct glm_type {
     BIT_FLAGS *muta_class;
     int muta_which; // mutation_flag_type_1 とmutation_flag_type_2 の両対応とするため、敢えてint型で定義する
     concptr muta_desc;
     bool muta_chosen;
     MUTATION_IDX choose_mut;
-} gm_type;
+} glm_type;
 
-gm_type *initialize_gm_type(gm_type *gm_ptr, MUTATION_IDX choose_mut);
+glm_type *initialize_gm_type(glm_type *gm_ptr, MUTATION_IDX choose_mut);
diff --git a/src/mutation/mutation.c b/src/mutation/mutation.c
index 7621dbc17..747d65158 100644
--- a/src/mutation/mutation.c
+++ b/src/mutation/mutation.c
@@ -77,616 +77,615 @@
  */
 bool lose_mutation(player_type *creature_ptr, MUTATION_IDX choose_mut)
 {
+    glm_type tmp_glm;
+    glm_type *glm_ptr = initialize_gm_type(&tmp_glm, choose_mut);
     int attempts_left = 20;
-    concptr muta_desc = "";
-    bool muta_chosen = FALSE;
-    int muta_which = 0; // mutation_flag_type_1 とmutation_flag_type_2 の両対応とするため、敢えてint型で定義する
-    BIT_FLAGS *muta_class = NULL;
-    if (choose_mut)
+    if (glm_ptr->choose_mut)
         attempts_left = 1;
 
     while (attempts_left--) {
-        switch (choose_mut ? choose_mut : randint1(193)) {
+        switch ((glm_ptr->choose_mut != 0) ? glm_ptr->choose_mut : randint1(193)) {
         case 1:
         case 2:
         case 3:
         case 4:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_SPIT_ACID;
-            muta_desc = _("酸を吹きかける能力を失った。", "You lose the ability to spit acid.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_SPIT_ACID;
+            glm_ptr->muta_desc = _("酸を吹きかける能力を失った。", "You lose the ability to spit acid.");
             break;
         case 5:
         case 6:
         case 7:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_BR_FIRE;
-            muta_desc = _("炎のブレスを吐く能力を失った。", "You lose the ability to breathe fire.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_BR_FIRE;
+            glm_ptr->muta_desc = _("炎のブレスを吐く能力を失った。", "You lose the ability to breathe fire.");
             break;
         case 8:
         case 9:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_HYPN_GAZE;
-            muta_desc = _("あなたの目はつまらない目になった。", "Your eyes look uninteresting.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_HYPN_GAZE;
+            glm_ptr->muta_desc = _("あなたの目はつまらない目になった。", "Your eyes look uninteresting.");
             break;
         case 10:
         case 11:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_TELEKINES;
-            muta_desc = _("念動力で物を動かす能力を失った。", "You lose the ability to move objects telekinetically.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_TELEKINES;
+            glm_ptr->muta_desc = _("念動力で物を動かす能力を失った。", "You lose the ability to move objects telekinetically.");
             break;
         case 12:
         case 13:
         case 14:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_VTELEPORT;
-            muta_desc = _("自分の意思でテレポートする能力を失った。", "You lose the power of teleportation at will.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_VTELEPORT;
+            glm_ptr->muta_desc = _("自分の意思でテレポートする能力を失った。", "You lose the power of teleportation at will.");
             break;
         case 15:
         case 16:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_MIND_BLST;
-            muta_desc = _("精神攻撃の能力を失った。", "You lose the power of Mind Blast.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_MIND_BLST;
+            glm_ptr->muta_desc = _("精神攻撃の能力を失った。", "You lose the power of Mind Blast.");
             break;
         case 17:
         case 18:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_RADIATION;
-            muta_desc = _("あなたは放射能を発生しなくなった。", "You stop emitting hard radiation.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_RADIATION;
+            glm_ptr->muta_desc = _("あなたは放射能を発生しなくなった。", "You stop emitting hard radiation.");
             break;
         case 19:
         case 20:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_VAMPIRISM;
-            muta_desc = _("吸血の能力を失った。", "You are no longer vampiric.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_VAMPIRISM;
+            glm_ptr->muta_desc = _("吸血の能力を失った。", "You are no longer vampiric.");
             break;
         case 21:
         case 22:
         case 23:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_SMELL_MET;
-            muta_desc = _("金属の臭いを嗅げなくなった。", "You no longer smell a metallic odor.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_SMELL_MET;
+            glm_ptr->muta_desc = _("金属の臭いを嗅げなくなった。", "You no longer smell a metallic odor.");
             break;
         case 24:
         case 25:
         case 26:
         case 27:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_SMELL_MON;
-            muta_desc = _("不潔なモンスターの臭いを嗅げなくなった。", "You no longer smell filthy monsters.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_SMELL_MON;
+            glm_ptr->muta_desc = _("不潔なモンスターの臭いを嗅げなくなった。", "You no longer smell filthy monsters.");
             break;
         case 28:
         case 29:
         case 30:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_BLINK;
-            muta_desc = _("近距離テレポートの能力を失った。", "You lose the power of minor teleportation.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_BLINK;
+            glm_ptr->muta_desc = _("近距離テレポートの能力を失った。", "You lose the power of minor teleportation.");
             break;
         case 31:
         case 32:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_EAT_ROCK;
-            muta_desc = _("壁は美味しそうに見えなくなった。", "The walls look unappetizing.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_EAT_ROCK;
+            glm_ptr->muta_desc = _("壁は美味しそうに見えなくなった。", "The walls look unappetizing.");
             break;
         case 33:
         case 34:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_SWAP_POS;
-            muta_desc = _("あなたは自分の靴に留まる感じがする。", "You feel like staying in your own shoes.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_SWAP_POS;
+            glm_ptr->muta_desc = _("あなたは自分の靴に留まる感じがする。", "You feel like staying in your own shoes.");
             break;
         case 35:
         case 36:
         case 37:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_SHRIEK;
-            muta_desc = _("あなたの声質は弱くなった。", "Your vocal cords get much weaker.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_SHRIEK;
+            glm_ptr->muta_desc = _("あなたの声質は弱くなった。", "Your vocal cords get much weaker.");
             break;
         case 38:
         case 39:
         case 40:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_ILLUMINE;
-            muta_desc = _("部屋を明るく照らすことが出来なくなった。", "You can no longer light up rooms with your presence.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_ILLUMINE;
+            glm_ptr->muta_desc = _("部屋を明るく照らすことが出来なくなった。", "You can no longer light up rooms with your presence.");
             break;
         case 41:
         case 42:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_DET_CURSE;
-            muta_desc = _("邪悪な魔法を感じられなくなった。", "You can no longer feel evil magics.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_DET_CURSE;
+            glm_ptr->muta_desc = _("邪悪な魔法を感じられなくなった。", "You can no longer feel evil magics.");
             break;
         case 43:
         case 44:
         case 45:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_BERSERK;
-            muta_desc = _("制御できる激情を感じなくなった。", "You no longer feel a controlled rage.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_BERSERK;
+            glm_ptr->muta_desc = _("制御できる激情を感じなくなった。", "You no longer feel a controlled rage.");
             break;
         case 46:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_POLYMORPH;
-            muta_desc = _("あなたの体は安定したように見える。", "Your body seems stable.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_POLYMORPH;
+            glm_ptr->muta_desc = _("あなたの体は安定したように見える。", "Your body seems stable.");
             break;
         case 47:
         case 48:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_MIDAS_TCH;
-            muta_desc = _("ミダスの手の能力を失った。", "You lose the Midas touch.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_MIDAS_TCH;
+            glm_ptr->muta_desc = _("ミダスの手の能力を失った。", "You lose the Midas touch.");
             break;
         case 49:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_GROW_MOLD;
-            muta_desc = _("突然カビが嫌いになった。", "You feel a sudden dislike for mold.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_GROW_MOLD;
+            glm_ptr->muta_desc = _("突然カビが嫌いになった。", "You feel a sudden dislike for mold.");
             break;
         case 50:
         case 51:
         case 52:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_RESIST;
-            muta_desc = _("傷つき易くなった気がする。", "You feel like you might be vulnerable.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_RESIST;
+            glm_ptr->muta_desc = _("傷つき易くなった気がする。", "You feel like you might be vulnerable.");
             break;
         case 53:
         case 54:
         case 55:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_EARTHQUAKE;
-            muta_desc = _("ダンジョンを壊す能力を失った。", "You lose the ability to wreck the dungeon.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_EARTHQUAKE;
+            glm_ptr->muta_desc = _("ダンジョンを壊す能力を失った。", "You lose the ability to wreck the dungeon.");
             break;
         case 56:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_EAT_MAGIC;
-            muta_desc = _("魔法のアイテムはもう美味しそうに見えなくなった。", "Your magic items no longer look delicious.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_EAT_MAGIC;
+            glm_ptr->muta_desc = _("魔法のアイテムはもう美味しそうに見えなくなった。", "Your magic items no longer look delicious.");
             break;
         case 57:
         case 58:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_WEIGH_MAG;
-            muta_desc = _("魔力を感じられなくなった。", "You no longer sense magic.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_WEIGH_MAG;
+            glm_ptr->muta_desc = _("魔力を感じられなくなった。", "You no longer sense magic.");
             break;
         case 59:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_STERILITY;
-            muta_desc = _("たくさんの安堵の吐息が聞こえた。", "You hear a massed sigh of relief.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_STERILITY;
+            glm_ptr->muta_desc = _("たくさんの安堵の吐息が聞こえた。", "You hear a massed sigh of relief.");
             break;
         case 60:
         case 61:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_HIT_AND_AWAY;
-            muta_desc = _("あちこちへ跳べる気分がなくなった。", "You no longer feel jumpy.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_HIT_AND_AWAY;
+            glm_ptr->muta_desc = _("あちこちへ跳べる気分がなくなった。", "You no longer feel jumpy.");
             break;
         case 62:
         case 63:
         case 64:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_DAZZLE;
-            muta_desc = _("まばゆい閃光を発する能力を失った。", "You lose the ability to emit dazzling lights.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_DAZZLE;
+            glm_ptr->muta_desc = _("まばゆい閃光を発する能力を失った。", "You lose the ability to emit dazzling lights.");
             break;
         case 65:
         case 66:
         case 67:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_LASER_EYE;
-            muta_desc = _("眼が少しの間焼き付いて、痛みが和らいだ。", "Your eyes burn for a moment, then feel soothed.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_LASER_EYE;
+            glm_ptr->muta_desc = _("眼が少しの間焼き付いて、痛みが和らいだ。", "Your eyes burn for a moment, then feel soothed.");
             break;
         case 68:
         case 69:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_RECALL;
-            muta_desc = _("少しの間ホームシックになった。", "You feel briefly homesick.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_RECALL;
+            glm_ptr->muta_desc = _("少しの間ホームシックになった。", "You feel briefly homesick.");
             break;
         case 70:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_BANISH;
-            muta_desc = _("神聖な怒りの力を感じなくなった。", "You no longer feel a holy wrath.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_BANISH;
+            glm_ptr->muta_desc = _("神聖な怒りの力を感じなくなった。", "You no longer feel a holy wrath.");
             break;
         case 71:
         case 72:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_COLD_TOUCH;
-            muta_desc = _("手が暖かくなった。", "Your hands warm up.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_COLD_TOUCH;
+            glm_ptr->muta_desc = _("手が暖かくなった。", "Your hands warm up.");
             break;
         case 73:
         case 74:
-            muta_class = &(creature_ptr->muta1);
-            muta_which = MUT1_LAUNCHER;
-            muta_desc = _("物を投げる手が弱くなった気がする。", "Your throwing arm feels much weaker.");
+            glm_ptr->muta_class = &(creature_ptr->muta1);
+            glm_ptr->muta_which = MUT1_LAUNCHER;
+            glm_ptr->muta_desc = _("物を投げる手が弱くなった気がする。", "Your throwing arm feels much weaker.");
             break;
         case 75:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_BERS_RAGE;
-            muta_desc = _("凶暴化の発作にさらされなくなった！", "You are no longer subject to fits of berserk rage!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_BERS_RAGE;
+            glm_ptr->muta_desc = _("凶暴化の発作にさらされなくなった！", "You are no longer subject to fits of berserk rage!");
             break;
         case 76:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_COWARDICE;
-            muta_desc = _("もう信じがたいほど臆病ではなくなった！", "You are no longer an incredible coward!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_COWARDICE;
+            glm_ptr->muta_desc = _("もう信じがたいほど臆病ではなくなった！", "You are no longer an incredible coward!");
             break;
         case 77:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_RTELEPORT;
-            muta_desc = _("あなたの位置はより確定的になった。", "Your position seems more certain.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_RTELEPORT;
+            glm_ptr->muta_desc = _("あなたの位置はより確定的になった。", "Your position seems more certain.");
             break;
         case 78:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_ALCOHOL;
-            muta_desc = _("あなたはアルコールを分泌しなくなった！", "Your body stops producing alcohol!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_ALCOHOL;
+            glm_ptr->muta_desc = _("あなたはアルコールを分泌しなくなった！", "Your body stops producing alcohol!");
             break;
         case 79:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_HALLU;
-            muta_desc = _("幻覚をひき起こす精神障害を起こさなくなった！", "You are no longer afflicted by a hallucinatory insanity!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_HALLU;
+            glm_ptr->muta_desc = _("幻覚をひき起こす精神障害を起こさなくなった！", "You are no longer afflicted by a hallucinatory insanity!");
             break;
         case 80:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_FLATULENT;
-            muta_desc = _("もう強烈な屁はこかなくなった。", "You are no longer subject to uncontrollable flatulence.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_FLATULENT;
+            glm_ptr->muta_desc = _("もう強烈な屁はこかなくなった。", "You are no longer subject to uncontrollable flatulence.");
             break;
         case 81:
         case 82:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_SCOR_TAIL;
-            muta_desc = _("サソリの尻尾がなくなった！", "You lose your scorpion tail!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_SCOR_TAIL;
+            glm_ptr->muta_desc = _("サソリの尻尾がなくなった！", "You lose your scorpion tail!");
             break;
         case 83:
         case 84:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_HORNS;
-            muta_desc = _("額から角が消えた！", "Your horns vanish from your forehead!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_HORNS;
+            glm_ptr->muta_desc = _("額から角が消えた！", "Your horns vanish from your forehead!");
             break;
         case 85:
         case 86:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_BEAK;
-            muta_desc = _("口が普通に戻った！", "Your mouth reverts to normal!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_BEAK;
+            glm_ptr->muta_desc = _("口が普通に戻った！", "Your mouth reverts to normal!");
             break;
         case 87:
         case 88:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_ATT_DEMON;
-            muta_desc = _("デーモンを引き寄せなくなった。", "You stop attracting demons.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_ATT_DEMON;
+            glm_ptr->muta_desc = _("デーモンを引き寄せなくなった。", "You stop attracting demons.");
             break;
         case 89:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_PROD_MANA;
-            muta_desc = _("制御不能な魔法のエネルギーを発生しなくなった。", "You stop producing magical energy uncontrollably.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_PROD_MANA;
+            glm_ptr->muta_desc = _("制御不能な魔法のエネルギーを発生しなくなった。", "You stop producing magical energy uncontrollably.");
             break;
         case 90:
         case 91:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_SPEED_FLUX;
-            muta_desc = _("躁鬱質でなくなった。", "You are no longer manic-depressive.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_SPEED_FLUX;
+            glm_ptr->muta_desc = _("躁鬱質でなくなった。", "You are no longer manic-depressive.");
             break;
         case 92:
         case 93:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_BANISH_ALL;
-            muta_desc = _("背後に恐ろしい力を感じなくなった。", "You no longer feel a terrifying power lurking behind you.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_BANISH_ALL;
+            glm_ptr->muta_desc = _("背後に恐ろしい力を感じなくなった。", "You no longer feel a terrifying power lurking behind you.");
             break;
         case 94:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_EAT_LIGHT;
-            muta_desc = _("世界が明るいと感じる。", "You feel the world's a brighter place.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_EAT_LIGHT;
+            glm_ptr->muta_desc = _("世界が明るいと感じる。", "You feel the world's a brighter place.");
             break;
         case 95:
         case 96:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_TRUNK;
-            muta_desc = _("鼻が普通の長さに戻った。", "Your nose returns to a normal length.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_TRUNK;
+            glm_ptr->muta_desc = _("鼻が普通の長さに戻った。", "Your nose returns to a normal length.");
             break;
         case 97:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_ATT_ANIMAL;
-            muta_desc = _("動物を引き寄せなくなった。", "You stop attracting animals.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_ATT_ANIMAL;
+            glm_ptr->muta_desc = _("動物を引き寄せなくなった。", "You stop attracting animals.");
             break;
         case 98:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_TENTACLES;
-            muta_desc = _("触手が消えた。", "Your tentacles vanish from your sides.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_TENTACLES;
+            glm_ptr->muta_desc = _("触手が消えた。", "Your tentacles vanish from your sides.");
             break;
         case 99:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_RAW_CHAOS;
-            muta_desc = _("周囲の空間が安定した気がする。", "You feel the universe is more stable around you.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_RAW_CHAOS;
+            glm_ptr->muta_desc = _("周囲の空間が安定した気がする。", "You feel the universe is more stable around you.");
             break;
         case 100:
         case 101:
         case 102:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_NORMALITY;
-            muta_desc = _("普通に奇妙な感じがする。", "You feel normally strange.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_NORMALITY;
+            glm_ptr->muta_desc = _("普通に奇妙な感じがする。", "You feel normally strange.");
             break;
         case 103:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_WRAITH;
-            muta_desc = _("あなたは物質世界にしっかり存在している。", "You are firmly in the physical world.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_WRAITH;
+            glm_ptr->muta_desc = _("あなたは物質世界にしっかり存在している。", "You are firmly in the physical world.");
             break;
         case 104:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_POLY_WOUND;
-            muta_desc = _("古い傷からカオスの力が去っていった。", "You feel forces of chaos departing your old scars.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_POLY_WOUND;
+            glm_ptr->muta_desc = _("古い傷からカオスの力が去っていった。", "You feel forces of chaos departing your old scars.");
             break;
         case 105:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_WASTING;
-            muta_desc = _("おぞましい衰弱病が治った！", "You are cured of the horrible wasting disease!");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_WASTING;
+            glm_ptr->muta_desc = _("おぞましい衰弱病が治った！", "You are cured of the horrible wasting disease!");
             break;
         case 106:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_ATT_DRAGON;
-            muta_desc = _("ドラゴンを引き寄せなくなった。", "You stop attracting dragons.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_ATT_DRAGON;
+            glm_ptr->muta_desc = _("ドラゴンを引き寄せなくなった。", "You stop attracting dragons.");
             break;
         case 107:
         case 108:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_WEIRD_MIND;
-            muta_desc = _("思考が退屈な方向に戻った。", "Your thoughts return to boring paths.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_WEIRD_MIND;
+            glm_ptr->muta_desc = _("思考が退屈な方向に戻った。", "Your thoughts return to boring paths.");
             break;
         case 109:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_NAUSEA;
-            muta_desc = _("胃が痙攣しなくなった。", "Your stomach stops roiling.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_NAUSEA;
+            glm_ptr->muta_desc = _("胃が痙攣しなくなった。", "Your stomach stops roiling.");
             break;
         case 110:
         case 111:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_CHAOS_GIFT;
-            muta_desc = _("混沌の神々の興味を惹かなくなった。", "You lose the attention of the chaos deities.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_CHAOS_GIFT;
+            glm_ptr->muta_desc = _("混沌の神々の興味を惹かなくなった。", "You lose the attention of the chaos deities.");
             break;
         case 112:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_WALK_SHAD;
-            muta_desc = _("物質世界に捕らわれている気がする。", "You feel like you're trapped in reality.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_WALK_SHAD;
+            glm_ptr->muta_desc = _("物質世界に捕らわれている気がする。", "You feel like you're trapped in reality.");
             break;
         case 113:
         case 114:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_WARNING;
-            muta_desc = _("パラノイアでなくなった。", "You no longer feel paranoid.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_WARNING;
+            glm_ptr->muta_desc = _("パラノイアでなくなった。", "You no longer feel paranoid.");
             break;
         case 115:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_INVULN;
-            muta_desc = _("無敵状態の発作を起こさなくなった。", "You are no longer blessed with fits of invulnerability.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_INVULN;
+            glm_ptr->muta_desc = _("無敵状態の発作を起こさなくなった。", "You are no longer blessed with fits of invulnerability.");
             break;
         case 116:
         case 117:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_SP_TO_HP;
-            muta_desc = _("魔法の治癒の発作に襲われなくなった。", "You are no longer subject to fits of magical healing.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_SP_TO_HP;
+            glm_ptr->muta_desc = _("魔法の治癒の発作に襲われなくなった。", "You are no longer subject to fits of magical healing.");
             break;
         case 118:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_HP_TO_SP;
-            muta_desc = _("痛みを伴う精神明瞭化の発作に襲われなくなった。", "You are no longer subject to fits of painful clarity.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_HP_TO_SP;
+            glm_ptr->muta_desc = _("痛みを伴う精神明瞭化の発作に襲われなくなった。", "You are no longer subject to fits of painful clarity.");
             break;
         case 119:
-            muta_class = &(creature_ptr->muta2);
-            muta_which = MUT2_DISARM;
-            muta_desc = _("脚が元の大きさに戻った。", "Your feet shrink to their former size.");
+            glm_ptr->muta_class = &(creature_ptr->muta2);
+            glm_ptr->muta_which = MUT2_DISARM;
+            glm_ptr->muta_desc = _("脚が元の大きさに戻った。", "Your feet shrink to their former size.");
             break;
         case 120:
         case 121:
         case 122:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_HYPER_STR;
-            muta_desc = _("筋肉が普通に戻った。", "Your muscles revert to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_HYPER_STR;
+            glm_ptr->muta_desc = _("筋肉が普通に戻った。", "Your muscles revert to normal.");
             break;
         case 123:
         case 124:
         case 125:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_PUNY;
-            muta_desc = _("筋肉が普通に戻った。", "Your muscles revert to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_PUNY;
+            glm_ptr->muta_desc = _("筋肉が普通に戻った。", "Your muscles revert to normal.");
             break;
         case 126:
         case 127:
         case 128:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_HYPER_INT;
-            muta_desc = _("脳が普通に戻った。", "Your brain reverts to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_HYPER_INT;
+            glm_ptr->muta_desc = _("脳が普通に戻った。", "Your brain reverts to normal.");
             break;
         case 129:
         case 130:
         case 131:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_MORONIC;
-            muta_desc = _("脳が普通に戻った。", "Your brain reverts to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_MORONIC;
+            glm_ptr->muta_desc = _("脳が普通に戻った。", "Your brain reverts to normal.");
             break;
         case 132:
         case 133:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_RESILIENT;
-            muta_desc = _("普通の丈夫さに戻った。", "You become ordinarily resilient again.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_RESILIENT;
+            glm_ptr->muta_desc = _("普通の丈夫さに戻った。", "You become ordinarily resilient again.");
             break;
         case 134:
         case 135:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_XTRA_FAT;
-            muta_desc = _("奇跡的なダイエットに成功した！", "You benefit from a miracle diet!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_XTRA_FAT;
+            glm_ptr->muta_desc = _("奇跡的なダイエットに成功した！", "You benefit from a miracle diet!");
             break;
         case 136:
         case 137:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_ALBINO;
-            muta_desc = _("アルビノでなくなった！", "You are no longer an albino!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_ALBINO;
+            glm_ptr->muta_desc = _("アルビノでなくなった！", "You are no longer an albino!");
             break;
         case 138:
         case 139:
         case 140:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_FLESH_ROT;
-            muta_desc = _("肉体を腐敗させる病気が治った！", "Your flesh is no longer afflicted by a rotting disease!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_FLESH_ROT;
+            glm_ptr->muta_desc = _("肉体を腐敗させる病気が治った！", "Your flesh is no longer afflicted by a rotting disease!");
             break;
         case 141:
         case 142:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_SILLY_VOI;
-            muta_desc = _("声質が普通に戻った。", "Your voice returns to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_SILLY_VOI;
+            glm_ptr->muta_desc = _("声質が普通に戻った。", "Your voice returns to normal.");
             break;
         case 143:
         case 144:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_BLANK_FAC;
-            muta_desc = _("顔に目鼻が戻った。", "Your facial features return.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_BLANK_FAC;
+            glm_ptr->muta_desc = _("顔に目鼻が戻った。", "Your facial features return.");
             break;
         case 145:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_ILL_NORM;
-            muta_desc = _("心が安らぐ幻影を映し出さなくなった。", "You stop projecting a reassuring image.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_ILL_NORM;
+            glm_ptr->muta_desc = _("心が安らぐ幻影を映し出さなくなった。", "You stop projecting a reassuring image.");
             break;
         case 146:
         case 147:
         case 148:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_XTRA_EYES;
-            muta_desc = _("余分な目が消えてしまった！", "Your extra eyes vanish!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_XTRA_EYES;
+            glm_ptr->muta_desc = _("余分な目が消えてしまった！", "Your extra eyes vanish!");
             break;
         case 149:
         case 150:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_MAGIC_RES;
-            muta_desc = _("魔法に弱くなった。", "You become susceptible to magic again.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_MAGIC_RES;
+            glm_ptr->muta_desc = _("魔法に弱くなった。", "You become susceptible to magic again.");
             break;
         case 151:
         case 152:
         case 153:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_XTRA_NOIS;
-            muta_desc = _("奇妙な音を立てなくなった！", "You stop making strange noise!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_XTRA_NOIS;
+            glm_ptr->muta_desc = _("奇妙な音を立てなくなった！", "You stop making strange noise!");
             break;
         case 154:
         case 155:
         case 156:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_INFRAVIS;
-            muta_desc = _("赤外線視力が落ちた。", "Your infravision is degraded.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_INFRAVIS;
+            glm_ptr->muta_desc = _("赤外線視力が落ちた。", "Your infravision is degraded.");
             break;
         case 157:
         case 158:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_XTRA_LEGS;
-            muta_desc = _("余分な脚が消えてしまった！", "Your extra legs disappear!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_XTRA_LEGS;
+            glm_ptr->muta_desc = _("余分な脚が消えてしまった！", "Your extra legs disappear!");
             break;
         case 159:
         case 160:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_SHORT_LEG;
-            muta_desc = _("脚の長さが普通に戻った。", "Your legs lengthen to normal.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_SHORT_LEG;
+            glm_ptr->muta_desc = _("脚の長さが普通に戻った。", "Your legs lengthen to normal.");
             break;
         case 161:
         case 162:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_ELEC_TOUC;
-            muta_desc = _("体を電流が流れなくなった。", "Electricity stops running through you.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_ELEC_TOUC;
+            glm_ptr->muta_desc = _("体を電流が流れなくなった。", "Electricity stops running through you.");
             break;
         case 163:
         case 164:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_FIRE_BODY;
-            muta_desc = _("体が炎に包まれなくなった。", "Your body is no longer enveloped in flames.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_FIRE_BODY;
+            glm_ptr->muta_desc = _("体が炎に包まれなくなった。", "Your body is no longer enveloped in flames.");
             break;
         case 165:
         case 166:
         case 167:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_WART_SKIN;
-            muta_desc = _("イボイボが消えた！", "Your warts disappear!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_WART_SKIN;
+            glm_ptr->muta_desc = _("イボイボが消えた！", "Your warts disappear!");
             break;
         case 168:
         case 169:
         case 170:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_SCALES;
-            muta_desc = _("鱗が消えた！", "Your scales vanish!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_SCALES;
+            glm_ptr->muta_desc = _("鱗が消えた！", "Your scales vanish!");
             break;
         case 171:
         case 172:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_IRON_SKIN;
-            muta_desc = _("肌が肉にもどった！", "Your skin reverts to flesh!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_IRON_SKIN;
+            glm_ptr->muta_desc = _("肌が肉にもどった！", "Your skin reverts to flesh!");
             break;
         case 173:
         case 174:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_WINGS;
-            muta_desc = _("背中の羽根が取れ落ちた。", "Your wings fall off.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_WINGS;
+            glm_ptr->muta_desc = _("背中の羽根が取れ落ちた。", "Your wings fall off.");
             break;
         case 175:
         case 176:
         case 177:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_FEARLESS;
-            muta_desc = _("再び恐怖を感じるようになった。", "You begin to feel fear again.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_FEARLESS;
+            glm_ptr->muta_desc = _("再び恐怖を感じるようになった。", "You begin to feel fear again.");
             break;
         case 178:
         case 179:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_REGEN;
-            muta_desc = _("急速回復しなくなった。", "You stop regenerating.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_REGEN;
+            glm_ptr->muta_desc = _("急速回復しなくなった。", "You stop regenerating.");
             break;
         case 180:
         case 181:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_ESP;
-            muta_desc = _("テレパシーの能力を失った！", "You lose your telepathic ability!");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_ESP;
+            glm_ptr->muta_desc = _("テレパシーの能力を失った！", "You lose your telepathic ability!");
             break;
         case 182:
         case 183:
         case 184:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_LIMBER;
-            muta_desc = _("筋肉が硬くなった。", "Your muscles stiffen.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_LIMBER;
+            glm_ptr->muta_desc = _("筋肉が硬くなった。", "Your muscles stiffen.");
             break;
         case 185:
         case 186:
         case 187:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_ARTHRITIS;
-            muta_desc = _("関節が痛くなくなった。", "Your joints stop hurting.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_ARTHRITIS;
+            glm_ptr->muta_desc = _("関節が痛くなくなった。", "Your joints stop hurting.");
             break;
         case 188:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_BAD_LUCK;
-            muta_desc = _("黒いオーラは渦巻いて消えた。", "Your black aura swirls and fades.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_BAD_LUCK;
+            glm_ptr->muta_desc = _("黒いオーラは渦巻いて消えた。", "Your black aura swirls and fades.");
             break;
         case 189:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_VULN_ELEM;
-            muta_desc = _("無防備な感じはなくなった。", "You feel less exposed.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_VULN_ELEM;
+            glm_ptr->muta_desc = _("無防備な感じはなくなった。", "You feel less exposed.");
             break;
         case 190:
         case 191:
         case 192:
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_MOTION;
-            muta_desc = _("動作の正確さがなくなった。", "You move with less assurance.");
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_MOTION;
+            glm_ptr->muta_desc = _("動作の正確さがなくなった。", "You move with less assurance.");
             break;
         case 193:
             if (creature_ptr->pseikaku == PERSONALITY_LUCKY)
                 break;
-            muta_class = &(creature_ptr->muta3);
-            muta_which = MUT3_GOOD_LUCK;
-            muta_desc = _("白いオーラは輝いて消えた。", "Your white aura shimmers and fades.");
+
+            glm_ptr->muta_class = &(creature_ptr->muta3);
+            glm_ptr->muta_which = MUT3_GOOD_LUCK;
+            glm_ptr->muta_desc = _("白いオーラは輝いて消えた。", "Your white aura shimmers and fades.");
             break;
         default:
-            muta_class = NULL;
-            muta_which = 0;
+            glm_ptr->muta_class = NULL;
+            glm_ptr->muta_which = 0;
             break;
         }
 
-        if (muta_class && muta_which) {
-            if (*(muta_class)&muta_which) {
-                muta_chosen = TRUE;
+        if (glm_ptr->muta_class && glm_ptr->muta_which) {
+            if (*(glm_ptr->muta_class)&glm_ptr->muta_which) {
+                glm_ptr->muta_chosen = TRUE;
             }
         }
 
-        if (muta_chosen == TRUE)
+        if (glm_ptr->muta_chosen)
             break;
     }
 
-    if (!muta_chosen)
+    if (!glm_ptr->muta_chosen)
         return FALSE;
 
-    msg_print(muta_desc);
-    *muta_class &= ~(muta_which);
+    msg_print(glm_ptr->muta_desc);
+    *glm_ptr->muta_class &= ~(glm_ptr->muta_which);
     creature_ptr->update |= PU_BONUS;
     handle_stuff(creature_ptr);
     creature_ptr->mutant_regenerate_mod = calc_mutant_regenerate_mod(creature_ptr);
-- 
2.11.0