(use coops)

(define-class <eolian> ()
  ((companion initform: #f)))
(define-method (initialize-instance (eo <eolian>))
  (call-next-method)
  (set! (slot-value eo 'companion) ((foreign-lambda c-pointer "eolian_new"))))

(make <eolian>)