diff options
| -rw-r--r-- | src/typemap.iom | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/src/typemap.iom b/src/typemap.iom new file mode 100644 index 0000000..ddb0b98 --- /dev/null +++ b/src/typemap.iom @@ -0,0 +1,36 @@ +perl_watcher * T_IOM_WATCHER +timer * T_IOM_TIMER +iow * T_IOM_IOW +pw * T_IOM_PW +iw * T_IOM_IW + +IOM_CHAINED T_IOM_CHAINED + + +INPUT + +T_IOM_WATCHER + $var = SvWATCHER ($arg); +T_IOM_TIMER + $var = SvTIMER ($arg); +T_IOM_IOW + $var = SvIOW ($arg); +T_IOM_PW + $var = SvPW ($arg); +T_IOM_IW + $var = SvIW ($arg); + + +OUTPUT + +T_IOM_TIMER + $arg = newSVtimer ($var); +T_IOM_IOW + $arg = newSViow ($var); +T_IOM_PW + $arg = newSVpw ($var); +T_IOM_IW + $arg = newSViw ($var); +T_IOM_CHAINED + $arg = newSVsv (ST(0)); + |