diff --git a/src/c/character.d b/src/c/character.d
index f43ffcce5..62865a9a9 100644
--- a/src/c/character.d
+++ b/src/c/character.d
@@ -182,10 +182,8 @@ cl_alphanumericp(cl_object c)
     if (!ecl_char_eq(c, ecl_va_arg(cs))) {
       @(return ECL_NIL);
     }
-    else {
-      @(return ECL_T);
-    }
   }
+  @(return ECL_T);
 } @)
 
 bool