--| Copyright (c) 1993-2006 University of Southern California and contributors. --| All rights reserved. --| Your use of this work is governed under the terms of the GNU General --| Public License version 2. class TEST create make feature make is local a, retrieved_a: A l_raw: RAW_FILE do create a a.b1.set_i (28) a.b2.set_i (32) create l_raw.make_open_write ("toot") l_raw.independent_store (a) l_raw.close create l_raw.make_open_read ("toot") retrieved_a ?= l_raw.retrieved l_raw.close print (retrieved_a.b1.i); io.new_line print (retrieved_a.b2.i); io.new_line end end