-- COMP1100
-- class with program design (logic) error

class DATA07
   
creation
   make
   
feature
   
   data : ARRAY[INTEGER]
   
   make is
      do
	 -- specific data values
	 data := <<16,12,34,56,11,67,95,63,56,81>>
	 -- processing
	 forward  -- print in forward order
      end
   
   forward is
      local
	 i : INTEGER
	 val : INTEGER
      do
	 from
	    i := data.lower
	 until
	    (i > data.upper)
	 loop
	    -- process i-th item
	    val := data.item(i)
	    io.put_integer(val)
	    io.put_new_line
	    -- advance i
	    i := i + 1
	 end
	 io.put_new_line
      end
   
end -- class DATA07