--- a/src/lstream.c	Mon Aug 13 11:06:08 2007 +0200
+++ b/src/lstream.c	Mon Aug 13 11:07:10 2007 +0200
@@ -146,8 +146,8 @@
   Lstream *lstr = XLSTREAM (obj);
   char buf[200];
 
-  sprintf (buf, "#<INTERNAL EMACS BUG (%s lstream) 0x%p>",
-	   lstr->imp->name, lstr);
+  sprintf (buf, "#<INTERNAL OBJECT (XEmacs bug?) (%s lstream) 0x%lx>",
+	   lstr->imp->name, (long) lstr);
   write_c_string (buf, printcharfun);
 }
 
@@ -1617,8 +1617,8 @@
   struct lisp_buffer_stream *str =
     LISP_BUFFER_STREAM_DATA (XLSTREAM (stream));
 
-  (markobj) (str->start);
-  (markobj) (str->end);
+  markobj (str->start);
+  markobj (str->end);
   return str->buffer;
 }