X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fundo.c;h=f8d844e70357181234e37af079b29cd5a3d6a34e;hb=c9a88265cd5f978b60830d4ef5e6f8b2246c3072;hp=41af38e56b933bb4090d4754fcb0019a14de5261;hpb=ea1ea793fe6e244ef5555ed983423a204101af13;p=chise%2Fxemacs-chise.git.1

diff --git a/src/undo.c b/src/undo.c
index 41af38e..f8d844e 100644
--- a/src/undo.c
+++ b/src/undo.c
@@ -281,7 +281,7 @@ truncate_undo_list (Lisp_Object list, int minsize, int maxsize)
       && NILP (XCAR (next)))
     {
       /* Add in the space occupied by this element and its chain link.  */
-      size_so_far += sizeof (struct Lisp_Cons);
+      size_so_far += sizeof (Lisp_Cons);
 
       /* Advance to next element.  */
       prev = next;
@@ -294,12 +294,12 @@ truncate_undo_list (Lisp_Object list, int minsize, int maxsize)
       elt = XCAR (next);
 
       /* Add in the space occupied by this element and its chain link.  */
-      size_so_far += sizeof (struct Lisp_Cons);
+      size_so_far += sizeof (Lisp_Cons);
       if (CONSP (elt))
 	{
-	  size_so_far += sizeof (struct Lisp_Cons);
+	  size_so_far += sizeof (Lisp_Cons);
 	  if (STRINGP (XCAR (elt)))
-	    size_so_far += (sizeof (struct Lisp_String) - 1
+	    size_so_far += (sizeof (Lisp_String) - 1
 			    + XSTRING_LENGTH (XCAR (elt)));
 	}
 
@@ -329,12 +329,12 @@ truncate_undo_list (Lisp_Object list, int minsize, int maxsize)
 	}
 
       /* Add in the space occupied by this element and its chain link.  */
-      size_so_far += sizeof (struct Lisp_Cons);
+      size_so_far += sizeof (Lisp_Cons);
       if (CONSP (elt))
 	{
-	  size_so_far += sizeof (struct Lisp_Cons);
+	  size_so_far += sizeof (Lisp_Cons);
 	  if (STRINGP (XCAR (elt)))
-	    size_so_far += (sizeof (struct Lisp_String) - 1
+	    size_so_far += (sizeof (Lisp_String) - 1
                             + XSTRING_LENGTH (XCAR (elt)));
 	}