;; Solution to Homework 9, OOTS p.99, exercise 7.

class c
  method id(x)
    x
  end
end

class d
  var y
  method set(a)
    y:=a; self
  end
  method get()
    y
  end
end

class main
  var v
  method bogus()
    (c new).m()
  end

  method run()
    v := (c new);
    v.id(7) + 5;
    v.id(true) or false;

    (d new).set(7).get() +5;
    (d new).set(true).get() or false
  end
end

(main new).run()