Crawly Crypt Collection 1/crawlyvol1.bin/program/compiler/vici_102/examples/list.e

Text File | 1993-03-02 | 214b | 23 lines

class list
feature
  next: list;
  item: integer;

  create(i: integer) is
  do
    put(i)
  end;

  put(i:integer) is
  do
    item:=i
  end;

  add(n: list) is
  do
    next:=n
  end;

end