1 dcl       1 format_node                 based,
2           2 node_type                   fixed bin(15),
3           2 begin                       fixed bin(18),
4           2 size                        fixed bin(18),
5           2 next                        ptr,
6           2 block                       ptr,
7           2 origin                      ptr,
8           2 labels                      ptr;