From: Vincent Pit <vince@profvince.com>
Date: Mon, 19 Jan 2009 20:06:17 +0000 (+0100)
Subject: Add a cast to make icc happy
X-Git-Tag: v0.11~2
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=f3b3133a651bf5b1a4fc652bbf8488d05a573e92;p=perl%2Fmodules%2Findirect.git

Add a cast to make icc happy
---

diff --git a/indirect.xs b/indirect.xs
index 65b4a50..7dacc74 100644
--- a/indirect.xs
+++ b/indirect.xs
@@ -210,7 +210,7 @@ STATIC OP *indirect_ck_rv2sv(pTHX_ OP *o) {
   SV *sv;
   const char *name = NULL, *s;
   STRLEN len;
-  OPCODE type = op->op_type;
+  OPCODE type = (OPCODE) op->op_type;
 
   switch (type) {
    case OP_GV: