--- a/src/marker.c	Wed Jan 20 07:05:57 2010 -0600
+++ b/src/marker.c	Wed Feb 24 01:58:04 2010 -0600
@@ -62,9 +62,9 @@
   if (print_readably)
     printing_unreadable_object ("#<marker 0x%lx>", (long) marker);
 
-  write_c_string (printcharfun, GETTEXT ("#<marker "));
+  write_ascstring (printcharfun, GETTEXT ("#<marker "));
   if (!marker->buffer)
-    write_c_string (printcharfun, GETTEXT ("in no buffer"));
+    write_ascstring (printcharfun, GETTEXT ("in no buffer"));
   else
     {
       write_fmt_string (printcharfun, "at %ld in ",
@@ -72,12 +72,13 @@
       print_internal (marker->buffer->name, printcharfun, 0);
     }
   if (marker->insertion_type)
-    write_c_string (printcharfun, " insertion-type=t");
+    write_ascstring (printcharfun, " insertion-type=t");
   write_fmt_string (printcharfun, " 0x%lx>", (long) marker);
 }
 
 static int
-marker_equal (Lisp_Object obj1, Lisp_Object obj2, int UNUSED (depth))
+marker_equal (Lisp_Object obj1, Lisp_Object obj2, int UNUSED (depth),
+	      int UNUSED (foldcase))
 {
   Lisp_Marker *marker1 = XMARKER (obj1);
   Lisp_Marker *marker2 = XMARKER (obj2);