diff --git a/priv/host-arm/isel.c b/priv/host-arm/isel.c
index 6b239c7..6ceaa45 100644
--- a/priv/host-arm/isel.c
+++ b/priv/host-arm/isel.c
@@ -828,7 +828,7 @@
    /* --------- Call to DIRTY helper --------- */
    /* call complex ("dirty") helper function */
    case Ist_Dirty: {
-       IRType   retty;
+     //IRType   retty;
        IRDirty* d = stmt->Ist.Dirty.details;
        Bool     passBBP = False;
 
@@ -844,7 +844,7 @@
 	  /* No return value.  Nothing to do. */
 	  return;
       
-      retty = typeOfIRTemp(env->type_env, d->tmp);
+      //retty = typeOfIRTemp(env->type_env, d->tmp);
 
 // CAB: ?     if (retty == Ity_I64) {