diff options
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclIORChan.c | 30 |
1 files changed, 29 insertions, 1 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c index 21c766e..0f7f021 100644 --- a/generic/tclIORChan.c +++ b/generic/tclIORChan.c @@ -30,6 +30,8 @@ /* * Signatures of all functions used in the C layer of the reflection. */ +static int ReflectGetHandle( ClientData instanceData, + int direction, ClientData *handlePtr); static int ReflectClose(ClientData clientData, Tcl_Interp *interp); @@ -68,7 +70,7 @@ static const Tcl_ChannelType tclRChannelType = { ReflectSetOption, /* Set options. NULL'able */ ReflectGetOption, /* Get options. NULL'able */ ReflectWatch, /* Initialize notifier */ - NULL, /* Get OS handle from the channel. NULL'able */ + ReflectGetHandle, /* Get OS handle from the channel. */ NULL, /* No close2 support. NULL'able */ ReflectBlock, /* Set blocking/nonblocking. NULL'able */ NULL, /* Flush channel. Not used by core. NULL'able */ @@ -1644,6 +1646,32 @@ ReflectWatch( /* *---------------------------------------------------------------------- * + * ReflectGetHandle -- + * + * This function is invoked to return OS channel handles, or EINVAL + * if not applicable or otherwise invalid. + * + * Results: + * EINVAL. + * + * Side effects: + * None. + * + *---------------------------------------------------------------------- + */ + +int +ReflectGetHandle( + ClientData instanceData, + int direction, + ClientData *handlePtr) +{ + return EINVAL; +} + +/* + *---------------------------------------------------------------------- + * * ReflectBlock -- * * This function is invoked to tell the channel which blocking behaviour |