begin ! This shows that the icode does not distinguish the two declarations, ! and the initialisation relies on finding the declaration on the stack. ! I suspect we can get by with having a single flex array for the ! current declarations initial values. ! ! When we pop the stack at codegen time, we'll either hit an INIT ! first (at which point we save them up, in reverse order) or ! we hit the $DEF and there's no initialisation needed. ownintegerarray one(0:3) ownintegerarray two(0:3) = 1, 2, 3, 4 one(2) = two(1) endofprogram