diff --git a/src/object.c b/src/object.c
index 9af58ab75fdbda31eccf6e68c08daa953e5154fb..b6aadbed9a55e332f1e82063bdb961d0548d189b 100644
--- a/src/object.c
+++ b/src/object.c
@@ -127,6 +127,8 @@ PMOD_EXPORT struct object *low_clone(struct program *p)
 
   o=alloc_object();
 
+  o->flags = 0;
+
   o->storage=p->storage_needed ? (char *)xcalloc(p->storage_needed, 1) : (char *)NULL;
 
   GC_ALLOC(o);
diff --git a/src/object.h b/src/object.h
index d1b100cb24f8eabb3f43a060bdaaa33e181060c4..25f131baecc27a37873a88589bbbb87097d9c3e1 100644
--- a/src/object.h
+++ b/src/object.h
@@ -19,6 +19,7 @@
 struct object
 {
   PIKE_MEMORY_OBJECT_MEMBERS; /* Must be first */
+  size_t flags;
   struct program *prog;
   struct object *next;
   struct object *prev;