Posted to tcl by ee at Wed Mar 10 16:24:30 GMT 2010view raw

  1. /* FILE: exp_int.h */
  2. void expDiagLogPtrStrStr _ANSI_ARGS_((char *,char *,char *));
  3. /********************************************************************/
  4.  
  5. /* FILE: exp_pty.c */
  6. void
  7. expDiagLogPtrStrStr(fmt,str1,str2)
  8. char *fmt;
  9. char *str1, *str2;
  10. {
  11. static char buf[1000];
  12. sprintf(buf,fmt,str1,str2);
  13. (*expDiagLogPtrVal)(buf);
  14. }
  15. /********************************************************************/
  16.  
  17. /* FILE: pty_termios.c */
  18. int
  19. exp_getptyslave( int ttycopy, int ttyinit, CONST char *stty_args)
  20. {
  21. int slave, slave2;
  22. char buf[10240];
  23. /* elided stuff */
  24. if (ioctl(slave, I_PUSH, "ptem")) {
  25. expDiagLogPtrStrStr("ioctl(%d,I_PUSH,\"ptem\") = %s\n",slave,expErrnoMsg(errno));
  26. }
  27. /* elided more stuff */
  28. return(slave);
  29. }
  30. /********************************************************************/