Clisp on windows



On windows with clisp 2.32 I must change the function getpid in
server.lisp to

#+clisp
(defun getpid ( &aux tem)
  (cond #-win32((fboundp 'sys::program-id)
		(sys::program-id))
	#-win32((consp (setq tem (errset (system::getenv "PID"))))
	 (read-from-string (car tem)))
	(t (format t "using fake value for pid") -1)))

to make the CVS version of maxima work with sockets. Clisp has problems
with errset.

Andrej