Changeset a01ed7c for perlglue.xs

Timestamp:

Oct 27, 2009, 2:15:08 PM (15 years ago)

Author:

Alejandro R. Sedeño <asedeno@mit.edu>

Branches:

master, release-1.10, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

7ca5d3e

Parents:

e7f5970 (diff), f1a2736 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'io_dispatch_rewrite'

File:

• perlglue.xs (modified) (2 diffs)

perlglue.xs

@@ -318 +318 @@
 
 void
-add_dispatch(fd, cb)
+remove_io_dispatch(fd)
         int fd
-        SV * cb
-        CODE:
-        owl_select_add_perl_dispatch(fd, SvREFCNT_inc(cb));
-
-void
-remove_dispatch(fd)
-        int fd
-        CODE:
-        owl_select_remove_perl_dispatch(fd);
-
+        CODE:
+        owl_select_remove_perl_io_dispatch(fd);
 
 AV*
@@ -504 +496 @@
                                       ival);
 
+void
+add_io_dispatch(fd, mode, cb)
+        int fd
+        int mode
+        SV * cb
+        CODE:
+        owl_select_add_perl_io_dispatch(fd, mode, SvREFCNT_inc(cb));
+
 IV
 add_timer(after, interval, cb)