X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fprocimpl.h;h=a6213e1aa360598ee02eb1b119b9ee272a889639;hp=da4557d90042ed1dc250792f188b65c8fa01f0ce;hb=14ac73276fa152e8f0b74602792afc0b9c3236c9;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910

diff --git a/src/procimpl.h b/src/procimpl.h
index da4557d..a6213e1 100644
--- a/src/procimpl.h
+++ b/src/procimpl.h
@@ -22,14 +22,12 @@ Boston, MA 02111-1307, USA.  */
    process-unix.c, process-msw.c etc. The Lisp_Process structure and other
    contents of this file is not exported to the rest of the world */
 
-#ifndef _XEMACS_PROCIMPL_H_
-#define _XEMACS_PROCIMPL_H_
-
-struct Lisp_Process;
+#ifndef INCLUDED_procimpl_h_
+#define INCLUDED_procimpl_h_
 
 /*
  * Structure which keeps methods of the process implementation.
- * There is only one object of this class exists in a perticular
+ * There is only one object of this class exists in a particular
  * XEmacs implementation.
  */
 
@@ -37,21 +35,19 @@ struct Lisp_Process;
 
 struct process_methods
 {
-  void (*mark_process_data) (struct Lisp_Process *proc,
-			     void (*markobj) (Lisp_Object));
-  void (*print_process_data) (struct Lisp_Process *proc,
-			      Lisp_Object printcharfun);
-  void (*finalize_process_data) (struct Lisp_Process *proc, int for_disksave);
-  void (*alloc_process_data) (struct Lisp_Process *p);
-  void (*init_process_io_handles) (struct Lisp_Process *p,
+  void (*mark_process_data) (Lisp_Process *proc);
+  void (*print_process_data) (Lisp_Process *proc, Lisp_Object printcharfun);
+  void (*finalize_process_data) (Lisp_Process *proc, int for_disksave);
+  void (*alloc_process_data) (Lisp_Process *p);
+  void (*init_process_io_handles) (Lisp_Process *p,
 				   void* in, void* out, int flags);
-  int  (*create_process) (struct Lisp_Process *p,
+  int  (*create_process) (Lisp_Process *p,
 			  Lisp_Object *argv, int nargv,
 			  Lisp_Object program, Lisp_Object cur_dir);
-  int  (*tooltalk_connection_p) (struct Lisp_Process *p);
+  int  (*tooltalk_connection_p) (Lisp_Process *p);
 #ifdef HAVE_SOCKETS
   void (*open_network_stream) (Lisp_Object name, Lisp_Object host,
-			       Lisp_Object service, Lisp_Object family,
+			       Lisp_Object service, Lisp_Object protocol,
 			       void** vinfd, void** voutfd);
 #ifdef HAVE_MULTICAST
   void (*open_multicast_group) (Lisp_Object name, Lisp_Object dest,
@@ -60,16 +56,16 @@ struct process_methods
 #endif /* HAVE_MULTICAST */
 #endif /* HAVE_SOCKETS */
   Lisp_Object (*canonicalize_host_name) (Lisp_Object host);
-  int  (*set_window_size) (struct Lisp_Process* p, int height, int width);
+  int  (*set_window_size) (Lisp_Process* p, int height, int width);
   void (*send_process) (Lisp_Object proc, struct lstream* lstream);
   void (*reap_exited_processes) (void);
-  void (*update_status_if_terminated) (struct Lisp_Process* p);
+  void (*update_status_if_terminated) (Lisp_Process* p);
   void (*kill_child_process) (Lisp_Object proc, int signo,
 			      int current_group, int nomsg);
   int  (*kill_process_by_pid) (int pid, int sigcode);
   int  (*process_send_eof) (Lisp_Object proc);
-  Lisp_Object (*get_tty_name) (struct Lisp_Process *p);
-  USID (*deactivate_process) (struct Lisp_Process *p);
+  Lisp_Object (*get_tty_name) (Lisp_Process *p);
+  USID (*deactivate_process) (Lisp_Process *p);
   void (*init_process) (void);
 };
 
@@ -159,11 +155,11 @@ struct Lisp_Process
 
 /* Random externs from process.c */
 extern Lisp_Object Qrun, Qstop, Qopen, Qclosed;
-extern Lisp_Object Qtcpip;
+extern Lisp_Object Qtcp, Qudp;
 extern Lisp_Object Vprocess_connection_type;
 extern Lisp_Object Vprocess_list;
 
-extern c_hashtable usid_to_process;
+extern struct hash_table *usid_to_process;
 
 extern volatile int process_tick;
 
@@ -178,11 +174,11 @@ extern Lisp_Object network_stream_blocking_port_list;
 #endif  /* PROCESS_IO_BLOCKING */
 
 Lisp_Object make_process_internal (Lisp_Object name);
-void init_process_io_handles (struct Lisp_Process *p, void* in,
+void init_process_io_handles (Lisp_Process *p, void* in,
 			      void* out, int flags);
 void send_process (Lisp_Object proc,
 		   Lisp_Object relocatable,
-		   CONST Bufbyte *nonrelocatable,
+		   const Bufbyte *nonrelocatable,
 		   int start, int len);
 
-#endif /* _XEMACS_PROCIMPL_H_ */
+#endif /* INCLUDED_procimpl_h_ */