diff src/process.c @ 74540:b33acab48a40

(Fsignal_process): Doc fix. Use XFLOAT_DATA to extract the process ID from a Lisp float.

--- a/src/process.c	Sat Dec 09 19:20:45 2006 +0000
+++ b/src/process.c	Sat Dec 09 22:00:18 2006 +0000
@@ -6102,7 +6102,7 @@
 DEFUN ("signal-process", Fsignal_process, Ssignal_process,
        2, 2, "sProcess (name or number): \nnSignal code: ",
        doc: /* Send PROCESS the signal with code SIGCODE.
-PROCESS may also be an integer specifying the process id of the
+PROCESS may also be a number specifying the process id of the
 process to signal; in this case, the process need not be a child of
 this Emacs.
 SIGCODE may be an integer, or a symbol whose name is a signal name.  */)
@@ -6119,7 +6119,7 @@
 
   if (FLOATP (process))
     {
-      pid = (pid_t) XFLOAT (process);
+      pid = (pid_t) XFLOAT_DATA (process);
       goto got_it;
     }