diff --git a/src/pike_types.c b/src/pike_types.c
index b7797d407be5d61ddec698286309591610f443f5..522765f5a2e125d189a4fa937afa52b9b67b2069 100644
--- a/src/pike_types.c
+++ b/src/pike_types.c
@@ -5,7 +5,7 @@
 \*/
 /**/
 #include "global.h"
-RCSID("$Id: pike_types.c,v 1.127 2000/03/17 05:13:17 hubbe Exp $");
+RCSID("$Id: pike_types.c,v 1.128 2000/03/23 19:05:08 grubba Exp $");
 #include <ctype.h>
 #include "svalue.h"
 #include "pike_types.h"
@@ -3365,6 +3365,7 @@ static struct pike_string *low_object_type_to_program_type(char *obj_t)
     }
     return NULL;
   }
+  /* FIXME: obj_t + 1 should propagate to the return-type in sub. */
   if (res) {
     struct pike_string *tmp = or_pike_types(res, sub, 1);
     free_string(res);
@@ -3468,9 +3469,11 @@ void yyexplain_nonmatching_types(struct pike_string *type_a,
 
   match_types(type_a,type_b);
 
+#if 0
   if(!(implements_a && implements_b &&
        type_a->str[0]==T_OBJECT &&
        type_b->str[0]==T_OBJECT))
+#endif /* 0 */
   {
     struct pike_string *s1,*s2;
     s1=describe_type(type_a);