Skip to content

Commit

Permalink
[wrapper] Since this is a pointer, we will call it that.
Browse files Browse the repository at this point in the history
Also change the accessor from watcher to ev-pointer.
  • Loading branch information
Sean Bryant committed Mar 19, 2012
1 parent fd1e5b2 commit dfc0751
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions src/ev.lisp
Expand Up @@ -15,16 +15,16 @@
())

(defclass ev-io-watcher (ev-watcher)
((watcher :accessor watcher
:initform (foreign-alloc 'ev_io))))
((watcher-pointer :accessor ev-pointer
:initform (foreign-alloc 'ev_io))))

(defclass ev-timer (ev-watcher)
((timer :accessor watcher
:initform (foreign-alloc 'ev_timer))))
((timer-pointer :accessor ev-pointer
:initform (foreign-alloc 'ev_timer))))

(defclass ev-periodic (ev-watcher)
((timer :accessor watcher
:initform (foreign-alloc 'ev_periodic))))
((periodic-pointer :accessor ev-pointer
:initform (foreign-alloc 'ev_periodic))))

(defmethod initialize-instance :after ((self ev-loop) &key)
(let ((ptr (event-loop self)))
Expand Down

0 comments on commit dfc0751

Please sign in to comment.