diff --git a/examples/glue.c b/examples/glue.c
index 778f356a2db9f55b7cc10907db1b4d4a76fa4613..29b8de7180863a5014acff87ac3a1ee2515a085e 100644
--- a/examples/glue.c
+++ b/examples/glue.c
@@ -83,7 +83,9 @@ HParsedToken *h_make_(HArena *arena, HTokenType type)
 
 HParsedToken *h_make_seq(HArena *arena)
 {
-  return h_make_(arena, TT_SEQUENCE);
+  HParsedToken *ret = h_make_(arena, TT_SEQUENCE);
+  ret->seq = h_carray_new(arena);
+  return ret;
 }
 
 HParsedToken *h_make(HArena *arena, HTokenType type, void *value)