subtypep: remove useless eq.

* lib.c (subtypep): The sub and sup parameters are compared
for equality early in the function; byt the time we get
here, we know they are not eq, so nil can be returned.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib.c b/lib.c
index f4810a44..cba770b2 100644
--- a/lib.c
+++ b/lib.c
@@ -254,7 +254,7 @@ val subtypep(val sub, val sup)
       return nil;
     }
 
-    return eq(sub, sup);
+    return nil;
   }
 }