From df817a54fc58ebdde94033adffc88a1d33852c32 Mon Sep 17 00:00:00 2001
From: Joseph Poirier <jdpoirier@gmail.com>
Date: Sun, 14 Jun 2015 01:18:31 -0500
Subject: [PATCH] cast from long to int

---
 expression.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/expression.c b/expression.c
index 38f5c8e..ad97615 100644
--- a/expression.c
+++ b/expression.c
@@ -315,7 +315,7 @@ long ExpressionAssignInt(struct ParseState *Parser, struct Value *DestValue,
         Result = FromInt;
 
     switch (DestValue->Typ->Base) {
-    case TypeInt:           DestValue->Val->Integer = FromInt; break;
+    case TypeInt:           DestValue->Val->Integer = (int)FromInt; break;
     case TypeShort:         DestValue->Val->ShortInteger = (short)FromInt; break;
     case TypeChar:          DestValue->Val->Character = (char)FromInt; break;
     case TypeLong:          DestValue->Val->LongInteger = (long)FromInt; break;