allow SWI Interface to send/receive wide characters.

2010-07-21 10:58:24 +01:00
parent 1f3455a656
commit b61d69ffe8
9 changed files with 71 additions and 29 deletions
--- a/library/yap2swi/yap2swi.c
+++ b/library/yap2swi/yap2swi.c
@@ -3097,6 +3097,8 @@ PL_YAP_InitSWIIO(struct SWI_IO *swio)
  FSWIStream = SWIFunctorToFunctor(swio->f);
  SWIGetc = swio->get_c;
  SWIPutc = swio->put_c;
+  SWIWideGetc = swio->get_w;
+  SWIWidePutc = swio->put_w;
  SWIClose = swio->close_s;
 }