class TEST1 feature -- Initialization routine_with_anchor is -- Initialize local l_string: like string do create l_string.make (10) end string: STRING end -- class TEST1