Mercurial > hg > xemacs-beta
comparison src/process.c @ 149:538048ae2ab8 r20-3b1
Import from CVS: tag r20-3b1
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:36:16 +0200 |
parents | b980b6286996 |
children | 25f70ba0133c |
comparison
equal
deleted
inserted
replaced
148:f659db2a1f73 | 149:538048ae2ab8 |
---|---|
3296 { | 3296 { |
3297 descriptor_to_process[i] = Qnil; | 3297 descriptor_to_process[i] = Qnil; |
3298 proc_buffered_char[i] = -1; | 3298 proc_buffered_char[i] = -1; |
3299 } | 3299 } |
3300 } | 3300 } |
3301 | |
3301 #if 0 | 3302 #if 0 |
3302 | 3303 |
3303 xxDEFUN ("process-connection", Fprocess_connection, Sprocess_connection, | 3304 xxDEFUN ("process-connection", Fprocess_connection, 0, 1, 0, /* |
3304 0, 1, 0 /* | |
3305 Return the connection type of `PROCESS'. This can be nil (pipe), | 3305 Return the connection type of `PROCESS'. This can be nil (pipe), |
3306 t or pty (pty) or stream (socket connection). | 3306 t or pty (pty) or stream (socket connection). |
3307 */ ) | 3307 */ |
3308 (process) | 3308 (process)) |
3309 Lisp_Object process; | |
3310 { | 3309 { |
3311 return XPROCESS (process)->type; | 3310 return XPROCESS (process)->type; |
3312 } | 3311 } |
3313 | 3312 |
3314 #endif /* 0 */ | 3313 #endif /* 0 */ |