Sophie

Sophie

distrib > Mageia > 9 > armv7hl > media > core-release-src > by-pkgid > 51bc1ec5d4bf2cda7a3139acfd9086d5 > files > 1

ocaml-ancient-0.9.0-18.mga9.src.rpm

--- ancient-0.9.0.old/ancient_c.c	2009-05-26 12:45:26.000000000 +0100
+++ ancient-0.9.0/ancient_c.c	2016-11-07 17:07:42.531413947 +0000
@@ -169,7 +169,7 @@
 }
 
 struct restore_item {
-  char *header;
+  header_t *header;
   value field_zero;
 };
 
@@ -203,7 +203,7 @@
   // which is already ancient.
   assert (Is_in_heap_or_young (obj));
 
-  char *header = Hp_val (obj);
+  header_t *header = Hp_val (obj);
 
   // If we've already visited this object, just return its offset
   // in the out-of-heap memory.