server.lisp and GCL



Barton Willis ?????:
> With GCL 2.7.0 -- ANSI (Windows XP), this is what I get compiling 
> server.lisp
>  
> $ maxima
>         0x0064D120 BSS start in memory.
>         0x01cd0000 BSS offset in saved executable.
>         0x00116570 BSS size in bytes.
>         0x00116570 bytes read.
>         0x10100000 Heap start in memory.
>         0x01160000 Heap offset in executable.
>         0x00b70000 Heap size in bytes.
>         0x10100000 file base.
> Maxima 5.9.0.1cvs http://maxima.sourceforge.net
> Using Lisp Kyoto Common Lisp GCL 2.7.0 (aka GCL)
> Distributed under the GNU Public License. See the file COPYING.
> Dedicated to the memory of William Schelter.
> This is a development version of Maxima. The function bug_report()
> provides bug reporting information.
> (C1) compile_file("c:/maximacvs/maxima/src/server.lisp");
> 
> Compiling c:/maximacvs/maxima/src/server.lisp.
> ; (DEFUN SETUP-SERVER ...) is being compiled.
> ;; The variable ME is undefined.
> ;; The compiler will assume this variable is a global.
> ;; The variable SYSTEM::*SIGPIPE-ACTION* is undefined.
> ;; The compiler will assume this variable is a global.
> ;; The variable *SOCKET-CONNECTION* is undefined.
> ;; The compiler will assume this variable is a global.
> ; (DEFUN OPEN-SOCKET ...) is being compiled.
> ;; Warning: The variable BIN is not used.
> End of Pass 1. 
> End of Pass 2. 
> OPTIMIZE levels: Safety=2, Space=2, Speed=2
> Finished compiling NIL.
> (D1) [c:/maximacvs/maxima/src/server.lisp, 
> #p/maximacvs/maxima/src/server.o]
> (C2) 
> 
> Barton
> 
> 

Something weird is going on.  Yes, I also can compile
server.lisp this way.  But if I try to build maxima from
scratch I get:
========================================================
;    - Compiling module "server"
;      - Compiling source file "/home/vadim/test3/maxima/src/server.lisp"
Compiling /home/vadim/test3/maxima/src/server.lisp.
; (DEFUN SETUP-SERVER ...) is being compiled.
;; The variable ME is undefined.
;; The compiler will assume this variable is a global.
;; The variable SYSTEM::*SIGPIPE-ACTION* is undefined.
;; The compiler will assume this variable is a global.
;; The variable *SOCKET-CONNECTION* is undefined.
;; The compiler will assume this variable is a global.
; (DEFUN OPEN-SOCKET ...) is being compiled.
;; Warning: The variable BIN is not used.
; (DEFUN START-SERVER ...) is being compiled.
;; The variable $IN_NETMATH is undefined.
;; The compiler will assume this variable is a global.
;; The variable $SHOW_OPENPLOT is undefined.
;; The compiler will assume this variable is a global.
; (DEFUN GETPID-FROM-ENVIRONMENT ...) is being compiled.
;;; The function (OR TYPE-ERROR PARSE-ERROR) is illegal.
No FASL generated.
;      - Binary file binary-gcl/server.o is old or does not exist.
;        Compile (and load) source file 
/home/vadim/test3/maxima/src/server.lisp instead? y
;      - Should I bother you if this happens again?
=========================================================

-- 
      Vadim V. Zhytnikov

       <vvzhy@mail.ru>
      <vvzhy@netorn.ru>