Build log

xlispstat-3.52.20:20100905-055620.log (text/plain), 159.98 KB, created by Diego Elio Pettenò (RETIRED) on 2010-09-05 14:10:40 UTC

 * CPV:  dev-lisp/xlispstat-3.52.20
 * REPO: gentoo
 * USE:  elibc_glibc kernel_linux test userland_GNU x86
>>> Unpacking source...
>>> Unpacking xlispstat-3-52-20.tar.gz to /var/tmp/portage/dev-lisp/xlispstat-3.52.20/work
 * Applying xlispstat-3.52.20-fmax.patch ...
 [ ok ]
>>> Source unpacked in /var/tmp/portage/dev-lisp/xlispstat-3.52.20/work
>>> Compiling source in /var/tmp/portage/dev-lisp/xlispstat-3.52.20/work/xlispstat-3-52-20 ...
loading site script /usr/share/config.site
configure: loading site script /usr/share/crossdev/include/site/linux
creating cache ./config.cache
checking host system type... i686-pc-linux-gnu
checking how to run the C preprocessor... cc -E
checking for main in -lieee... yes
checking for finite... yes
checking for isnan... yes
checking for memmove... yes
checking for difftime... yes
checking for matherr... yes
checking for X... disabled
checking for dlopen... no
checking for dlopen in -ldl... yes
GRAPHSYS = GNUPLOT
X11INCDIR_FLAG =
X11LIBDIR_FLAG =
UCFLAGS = -O -mieee-fp
ULDFLAGS = -export-dynamic
EXTRALIBS = -lieee -ldl
EXTRAOBJS =
FOREIGN_FILE = sysvr4-foreign.h
CC = cc
SHLIB_CFLAGS = -fPIC
SHLIB_LD = cc -shared
SHLIB_LD_LIBS =
updating cache ./config.cache
creating ./config.status
creating Makefile
creating shlibconfig.sh
creating xlconfig.h
make -j14 -j1 'UCFLAGS=-O2 -pipe -mieee-fp' 
cp sysvr4-foreign.h foreign.h
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsdynload.o xsdynload.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xssystem.o xssystem.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o unixprim.o unixprim.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlarray.o xlarray.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlbfun.o xlbfun.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlbignum.o xlbignum.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlcont.o xlcont.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xldbug.o xldbug.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xldmem.o xldmem.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xleval.o xleval.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlfio.o xlfio.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlftab.o xlftab.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlglob.o xlglob.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlimage.o xlimage.c
xlimage.c: In function ‘xlisave’:
xlimage.c:81:5: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c:183:3: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c:189:17: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c:194:4: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c:202:21: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c:204:21: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c: In function ‘writenode’:
xlimage.c:545:5: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
xlimage.c: In function ‘writeptr’:
xlimage.c:561:5: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlinit.o xlinit.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlio.o xlio.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlisp.o xlisp.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xljump.o xljump.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xllist.o xllist.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlpp.o xlpp.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlprin.o xlprin.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlrand.o xlrand.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlread.o xlread.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlseq.o xlseq.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlstr.o xlstr.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlsubr.o xlsubr.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlsym.o xlsym.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlsys.o xlsys.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlstruct.o xlstruct.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlmath2.o xlmath2.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlmath3.o xlmath3.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xltvec.o xltvec.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlbcode.o xlbcode.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlbcutil.o xlbcutil.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlshlib.o xlshlib.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlwrap.o xlwrap.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xlmodule.o xlmodule.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o dummycod.o dummycod.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o basics.o basics.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o common.o common.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o compound.o compound.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o dists.o dists.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o ddists.o ddists.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o hrdwrobs.o hrdwrobs.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o mats1.o mats1.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o mats2.o mats2.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o math.o math.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o obinit.o obinit.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o objects.o objects.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o optimize.o optimize.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o sortdata.o sortdata.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o statinit.o statinit.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o stats.o stats.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o utils.o utils.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o utils2.o utils2.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o gamln.o gamln.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o splines.o splines.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o kernel.o kernel.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o lowess.o lowess.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o cfft.o cfft.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o betab.o betab.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o gammab.o gammab.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o nor.o nor.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o ppnd.o ppnd.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o studentb.o studentb.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o bivnor.o bivnor.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o linalg.o linalg.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o cholesky.o cholesky.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o ludecomp.o ludecomp.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o qrdecomp.o qrdecomp.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o svdecomp.o svdecomp.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o makerot.o makerot.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o eigen.o eigen.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o minimize.o minimize.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o blas.o blas.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsiview2.o xsiview2.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsivint.o xsivint.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsnewplt.o xsnewplt.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsgraph.o xsgraph.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsiview3.o xsiview3.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsivwin.o xsivwin.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsiview.o xsiview.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsivwin2.o xsivwin2.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o menus.o menus.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o dialogs.o dialogs.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o iviewdat.o iviewdat.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o iviewscl.o iviewscl.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o iview.o iview.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o iviewint.o iviewint.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xshist.o xshist.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsnames.o xsnames.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xssctmat.o xssctmat.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xsspin.o xsspin.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o xssctplt.o xssctplt.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o windows.o windows.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o stmem.o stmem.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o graphics.o graphics.c
graphics.c: In function ‘num2str’:
graphics.c:95:10: warning: incompatible implicit declaration of built-in function ‘sprintf’
graphics.c: In function ‘do_plot’:
graphics.c:220:8: warning: incompatible implicit declaration of built-in function ‘strlen’
graphics.c:223:9: warning: incompatible implicit declaration of built-in function ‘sprintf’
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o myplot.o myplot.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o term.o term.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o postscript.o postscript.c
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o unixstuff.o unixstuff.c
unixstuff.c: In function ‘ostgetc’:
unixstuff.c:358:22: warning: ignoring return value of ‘fwrite’, declared with attribute warn_unused_result
cc -DGNUPLOT -O2 -pipe -mieee-fp    -c -o dummygraph.o dummygraph.c
rm -f xlisp xlisp.wks
cc -export-dynamic -o GNUPLOTxlisp xsdynload.o xssystem.o unixprim.o xlarray.o xlbfun.o xlbignum.o xlcont.o xldbug.o xldmem.o xleval.o xlfio.o xlftab.o xlglob.o xlimage.o xlinit.o xlio.o xlisp.o xljump.o xllist.o xlpp.o xlprin.o xlrand.o xlread.o xlseq.o xlstr.o xlsubr.o xlsym.o xlsys.o xlstruct.o xlmath2.o xlmath3.o xltvec.o xlbcode.o xlbcutil.o xlshlib.o xlwrap.o xlmodule.o dummycod.o basics.o common.o compound.o dists.o ddists.o hrdwrobs.o mats1.o mats2.o math.o obinit.o objects.o optimize.o sortdata.o statinit.o stats.o utils.o utils2.o gamln.o splines.o kernel.o lowess.o cfft.o betab.o gammab.o nor.o ppnd.o studentb.o bivnor.o linalg.o cholesky.o ludecomp.o qrdecomp.o svdecomp.o makerot.o eigen.o minimize.o blas.o xsiview2.o xsivint.o xsnewplt.o xsgraph.o xsiview3.o xsivwin.o xsiview.o xsivwin2.o menus.o dialogs.o iviewdat.o iviewscl.o iview.o iviewint.o xshist.o xsnames.o xssctmat.o xsspin.o xssctplt.o windows.o stmem.o graphics.o myplot.o term.o postscript.o  unixstuff.o dummygraph.o -lieee -ldl -lm
ln GNUPLOTxlisp xlisp
echo "(compile-file \"compiler/backquot.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.lsp
; loading compiler/cmpmacro.lsp
; loading compiler/convert.lsp
; loading compiler/cells.lsp
; loading compiler/simplify.lsp
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/backquot.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (DEFUN BQ-PROCESS (X) ...) ... done
; compiling (DEFUN BQ-BRACKET (X) ...) ... done
; compiling (DEFMACRO BACKQUOTE (X) ...) ... done
; compiling (SETQ *FEATURES* (CONS :BACKQUOTE *FEATURES*)) ... done
NIL
> echo "(compile-file \"compiler/cmpmacro.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.lsp
; loading compiler/convert.lsp
; loading compiler/cells.lsp
; loading compiler/simplify.lsp
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/cmpmacro.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFVAR *CMP-MACROS* NIL) ... done
; compiling (DEFVAR *CMP-GLOBAL-MACROS* NIL) ... done
; compiling (DEFUN CMP-MACROEXPAND (E &OPTIONAL #) ...) ... done
; compiling (DEFUN CMP-MACROEXPAND-1 (E &OPTIONAL #) ...) ... done
; compiling (DEFUN CHECK-DECLARATIONS (DECLS) ...) ... done
; compiling (DEFUN SPLIT-DECLARATIONS (X) ...) ... done
; compiling (DEFINE-COMPILER-MACRO PROGV (SYMS VALS &REST ...) ...) ... done
; compiling (DEFINE-COMPILER-MACRO NOT (X) ...) ... done
; compiling (DEFINE-COMPILER-MACRO NULL (X) ...) ... done
; compiling (DEFINE-COMPILER-MACRO ROW-MAJOR-AREF (X I) ...) ... done
; compiling (DEFINE-COMPILER-MACRO XLISP::%SET-RM-AREF (X I V) ...) ... done
NIL
> echo "(compile-file \"compiler/convert.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.lsp
; loading compiler/cells.lsp
; loading compiler/simplify.lsp
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/convert.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LEAF-NODE-P)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LAMBDA-NODE-P)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-CALL-NODE-P)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-NODE-CHILDREN)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-NODE-PARENT)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-NODE-SIMPLIFIED-P)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-NODE-NOTE)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-NODE-CHILDREN)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-NODE-PARENT)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-NODE-SIMPLIFIED)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-NODE-NOTE)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LEAF-NODE-VALUE)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LEAF-NODE-COUNT)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-LEAF-NODE-VALUE)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-LEAF-NODE-COUNT)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LAMBDA-NODE-ARGLIST)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LAMBDA-NODE-LAMBDA-LIST)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LAMBDA-NODE-NAME)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-LAMBDA-NODE-ARGLIST)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-LAMBDA-NODE-LAMBDA-LIST)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-SET-LAMBDA-NODE-NAME)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-LAMBDA-NODE-BODY)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-CALL-NODE-FUNCTION)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-CALL-NODE-ARGS)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-ANY-REFERENCES-P)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CPS-FIND-REFERENCES)) ... done
; compiling (DEFUN MAKE-NODE NIL ...) ... done
; compiling (DEFUN NODE-EXPRESSION (E) ...) ... done
; compiling (DEFUN MAKE-LEAF-NODE (V) ...) ... done
; compiling (DEFUN MAKE-LAMBDA-NODE (ARGLIST BODY &OPTIONAL ...) ...) ... done
; compiling (DEFUN LAMBDA-NODE-DELETE-ARG (N V) ...) ... done
; compiling (DEFUN SET-LAMBDA-NODE-ARGLIST-FIX (N A) ...) ... done
; compiling (DEFUN MAKE-CALL-NODE (&REST ARGS) ...) ... done
; compiling (DEFUN CALL-NODE-ADD-ARG (N A) ...) ... done
; compiling (DEFUN CALL-NODE-ARG (N K) ...) ... done
; compiling (DEFUN CALL-NODE-ARG-COUNT (N) ...) ... done
; compiling (DEFUN CALL-NODE-DELETE-ARG (N V) ...) ... done
; compiling (DEFUN CALL-NODE-DELETE-ARG-INDEX (N I) ...) ... done
; compiling (DEFUN SET-CALL-NODE-ARGS (N A) ...) ... done
; compiling (DEFUN SET-CALL-NODE-FUNCTION (N F) ...) ... done
; compiling (DEFUN SET-CALL-NODE-ARG (N I A) ...) ... done
; compiling (DEFUN COPY-NODE-INTERNALS (B A) ...) ... done
; compiling (DEFUN MOVE-NODE-TREE (B A) ...) ... done
; compiling (DEFUN INTERNAL-INSERT-NODE-TREE (TREE FORM POS) ...) ... done
; compiling (DEFUN INSERT-NODE-TREE (TREE FORM POS) ...) ... done
; compiling (DEFUN COPY-NODE-TREE (TREE) ...) ... done
; compiling (DEFUN CONTINUATION-NODE-P (N) ...) ... done
; compiling (DEFUN MAKE-CONTINUATION-NODE (ARGLIST BODY) ...) ... done
; compiling (DEFUN PP-CPS (E) ...) ... done
; compiling (DEFUN SET-CPS-CONVERTER (S C) ...) ... done
; compiling (DEFUN GET-CPS-CONVERTER (S) ...) ... done
; compiling (DEFMACRO DEFINE-CPS-CONVERTER (SYM &REST BODY) ...) ... done
; compiling (DEFVAR *CMP-ENV* NIL) ... done
; compiling (DEFVAR *CMP-FENV* NIL) ... done
; compiling (DEFVAR *CMP-DENV* NIL) ... done
; compiling (DEFVAR *CMP-TENV* NIL) ... done
; compiling (DEFVAR *CMP-SPECIALS* NIL) ... done
; compiling (DEFVAR *CMP-MACROS* NIL) ... done
; compiling (DEFVAR *CMP-SETF* NIL) ... done
; compiling (DEFVAR *CMP-STRUCTS* NIL) ... done
; compiling (DEFVAR *CMP-GVARS* NIL) ... done
; compiling (DEFVAR *CMP-GFUNS* NIL) ... done
; compiling (DEFVAR *CMP-CONSTS* NIL) ... done
; compiling (DEFVAR *CMP-BASE-CONTINUATION-SYMBOL* (GENSYM "K0-")) ... done
; compiling (DEFUN LFUN-NODE-P (N) ...) ... done
; compiling (DEFUN GFUN-NODE-P (N) ...) ... done
; compiling (DEFUN GVAR-NODE-P (N) ...) ... done
; compiling (DEFUN CONSTANT-NODE-P (N) ...) ... done
; compiling (DEFUN GFUN-EQ (N S) ...) ... done
; compiling (DEFUN GFUN-MEMBER (N SL) ...) ... done
; compiling (DEFUN GFUN-SYMBOL (N) ...) ... done
; compiling (DEFUN LOCAL-SYMBOL-NODE-P (N) ...) ... done
; compiling (DEFUN MAKE-VARIABLE-NODE (E) ...) ... done
; compiling (DEFUN MAKE-FUNCTION-NODE (E) ...) ... done
; compiling (DEFUN MAKE-CONSTANT-NODE (E) ...) ... done
; compiling (DEFUN SYMBOL-NODE-OWNER (N) ...) ... done
; compiling (DEFUN SET-SYMBOL-NODE-OWNER (N O) ...) ... done
; compiling (DEFUN NEW-ENV-NODE (SYM) ...) ... done
; compiling (DEFUN NEW-FENV-NODE (SYM) ...) ... done
; compiling (DEFUN MAKE-GVAR-NODE (SYM) ...) ... done
; compiling (DEFUN MAKE-GFUN-NODE (SYM) ...) ... done
; compiling (DEFUN NEW-GVAR-NODE (SYM) ...) ... done
; compiling (DEFUN NEW-GFUN-NODE (SYM) ...) ... done
; compiling (DEFUN NEW-CONSTANT-NODE (E) ...) ... done
; compiling (DEFUN GET-GVAR-NODE (SYM) ...) ... done
; compiling (DEFUN GET-GFUN-NODE (SYM) ...) ... done
; compiling (DEFUN GET-VARIABLE-NODE (SYM) ...) ... done
; compiling (DEFUN GET-FUNCTION-NODE (SYM) ...) ... done
; compiling (DEFUN GET-CONSTANT-NODE (E) ...) ... done
; compiling (DEFUN IS-SPECIAL-VARIABLE (SYM) ...) ... done
; compiling (DEFMACRO WITH-SAVED-CMP-ENVIRONMENTS (&REST BODY) ...) ... done
; compiling (DEFUN CVT (E) ...) ... done
; compiling (DEFUN CONSTANT-SYMBOL-P (E) ...) ... done
; compiling (DEFUN CONSTANT-VALUE-FORM (E) ...) ... done
; compiling (DEFUN MAKE-CONTINUATION-CALL-NODE (K &REST ARGS) ...) ... done
; compiling (DEFUN PRE-SIMPLIFY-TREE (N) ...) ... done
; compiling (DEFUN CONVERT (E K) ...) ... done
; compiling (DEFUN CONVERT-FUNARG (F K) ...) ... done
; compiling (DEFUN CONVERT-ARGUMENTS (ARGS FINAL-CALL) ...) ... done
; compiling (DEFUN FIXUP-OPTIONAL-ARGUMENT (X) ...) ... done
; compiling (DEFUN MAKE-CORRESPONDING-KEYWORD (S) ...) ... done
; compiling (DEFUN CHECK-SUPPLIED-P-ARGUMENT (S) ...) ... done
; compiling (DEFUN FIXUP-KEYWORD-ARGUMENT (X) ...) ... done
; compiling (DEFUN FIXUP-AUX-ARGUMENT (X) ...) ... done
; compiling (DEFUN IS-LAMBDA-KEY (S) ...) ... done
; compiling (DEFUN SPLIT-LAMBDA-LIST (LL) ...) ... done
; compiling (DEFUN REWRITE-LAMBDA (LAMBDA-LIST BODY) ...) ... done
; compiling (DEFUN LAMBDA-LIST-DEFAULT (ARGS) ...) ... done
; compiling (DEFUN LAMBDA-LIST-DATA (ARGS) ...) ... done
; compiling (DEFUN FIND-LAMBDA-LIST-DATA (F) ...) ... done
; compiling (DEFMACRO DEFINE-LAMBDA-LIST (S LL) ...) ... done
; compiling (DEFUN GET-LAMBDA-LIST-DATA (S) ...) ... done
; compiling (DEFINE-LAMBDA-LIST CAR (X)) ... done
; compiling (DEFINE-LAMBDA-LIST AREF (A I &REST ...)) ... done
; compiling (DEFINE-LAMBDA-LIST %SET-AREF (X Y Z ...)) ... done
; compiling (DEFINE-LAMBDA-LIST - (X &REST ARGS)) ... done
; compiling (DEFINE-LAMBDA-LIST / (X &REST ARGS)) ... done
; compiling (DEFINE-LAMBDA-LIST SLOT-VALUE (X &OPTIONAL Y)) ... done
; compiling (DEFINE-LAMBDA-LIST SETQ (VAR VAL &REST ...)) ... done
; compiling (DEFINE-LAMBDA-LIST LAMBDA (ARGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST LET (BINDINGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST LET* (BINDINGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST FLET (BINDINGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST LABELS (BINDINGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST MACROLET (BINDINGS &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST IF (TEST CONS &OPTIONAL ...)) ... done
; compiling (DEFINE-LAMBDA-LIST PROGN (&REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST LOCALLY (&REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST THE (A B)) ... done
; compiling (DEFINE-LAMBDA-LIST BLOCK (TAG &REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST FUNCTION (FUN)) ... done
; compiling (DEFINE-LAMBDA-LIST CATCH (TAG &REST FORMS)) ... done
; compiling (DEFINE-LAMBDA-LIST THROW (TAG FORM)) ... done
; compiling (DEFINE-LAMBDA-LIST ERRSET (FORM &OPTIONAL PRINT)) ... done
; compiling (DEFINE-LAMBDA-LIST UNWIND-PROTECT (PFORM &REST CFORMS)) ... done
; compiling (DEFINE-LAMBDA-LIST TAGBODY (&REST BODY)) ... done
; compiling (DEFINE-LAMBDA-LIST GO (TAG)) ... done
; compiling (DEFINE-LAMBDA-LIST RETURN-FROM (TAG &OPTIONAL FORM)) ... done
; compiling (DEFINE-LAMBDA-LIST PROGV (SYMS VALS &REST ...)) ... done
; compiling (DEFINE-LAMBDA-LIST CASE (KEY &REST FORMS)) ... done
; compiling (DEFINE-LAMBDA-LIST MULTIPLE-VALUE-CALL (FUNCION &REST FORMS)) ... done
; compiling (DEFINE-LAMBDA-LIST NTH-VALUE (N FORM)) ... done
; compiling (DEFINE-LAMBDA-LIST MULTIPLE-VALUE-PROG1 (FORM &REST FORMS)) ... done
; compiling (DEFUN CHECK-ARG-COUNT (E) ...) ... done
; compiling (DEFUN CONSTANT-EXPRESSION-P (E) ...) ... done
; compiling (DEFUN STRIP-QUOTE (X) ...) ... done
; compiling (DEFUN SIMPLE-LAMBDA-NODE-P (N) ...) ... done
; compiling (DEFUN FIXUP-LAMBDA-CALL-NODE (N) ...) ... done
; compiling (DEFUN LAMBDA-LIST-NUM-VARIABLES (LL) ...) ... done
; compiling (DEFUN FIX-LAMBDA-SPECIALS (RL) ...) ... done
; compiling (DEFUN CONVERT-LAMBDA (E) ...) ... done
; compiling (DEFINE-CPS-CONVERTER LAMBDA (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER LET (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER IF (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER PROGN (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER LOCALLY (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER THE (E K) ...) ... done
; compiling (DEFUN REWRITE-LET* (E) ...) ... done
; compiling (DEFINE-CPS-CONVERTER LET* (E K) ...) ... done
; compiling (DEFUN CONVERT-NAMED-LAMBDA (F) ...) ... done
; compiling (DEFINE-CPS-CONVERTER FLET (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER LABELS (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER BLOCK (E K) ...) ... done
; compiling (DEFUN FIND-BLOCK-TAG (NAME) ...) ... done
; compiling (DEFINE-CPS-CONVERTER SETQ (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER FUNCTION (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER CATCH (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER ERRSET (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER UNWIND-PROTECT (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER PROGV (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER CASE (E K) ...) ... done
; compiling (DEFUN SPLIT-TAGBODY-BODY (BD) ...) ... done
; compiling (DEFINE-CPS-CONVERTER TAGBODY (E K) ...) ... done
; compiling (DEFUN FIND-GO-TAG (TAG) ...) ... done
; compiling (DEFINE-CPS-CONVERTER GO (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER MULTIPLE-VALUE-CALL (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER NTH-VALUE (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER THROW (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER RETURN-FROM (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER MULTIPLE-VALUE-PROG1 (E K) ...) ... done
; compiling (DEFINE-CPS-CONVERTER MACROLET (E K) ...) ... done
; compiling (DEFUN SUBSTITUTE-ALL-VARIABLES (N) ...) ... done
; compiling (DEFUN COLLAPSE-NULL-LAMBDA-CALLS (N) ...) ... done
NIL
> echo "(compile-file \"compiler/cells.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.lsp
; loading compiler/simplify.lsp
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/cells.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFUN FIND-VARIABLES-SET (TREE) ...) ... done
; compiling (DEFUN INSERT-CELLS (TREE) ...) ... done
; compiling (DEFUN CELL-USED-P (REFS N) ...) ... done
; compiling (DEFUN FIND-UNUSED-CELL-VARIABLE-REFERENCES (N) ...) ... done
; compiling (DEFUN SAFE-CELL-ACCESS-P (REF) ...) ... done
; compiling (DEFUN REMOVE-UNUSED-CELLS (N) ...) ... done
NIL
> echo "(compile-file \"compiler/simplify.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.lsp
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/simplify.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFVAR *CALL-RULES* NIL) ... done
; compiling (DEFVAR *LAMBDA-CALL-RULES* NIL) ... done
; compiling (DEFVAR *SIMPLIFY-DEBUG* NIL) ... done
; compiling (DEFUN ADD-CALL-RULE (NAME RULE) ...) ... done
; compiling (DEFUN ADD-LAMBDA-CALL-RULE (NAME RULE) ...) ... done
; compiling (DEFUN ADD-SYMBOL-CALL-RULE (SYM NAME RULE) ...) ... done
; compiling (DEFMACRO DEFINE-CALL-RULE (NAME &REST ARGS) ...) ... done
; compiling (DEFMACRO DEFINE-LAMBDA-CALL-RULE (NAME &REST ARGS) ...) ... done
; compiling (DEFMACRO DEFINE-SYMBOL-CALL-RULE (SYM NAME &REST ...) ...) ... done
; compiling (DEFUN APPLY-SIMPLIFICATION-RULES (N) ...) ... done
; compiling (DEFUN SIMPLIFY-NODE (N) ...) ... done
; compiling (DEFUN NEXT-UNSIMPLIFIED-NODE (N) ...) ... done
; compiling (DEFUN FIRST-UNSIMPLIFIED-CHILD (N) ...) ... done
; compiling (DEFUN NEXT-LOWER-OR-EQUAL (N) ...) ... done
; compiling (DEFUN NEXT-UNSIMPLIFIED-NODE (N) ...) ... done
; compiling (DEFUN SIMPLIFY-TREE (TREE) ...) ... done
; compiling (DEFUN VAR-EQ (X Y) ...) ... done
; compiling (DEFUN SIMPLE-VALUE-P (V) ...) ... done
; compiling (DEFUN CALL-REFERENCE-P (R) ...) ... done
; compiling (DEFUN ANY-CALL-REFERENCES-P (REFS) ...) ... done
; compiling (DEFUN SUBSTITUTE-VALUE (VAL REF COPY) ...) ... done
; compiling (DEFINE-LAMBDA-CALL-RULE SUBSTITUTE-VARIABLES (N) ...) ... done
; compiling (DEFUN ANY-SET-REFERENCES-P (REFS) ...) ... done
; compiling (DEFUN SAFE-SET-SUBSTITUTE-VALUE-P (V) ...) ... done
; compiling (DEFUN LAMBDA-CALL-SUBSTITUTE-VARIABLES (N &OPTIONAL ALL ...) ...) ... done
; compiling (DEFINE-LAMBDA-CALL-RULE NO-VARIABLES (N) ...) ... done
; compiling (DEFUN TEST-CALL-P (N) ...) ... done
; compiling (DEFUN LAMBDA-NODE-REAL-BODY (N) ...) ... done
; compiling (DEFUN SHALLOW-COPY-NODE-TREE (N) ...) ... done
; compiling (DEFUN HOIST-INTERVENING-LAMBDAS (N BA BF) ...) ... done
; compiling (DEFUN HOIST-TEST-CONTINUATIONS (N) ...) ... done
; compiling (DEFINE-LAMBDA-CALL-RULE IF-IF (N) ...) ... done
; compiling (DEFUN LEAF-NODE-CONSTANT-P (N) ...) ... done
; compiling (DEFUN CONSTANT-FOLD-NUMBERS (N &OPTIONAL F) ...) ... done
; compiling (DEFUN CONSTANT-FOLD-COMMUTATIVE (N SYM IDENT) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE + CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE * CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE - CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE / CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE MIN CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE MAX CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE = CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE /= CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE < CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE > CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE <= CONSTANT-FOLD ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE >= CONSTANT-FOLD ...) ... done
; compiling (DEFUN CHANGE-GFUN (N NAME) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE FIRST RENAME ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE SECOND RENAME ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE THIRD RENAME ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE REST RENAME ...) ... done
; compiling (DEFUN MERGE-GFUNS (N F2 F12 ...) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CAR CDR-CAR=>CDAR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CAR CDR-CAR=>CAAR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDR CAR-CDR=>CADR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDR CDR-CDR=>CDDR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDDR CDR-CDDR=>CDDDR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDR CDDR-CDR=>CDDDR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDDR CAR-CDDR=>CADDR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE CDR CADR-CDR=>CADDR ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %TEST CONSTANT-FOLD ...) ... done
; compiling (DEFUN MAKE-NULL-CALL-NODE (N) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %TEST PROPAGATE1 ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %TEST PROPAGATE2 ...) ... done
; compiling (DEFUN PARSE-DECLARATIONS (DECLS) ...) ... done
; compiling (DEFUN FIXUP-LET-VARIABLES (V) ...) ... done
; compiling (DEFUN UNPARSE-VARIABLE-DECLARATIONS (DECLS) ...) ... done
; compiling (DEFUN UNPARSE-FUNCTION-DECLARATIONS (DECLS) ...) ... done
; compiling (DEFUN UNPARSE-COMPILER-DECLARATIONS (DECLS) ...) ... done
; compiling (DEFUN DECLARE-NO-SIDE-EFFECTS (SYMS) ...) ... done
; compiling (DEFUN NO-SIDE-EFFECTS-P (S) ...) ... done
; compiling (DECLARE-NO-SIDE-EFFECTS (QUOTE #)) ... done
; compiling (DEFUN FIND-Y-FUNCTION (N I) ...) ... done
; compiling (DEFUN FIND-Y-BODY (N) ...) ... done
; compiling (DEFUN FIND-Y-LIST-NAMES (N) ...) ... done
; compiling (DEFUN FIND-LAMBDA-BINDING (N) ...) ... done
; compiling (DEFUN FIND-LAMBDA-VARIABLE (F) ...) ... done
; compiling (DEFUN UNSAFE-CONTINUATION-LAMBDA-P (FORM PARENT) ...) ... done
; compiling (DEFUN SAFE-CONTINUATION-REFERENCE-P (R) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %CATCH-BLOCK SKIP-CATCH-IF-SAFE ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %Y HOIST-NON-RECURSIVES ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %Y NO-FUNCTIONS ...) ... done
; compiling (DEFUN SAFE-GO-PATH-P (FORM Y) ...) ... done
; compiling (DEFUN SAFE-GO-REFERENCES-P (REFS BODY) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %CATCH-TAGBODY SKIP-TAGBODY-CATCH ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %SYMFUN FUNCALL-SYMFUN-GFUN-TO-CALL ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE FUNCALL FUNCALL-FUNCTION-TO-CALL ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE FUNCALL QUOTE-SYMBOL-TO-GFUN ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %MVC QUOTE-SYMBOL-TO-GFUN ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE %MVC LAMBDA-TO-CONTINUATION ...) ... done
; compiling (DEFUN NON-TAIL-CONTINUATION-P (K) ...) ... done
; compiling (DEFUN MULTIPLE-VALUE-CONTINUATION-NODE-P (C) ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE VALUES-LIST NON-TAIL-CALL ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE VALUES NON-TAIL-CALL ...) ... done
; compiling (DEFINE-SYMBOL-CALL-RULE VALUES ONE-VALUE ...) ... done
; compiling (DEFUN MERGE-TESTS (N) ...) ... done
NIL
> echo "(compile-file \"compiler/lift.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.lsp
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/lift.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFVAR *PIECES*) ... done
; compiling (DEFUN FREE-VARIABLE-CANDIDATES (N) ...) ... done
; compiling (DEFUN FIND-FREE-VARIABLES (N) ...) ... done
; compiling (DEFUN FIND-ALL-FREE-VARIABLES (NL) ...) ... done
; compiling (DEFUN FIND-AND-FIX-LIFTABLE-LAMBDAS (N) ...) ... done
; compiling (DEFUN NEW-LVAR-NODE (V) ...) ... done
; compiling (DEFUN NEW-LFUN-NODE (V) ...) ... done
; compiling (DEFUN SUBSTITUTE-VARIABLE (NV V F) ...) ... done
; compiling (DEFUN FIX-LIFTABLE-LAMBDA-ARGLIST (F FREE) ...) ... done
; compiling (DEFUN FIX-LIFTABLE-LAMBDA-CALLS (VF BODY FREE) ...) ... done
; compiling (DEFUN FIX-LIFTABLE-LAMBDA (VF F BODY) ...) ... done
; compiling (DEFUN FIX-LIFTABLE-Y-LAMBDAS (N VFL FL ...) ...) ... done
; compiling (DEFUN LIFT-FIXED-LAMBDAS (NL) ...) ... done
; compiling (DEFUN HOIST-ANONYMOUS-CLOSURES (N) ...) ... done
; compiling (DEFUN FIND-CLOSURE-REFERENCES (V BODY) ...) ... done
; compiling (DEFUN INSERT-FLET-CLOSURES (N) ...) ... done
; compiling (DEFUN INSERT-LABELS-CLOSURES (N) ...) ... done
; compiling (DEFUN INSERT-CLOSURES (N) ...) ... done
; compiling (DEFUN LIFT-LAMBDAS (N) ...) ... done
; compiling (DEFUN EXTRACT-CONSTANTS (N) ...) ... done
NIL
> echo "(compile-file \"compiler/gencode.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.lsp
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/gencode.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFVAR *CODE*) ... done
; compiling (DEFVAR *LITERALS*) ... done
; compiling (DEFVAR *FUNCTIONS*) ... done
; compiling (DEFVAR *LABELS*) ... done
; compiling (DEFVAR *REGISTERS*) ... done
; compiling (DEFVAR *CONSTANTS*) ... done
; compiling (DEFVAR *PROTECTED-CONTINUATIONS*) ... done
; compiling (DEFUN GENERATE-CODE (PIECES) ...) ... done
; compiling (DEFUN GENERATE-LAMBDA-CODE (LABEL N) ...) ... done
; compiling (DEFUN GENERATE-BODY-CODE (FORM) ...) ... done
; compiling (DEFUN LIFTED-LFUN-NODE-P (N) ...) ... done
; compiling (DEFUN GENERATE-SYMBOL-CALL-CODE (N REST) ...) ... done
; compiling (DEFUN GENERATE-LAMBDA-CALL-CODE (N REST) ...) ... done
; compiling (DEFUN GENERATE-GFUN-CALL-CODE (N REST) ...) ... done
; compiling (DEFUN GENERATE-LFUN-CALL-CODE (N REST) ...) ... done
; compiling (DEFUN GENERATE-CONTINUATION-CALL-CODE (N REST) ...) ... done
; compiling (DEFUN INITIALIZE-FUNCTIONS (PIECES) ...) ... done
; compiling (DEFUN MAKE-FUNCTION-DATA (LABEL NAME) ...) ... done
; compiling (DEFUN GET-FUNCTION-DATA (LABEL) ...) ... done
; compiling (DEFUN GET-FUNCTION-LABEL (F) ...) ... done
; compiling (DEFUN GET-FUNCTION-LABELS NIL ...) ... done
; compiling (DEFUN SET-FUNCTION-DATA-REGISTERS (FD R) ...) ... done
; compiling (DEFUN GET-CONTINUATION (N) ...) ... done
; compiling (DEFUN REGISTER-PROTECTED-CONTINUATION (K) ...) ... done
; compiling (DEFUN IMMEDIATE-CONTINUATION-P (C) ...) ... done
; compiling (DEFUN CONTINUATION-VALUE-IGNORED-P (C) ...) ... done
; compiling (DEFUN FINAL-VALUE-CONTINUATION-P (C) ...) ... done
; compiling (DEFUN PROTECTED-CONTINUATION-P (C) ...) ... done
; compiling (DEFUN CONTINUATION-REGISTER (C) ...) ... done
; compiling (DEFUN MULTIPLE-VALUE-CONTINUATION-P (C) ...) ... done
; compiling (DEFUN CONTINUATION-VALUE-REGISTER (C) ...) ... done
; compiling (DEFUN CONTINUATION-NAME (C) ...) ... done
; compiling (DEFUN CONTINUATION-FUNCTION (C) ...) ... done
; compiling (DEFUN CONTINUATION-TYPE (C) ...) ... done
; compiling (DEFUN CLEANUP-CONTINUATION (C REST INLINE) ...) ... done
; compiling (DEFUN FIND-REGISTER (V) ...) ... done
; compiling (DEFUN ASSIGN-REGISTERS (N) ...) ... done
; compiling (DEFUN POP-UNUSED-FRAMES (ENV N) ...) ... done
; compiling (DEFUN SETQ-CONTINUATION-P (N) ...) ... done
; compiling (DEFUN ADD-REGISTER-FRAME (VARS TYPE ENV) ...) ... done
; compiling (DEFUN ADD-LAMBDA-FRAME (VARS ENV) ...) ... done
; compiling (DEFUN ADD-CONTINUATION-FRAME (N ENV) ...) ... done
; compiling (DEFUN ASSIGN-REGISTERS-1 (N ENV) ...) ... done
; compiling (DEFUN COUNT-REGISTERS NIL ...) ... done
; compiling (DEFUN REGISTER-MAP NIL ...) ... done
; compiling (DEFUN MAKE-LABEL (V) ...) ... done
; compiling (DEFUN MAKE-LABEL-NODE (&OPTIONAL #) ...) ... done
; compiling (DEFUN PUSH-LABEL (V) ...) ... done
; compiling (DEFUN PUSH-INSTRUCTION (I) ...) ... done
; compiling (DEFUN NEXT-LITERAL-INDEX NIL ...) ... done
; compiling (DEFUN LITERAL-VALUE (V) ...) ... done
; compiling (DEFUN PUSH-LITERAL (V) ...) ... done
; compiling (DEFUN ADD-LITERAL (C) ...) ... done
; compiling (DEFUN ADD-LITERAL-VALUE (V) ...) ... done
; compiling (DEFUN GET-CODE-GENERATOR (S N) ...) ... done
; compiling (DEFUN SET-CODE-GENERATOR (S G) ...) ... done
; compiling (DEFUN SET-CODE-GENERATOR-TEST (S G) ...) ... done
; compiling (DEFMACRO DEFINE-CODE-GENERATOR (SYM &REST BODY) ...) ... done
; compiling (DEFMACRO DEFINE-CODE-GENERATOR-TEST (SYM &REST BODY) ...) ... done
; compiling (DEFUN GENERATE-INLINE-FUNCTION-CODE (F N REST) ...) ... done
; compiling (DEFMACRO DEFINE-INLINE-FUNCTION-GENERATOR (SYM &REST BODY) ...) ... done
; compiling (DEFMACRO DEFINE-STANDARD-INLINE-GENERATOR (SYM &OPTIONAL # ...) ...) ... done
; compiling (DEFMACRO DEFINE-STANDARD-INLINE-GENERATOR-2 (SYM &REST ARGS) ...) ... done
; compiling (DEFMACRO DEFINE-TEST-CODE-GENERATOR-1 (NAME OPCODE) ...) ... done
; compiling (DEFMACRO DEFINE-TEST-CODE-GENERATOR-2 (NAME OPCODE) ...) ... done
; compiling (DEFMACRO DEFINE-TEST-ARITH-CODE-GENERATOR-2 (NAME OPCODE) ...) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-1 %TEST 0) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-1 %TEST-CONSP 1) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-1 %TEST-SUPPLIED-P 2) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-1 %TEST-ENDP 3) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-2 %TEST-EQ 0) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-2 %TEST-EQL 1) ... done
; compiling (DEFINE-TEST-CODE-GENERATOR-2 %TEST-EQUAL 2) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST= #\=) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST/= #\#) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST< #\<) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST> #\>) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST<= #\L) ... done
; compiling (DEFINE-TEST-ARITH-CODE-GENERATOR-2 %TEST>= #\G) ... done
; compiling (DEFINE-CODE-GENERATOR %CASE (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %MVC (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %MVCC (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR VALUES (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR VALUES-LIST (N REST) ...) ... done
; compiling (DEFUN CLEANUP-PROTECTED-CONTINUATION (LABEL C REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %CATCH (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %THROW (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %CATCH-BLOCK (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %THROW-RETURN-FROM (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %CATCH-TAGBODY (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %DO-CATCH-TAGBODY (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %THROW-GO (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %ERRSET (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %UNWIND-PROTECT (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %DYNAMIC-BIND (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %Y (N REST) ...) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR %MAKE-CLOSURE (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR FUNCALL (N REST) ...) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR %SYMVAL (ARGS R) ...) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR %SYMFUN (ARGS R) ...) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR %SET-SYMVAL (ARGS R) ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %COPY) ... done
; compiling (DEFINE-CODE-GENERATOR %SETQ (N REST) ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SUPPLIED-P) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %MAKE-CELL) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %CELL-VALUE) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-CELL-VALUE) ... done
; compiling (DEFINE-CODE-GENERATOR %MV-COLLECT (N REST) ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %NTH-VALUE %NTH-VALUE ...) ... done
; compiling (DEFINE-CODE-GENERATOR %PUSH-VALUES (N REST) ...) ... done
; compiling (DEFINE-CODE-GENERATOR %POP-VALUES (N REST) ...) ... done
; compiling (DEFINE-LAMBDA-LIST + (&REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR + (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST + (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST * (&REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR * (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST * (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST - (X &REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR - (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST - (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST / (X &REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR / (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST / (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST MIN (X &REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR MIN (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST MIN (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST MAX (X &REST A)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR MAX (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST MAX (N) ...) ... done
; compiling (DEFMACRO DEFINE-ARITH-PRED-GENERATOR-2 (SYM CHAR) ...) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 < #\<) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 <= #\L) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 = #\=) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 /= #\#) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 >= #\G) ... done
; compiling (DEFINE-ARITH-PRED-GENERATOR-2 > #\>) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR-2 GET %GET) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR-2 %SET-GET) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR CONSP %CONSP ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR ENDP %ENDP ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR EQ %EQ ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR EQL %EQL ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR EQUAL %EQUAL ...) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR AREF (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST AREF (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST AREF (X &REST ARGS)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR %SET-AREF (ARGS R) ...) ... done
; compiling (DEFINE-CODE-GENERATOR-TEST %SET-AREF (N) ...) ... done
; compiling (DEFINE-LAMBDA-LIST %SET-AREF (X V &REST ...)) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-NTH %SET-NTH ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR RPLACA %RPLACA ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR RPLACD %RPLACD ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-SVREF %SET-SVREF ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-ELT %SET-ELT ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR NTH %NTH ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR SVREF %SVREF ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR ELT %ELT ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR CONS %CONS ...) ... done
; compiling (DEFINE-LAMBDA-LIST 1+ (X)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR 1+ (ARGS R) ...) ... done
; compiling (DEFINE-LAMBDA-LIST 1- (X)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR 1- (ARGS R) ...) ... done
; compiling (DEFINE-LAMBDA-LIST SLOT-VALUE (X &OPTIONAL Y)) ... done
; compiling (DEFINE-INLINE-FUNCTION-GENERATOR SLOT-VALUE (ARGS R) ...) ... done
; compiling (DEFINE-LAMBDA-LIST CAR (X)) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR CAR %CAR) ... done
; compiling (DEFINE-LAMBDA-LIST CDR (X)) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR CDR %CDR) ... done
; compiling (DEFMACRO DEFINE-CXR-GENERATOR (NAME N X) ...) ... done
; compiling (DEFINE-CXR-GENERATOR CAAR 2 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CADR 2 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDAR 2 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDDR 2 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CAAAR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CAADR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CADAR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CADDR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDAAR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDADR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDDAR 3 ...) ... done
; compiling (DEFINE-CXR-GENERATOR CDDDR 3 ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-CAR %SET-CAR ...) ... done
; compiling (DEFINE-STANDARD-INLINE-GENERATOR %SET-CDR %SET-CDR ...) ... done
NIL
> echo "(compile-file \"compiler/peephole.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.lsp
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/peephole.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFUN PEEPHOLE-OPTIMIZE (CL FUNS) ...) ... done
; compiling (DEFUN PEEPHOLE-OPTIMIZE-ONE (CL FUNS) ...) ... done
; compiling (DEFUN FIND-TARGET (LABEL CODE) ...) ... done
; compiling (DEFUN DROP-LABEL-IF-NOT-USED (LABEL CODE ALL-CODE) ...) ... done
; compiling (DEFUN TENSION-TEST-JUMP (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFUN DROP-DEAD-CODE (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFUN SHORT-OPERAND-P (X) ...) ... done
; compiling (LET (#) (DEFUN ADD-PEEPHOLE-SIMPLIFIER # ...) ...) ... done
; compiling (DEFUN SIMPLIFY-INSTRUCTION (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFMACRO DEFINE-PEEPHOLE-SIMPLIFIER (SYM ARGS &BODY ...) ...) ... done
; compiling (DOLIST (S #) (ADD-PEEPHOLE-SIMPLIFIER S #)) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %GOTO (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %INITIALIZE (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %SET-ONE-VALUE (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %SET-VALUES (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %SET-VALUES-LIST (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %COPY (INSTR CODE ALL-CODE) ...) ... done
; compiling (DEFINE-PEEPHOLE-SIMPLIFIER %COPY (INSTR CODE ALL-CODE) ...) ... done
NIL
> echo "(compile-file \"compiler/assemble.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.lsp
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/assemble.lsp"
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (DEFPARAMETER *OPCODE-TRANSLATIONS* NIL) ... done
; compiling (DEFPARAMETER *OPCODE-SYMBOLS* (QUOTE #)) ... done
; compiling (DO* (# #) (#) ...) ... done
; compiling (DEFUN ENCODE-OPCODES (CODE) ...) ... done
; compiling (DEFUN ASSEMBLE (CL) ...) ... done
NIL
> echo "(compile-file \"compiler/cmpfront.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.lsp
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "compiler/cmpfront.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFPACKAGE "XLSCMP" (:USE "XLISP") ...) ... done
; compiling (IN-PACKAGE "XLSCMP") ... done
; compiling (REQUIRE "backquot") ... done
; compiling (REQUIRE "cmpmacro") ... done
; compiling (REQUIRE "convert") ... done
; compiling (REQUIRE "cells") ... done
; compiling (REQUIRE "simplify") ... done
; compiling (REQUIRE "lift") ... done
; compiling (REQUIRE "gencode") ... done
; compiling (REQUIRE "peephole") ... done
; compiling (REQUIRE "assemble") ... done
; compiling (DEFUN PSCVT (E) ...) ... done
; compiling (DEFUN CMP (E &OPTIONAL NAME) ...) ... done
; compiling (DEFUN PCMP (E) ...) ... done
; compiling (DEFUN CMP-RESET NIL ...) ... done
; compiling (DEFPARAMETER *CMP-FILES* (QUOTE #)) ... done
; compiling (DEFUN COMPILE-FILE-LIST (LIST &OPTIONAL LOAD) ...) ... done
; compiling (DEFUN COMPILE-CMP NIL ...) ... done
; compiling (DEFUN PRINT-COMPILED-FORM (FORM STREAM SP) ...) ... done
; compiling (DEFUN ACCUMULATE-COMPILED-FORM (FORM OUTSTUFF) ...) ... done
; compiling (DEFVAR *COMPILE-VERBOSE* T) ... done
; compiling (DEFVAR *COMPILE-PRINT* T) ... done
; compiling (DEFVAR *COMPILE-PRINT-SYMBOL-PACKAGE* NIL) ... done
; compiling (DEFVAR *COMPILE-WARN-SPECIALS* NIL) ... done
; compiling (DEFVAR *CMP-SPECIALS* NIL) ... done
; compiling (DEFVAR *CMP-MACROS* NIL) ... done
; compiling (DEFVAR *CMP-SETF* NIL) ... done
; compiling (DEFVAR *CMP-STRUCTS* NIL) ... done
; compiling (DEFUN CMP-PRINT-START-MESSAGE (FORM) ...) ... done
; compiling (DEFUN CMP-PRINT-END-MESSAGE NIL ...) ... done
; compiling (DEFUN EXPAND-ONE (E) ...) ... done
; compiling (DEFUN COMPILE-ONE (E COMPILE-TIME-TOO STREAM) ...) ... done
; compiling (DEFUN COMPILE-FORM (E OUTSTUFF) ...) ... done
; compiling (DEFUN PRINT-FSL-VERSION-CHECK (OUT SP) ...) ... done
; compiling (DEFUN COMPILE-FILE (FILE &KEY # ...) ...) ... done
; compiling (DEFUN COMPILE-LAMBDA-EXPRESSION (FUN NAME ENV ...) ...) ... done
; compiling (DEFUN COMPILE-RETURN (F CFUN) ...) ... done
; compiling (DEFUN COMPILE (F &OPTIONAL #) ...) ... done
; compiling (PROVIDE "cmpload") ... done
NIL
> echo "(compile-file \"init.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "init.lsp"
; compiling (DEFUN SMALL-MACHINE-P NIL ...) ... done
; compiling (EXPORT (QUOTE SMALL-MACHINE-P) (QUOTE XLISP)) ... done
; compiling (EXPAND 25) ... done
; compiling (SETF *STRICT-KEYWORDS* NIL) ... done
; compiling (SETF *DISPLACE-MACROS* T) ... done
; compiling (SETF *SIMPLIFY-SETF* T) ... done
; compiling (LOAD "common") ... done
; compiling (LOAD "common2") ... done
; compiling (LOAD "common3") ... done
; compiling (LOAD "pathname") ... done
; compiling (LOAD "loadfsl") ... done
; compiling (LOAD "conditns") ... done
; compiling (LOAD "shlib") ... done
; compiling (LOAD "cmpload") ... done
; compiling (SETF *INTERRUPT-ACTION* (FUNCTION TOP-LEVEL)) ... done
; compiling (SETF *DEBUG-PRINT-LENGTH* 4) ... done
; compiling (SETF *DEBUG-PRINT-LEVEL* 3) ... done
; compiling (SETF XLISP::*DEFAULT-HANDLER* (FUNCTION #)) ... done
; compiling (REQUIRE "help") ... done
; compiling (REQUIRE "objects") ... done
; compiling (REQUIRE "menus") ... done
; compiling (REQUIRE "dialogs") ... done
; compiling (REQUIRE "linalg") ... done
; compiling (REQUIRE "stats") ... done
; compiling (REQUIRE "graphics") ... done
; compiling (REQUIRE "regress") ... done
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (DEFVAR *HELP-FILE-NAME*) ... done
; compiling (DEFVAR *HELP-STREAM*) ... done
; compiling (DEFVAR *LINE-LENGTH* 78 ...) ... done
; compiling (DEFVAR *HELP-LOADED* NIL) ... done
; compiling (DEFUN INITIALIZE-SYSTEM NIL ...) ... done
; compiling (SETF *STARTUP-FUNCTIONS* (QUOTE #)) ... done
NIL
> echo "(compile-file \"common.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.lsp"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "common.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (EXPORT (QUOTE X)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN FIFTH (X) ...) ... done
; compiling (DEFUN SIXTH (X) ...) ... done
; compiling (DEFUN SEVENTH (X) ...) ... done
; compiling (DEFUN EIGHTH (X) ...) ... done
; compiling (DEFUN NINTH (X) ...) ... done
; compiling (DEFUN TENTH (X) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFVAR *CMP-SETF*) ... done
; compiling (EXPORT (QUOTE STEP)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN DEFTYPE-ARGLIST-FIX (ARGS) ...) ... done
; compiling (DEFMACRO DEFTYPE (TYPE ARGS &REST ...) ...) ... done
; compiling (DEFTYPE FLONUM NIL ...) ... done
; compiling (DEFTYPE SHORT-FLOAT NIL ...) ... done
; compiling (DEFTYPE SINGLE-FLOAT NIL ...) ... done
; compiling (DEFTYPE DOUBLE-FLOAT NIL ...) ... done
; compiling (DEFTYPE LONG-FLOAT NIL ...) ... done
; compiling (DEFTYPE REAL NIL ...) ... done
; compiling (DEFTYPE RATIONAL NIL ...) ... done
; compiling (DEFTYPE SEQUENCE NIL ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFMACRO EVAL-WHEN (WHEN &REST BODY) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN APPLY-ARG-ROTATE (F ARGS) ...) ... done
; compiling (DEFMACRO DEFSETF (SYM FIRST &REST ...) ...) ... done
; compiling (DEFUN LOAD-HELP NIL ...) ... done
; compiling (DEFUN DOCUMENTATION (SYMBOL DOC-TYPE) ...) ... done
; compiling (DEFSETF DOCUMENTATION (SYMBOL DOC-TYPE) ...) ... done
; compiling (DEFSETF FIRST (X) ...) ... done
; compiling (DEFSETF SECOND (X) ...) ... done
; compiling (DEFSETF THIRD (X) ...) ... done
; compiling (DEFSETF FOURTH (X) ...) ... done
; compiling (DEFSETF FIFTH (X) ...) ... done
; compiling (DEFSETF SIXTH (X) ...) ... done
; compiling (DEFSETF SEVENTH (X) ...) ... done
; compiling (DEFSETF EIGHTH (X) ...) ... done
; compiling (DEFSETF NINTH (X) ...) ... done
; compiling (DEFSETF TENTH (X) ...) ... done
; compiling (DEFSETF REST (X) ...) ... done
; compiling (DEFSETF %STRUCT-REF (X I) ...) ... done
; compiling (DEFUN %SET-RM-AREF (X I V) ...) ... done
; compiling (DEFSETF ROW-MAJOR-AREF %SET-RM-AREF) ... done
; compiling (DEFSETF GET %SET-GET) ... done
; compiling (DEFSETF SYMBOL-VALUE %SET-SYMBOL-VALUE) ... done
; compiling (DEFSETF SYMBOL-FUNCTION %SET-SYMBOL-FUNCTION) ... done
; compiling (DEFSETF SYMBOL-PLIST %SET-SYMBOL-PLIST) ... done
; compiling (DEFSETF CAR %SET-CAR) ... done
; compiling (DEFSETF CDR %SET-CDR) ... done
; compiling (DEFSETF AREF %SET-AREF) ... done
; compiling (DEFSETF GETHASH %SET-GETHASH) ... done
; compiling (DEFSETF SELECT SET-SELECT) ... done
; compiling (DEFSETF SLOT-VALUE SLOT-VALUE) ... done
; compiling (DEFSETF NTH %SET-NTH) ... done
; compiling (DEFSETF ELT %SET-ELT) ... done
; compiling (DEFSETF SVREF %SET-SVREF) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFVAR *MODULES* NIL) ... done
; compiling (DEFUN PROVIDE (NAME) ...) ... done
; compiling (EXPORT (QUOTE #) "SYSTEM") ... done
; compiling (DEFVAR *MODULE-PATH* NIL) ... done
; compiling (DEFUN REQUIRE (NAME &OPTIONAL #) ...) ... done
; compiling (DEFUN FIND-REQUIRE-FILE (PATH) ...) ... done
; compiling (DEFUN CREATE-MODULE-PATH NIL ...) ... done
; compiling (DEFUN PROBE-FILE (F) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN MATRIXP (X) ...) ... done
; compiling (DEFUN EQUALP (X Y) ...) ... done
; compiling (DEFUN Y-OR-N-P (&REST ARGS) ...) ... done
; compiling (DEFUN YES-OR-NO-P (&REST ARGS) ...) ... done
; compiling (DEFMACRO WITH-INPUT-FROM-STRING (STREAM-STRING &REST BODY) ...) ... done
; compiling (DEFMACRO WITH-OUTPUT-TO-STRING (STR-LIST &REST BODY) ...) ... done
; compiling (DEFMACRO WITH-OPEN-FILE (STREAM-FILE-ARGS &REST BODY) ...) ... done
; compiling (DEFMACRO WITH-OPEN-STREAM (STREAM-ARGS &REST BODY) ...) ... done
; compiling (DEFUN READ-FROM-STRING (STRING &OPTIONAL # ...) ...) ... done
; compiling (DEFUN REALP (X) ...) ... done
; compiling (DEFMACRO TYPECASE (X &REST FORMS) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN PAIRLIS (KEYS VALUES &OPTIONAL ...) ...) ... done
; compiling (DEFUN COPY-ALIST (LIST) ...) ... done
; compiling (DEFUN COPY-TREE (LIST) ...) ... done
; compiling (DEFUN SIGNUM (X) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN LOGTEST (X Y) ...) ... done
; compiling (DEFUN CIS (X) ...) ... done
; compiling (DEFUN SINH (X) ...) ... done
; compiling (DEFUN COSH (X) ...) ... done
; compiling (DEFUN TANH (X) ...) ... done
; compiling (DEFUN ASINH (X) ...) ... done
; compiling (DEFUN ACOSH (X) ...) ... done
; compiling (DEFUN ATANH (X) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN FILL (SEQUENCE ITEM &KEY ...) ...) ... done
; compiling (DEFUN ACONS (X Y A) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (SYMBOL-FUNCTION #) ...) ... done
; compiling (DEFUN SET-EXCLUSIVE-OR (LIST1 LIST2 &REST ...) ...) ... done
; compiling (DEFUN NSET-EXCLUSIVE-OR (LIST1 LIST2 &REST ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN SET-MACRO-CHARACTER (CH FUN &OPTIONAL ...) ...) ... done
; compiling (DEFUN GET-MACRO-CHARACTER (CH &OPTIONAL #) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFCONSTANT *COMMON-LISP-READTABLE* (COPY-ARRAY *READTABLE*)) ... done
; compiling (DEFUN COPY-READTABLE (&OPTIONAL # #) ...) ... done
; compiling (DEFUN READTABLEP (RT) ...) ... done
; compiling (DEFUN SET-SYNTAX-FROM-CHAR (TO FROM &OPTIONAL ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFMACRO SAVEFUN (FUN) ...) ... done
; compiling (DEFUN DEBUG NIL ...) ... done
; compiling (DEFUN NODEBUG NIL ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFMACRO DO-SYMBOL-ARRAYS (S RES A ...) ...) ... done
; compiling (DEFMACRO DO-SYMBOLS (SPR &REST BODY) ...) ... done
; compiling (DEFMACRO DO-EXTERNAL-SYMBOLS (SPR &REST BODY) ...) ... done
; compiling (DEFMACRO DO-ALL-SYMBOLS (SR &REST BODY) ...) ... done
; compiling (DEFMACRO DEFPACKAGE (PNAME &REST OPTIONS) ...) ... done
; compiling (DEFUN DO-DEFPACKAGE (PNAME OPTIONS) ...) ... done
; compiling (DEFUN APROPOS (X &OPTIONAL PACKAGE) ...) ... done
; compiling (DEFUN APROPOS-LIST (X &OPTIONAL PACKAGE) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN VALUES-LIST (X) ...) ... done
; compiling (DEFMACRO MULTIPLE-VALUE-LIST (FORM) ...) ... done
; compiling (DEFMACRO MULTIPLE-VALUE-BIND (VARS FORM &REST ...) ...) ... done
; compiling (DEFMACRO MULTIPLE-VALUE-SETQ (VARIABLES FORM) ...) ... done
; compiling (IF (FIND-SYMBOL "SAVE") (UNEXPORT #)) ... done
; compiling (IF (FIND-SYMBOL "RESTORE") (UNEXPORT #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN SAVE-WORKSPACE (NAME) ...) ... done
; compiling (DEFUN ADD-EXIT-FUNCTION (FUN) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFMACRO DECLARE (&REST ARGS) ...) ... done
; compiling (DEFUN PROCLAIM (DECL) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFPARAMETER *PRINT-PRETTY* NIL) ... done
; compiling (DEFPARAMETER *PRINT-CIRCLE* NIL) ... done
; compiling (DEFPARAMETER *PRINT-RADIX* NIL) ... done
; compiling (DEFPARAMETER *PRINT-BASE* 10) ... done
; compiling (DEFPARAMETER *PRINT-ARRAY* T) ... done
; compiling (DEFPARAMETER *READ-BASE* 10) ... done
; compiling (DEFUN WRITE (X &KEY # ...) ...) ... done
; compiling (DEFUN WRITE-STRING (STRING &OPTIONAL # ...) ...) ... done
; compiling (DEFUN WRITE-LINE (STRING &OPTIONAL # ...) ...) ... done
; compiling (DEFUN FINISH-OUTPUT (&OPTIONAL #) ...) ... done
; compiling (DEFUN CLEAR-OUTPUT (&OPTIONAL #) ...) ... done
; compiling (DEFUN WRITE-TO-STRING (X &REST ARGS) ...) ... done
; compiling (DEFUN PRIN1-TO-STRING (ARG) ...) ... done
; compiling (DEFUN PRINC-TO-STRING (ARG) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFSETF CHAR (X I) ...) ... done
; compiling (DEFUN KEYWORDP (X) ...) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION CHAR)) ... done
; compiling (DEFUN NRECONC (X Y) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN DESCRIBE (X &OPTIONAL #) ...) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION AREF)) ... done
; compiling (DEFCONSTANT LAMBDA-LIST-KEYWORDS (QUOTE #)) ... done
; compiling (DEFUN GET-PROPERTIES (PLACE ILIST) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN PARSE-INTEGER (S &KEY # ...) ...) ... done
; compiling (DEFUN COMPILED-FUNCTION-P (F) ...) ... done
; compiling (DEFUN PACKAGEP (X) ...) ... done
; compiling (DEFVAR *GENTEMP-COUNTER* -1) ... done
; compiling (DEFUN GENTEMP (&OPTIONAL # #) ...) ... done
; compiling (DEFUN BIT-VECTOR-P (X) ...) ... done
; compiling (EXPORT (QUOTE DESTRUCTURING-BIND)) ... done
; compiling (DEFUN DESTRUCTURING-ARGLIST-P (X) ...) ... done
; compiling (DEFUN DO-DESTRUCTURE (LL AL BODY) ...) ... done
; compiling (DEFUN DESTRUCTURE-CHECK-ARG (X TOOMANY) ...) ... done
; compiling (DEFUN DESTRUCTURE-FIX-ARGLIST (LL) ...) ... done
; compiling (DEFMACRO DESTRUCTURING-BIND (ARGS VALS &REST ...) ...) ... done
; compiling (DEFMACRO DESTRUCTURING-BIND (ARGS VALS &REST ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN SPECIAL-FORM-P (X) ...) ... done
; compiling (EXPORT (QUOTE COMPLEMENT)) ... done
; compiling (DEFUN COMPLEMENT (F) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN COPY-STRUCTURE (STRUCT) ...) ... done
; compiling (DEFUN COPY-SYMBOL (SYM &OPTIONAL PROPS) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN TAILP (OBJECT LIST) ...) ... done
; compiling (DEFUN LDIFF (LIST OBJECT) ...) ... done
; compiling (EXPORT (QUOTE MEMBER-IF)) ... done
; compiling (DEFUN MEMBER-IF (PRED LIST &KEY ...) ...) ... done
; compiling (EXPORT (QUOTE ISQRT)) ... done
; compiling (DEFUN ISQRT (X) ...) ... done
NIL
> echo "(compile-file \"common2.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.lsp"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "common2.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (DEFVAR *CMP-STRUCTS*) ... done
; compiling (DEFUN CMP-GET-SLOTINFO (STRUCTNAME) ...) ... done
; compiling (DEFUN CMP-REGISTER-SLOTINFO (STRUCTNAME SLOTINFO) ...) ... done
; compiling (DEFUN GET-STRUCTURE-SLOT-DEFAULT (TYPE SLOT) ...) ... done
; compiling (DEFUN SET-STRUCTURE-SLOT-DEFAULT (TYPE SLOT NEW) ...) ... done
; compiling (DEFUN DEFAULT-STRUCTURE-SLOT-VALUE (TYPE SLOT) ...) ... done
; compiling (DEFUN INSTALL-SHARP-S-CONSTRUCTOR (STRUCTNAME F) ...) ... done
; compiling (DEFUN INSTALL-STRUCTURE-SLOTS (STRUCTNAME INCLUDE SLOTS) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-SLOTINFO (NAME FORM READONLY) ...) ... done
; compiling (DEFUN STRUCTURE-SLOTINFO-NAME (X) ...) ... done
; compiling (DEFUN STRUCTURE-SLOTINFO-FORM (X) ...) ... done
; compiling (DEFUN STRUCTURE-SLOTINFO-READ-ONLY (X) ...) ... done
; compiling (DEFUN STRUCTURE-SLOT-EQL (X Y) ...) ... done
; compiling (DEFUN CONVERT-STRUCTURE-SLOT-OPTIONS (SLOTS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-PARENT-SLOTINFO (P) ...) ... done
; compiling (DEFUN GET-STRUCTURE-SLOTINFO (INCLUDE SLOTS) ...) ... done
; compiling (DEFUN CHECK-STRUCTURE-SLOTS (STRUCTSPEC SLOTSPECS) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-SLOT-FORMS (STRUCTNAME INCLUDE SLOTS) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-SLOT-ACCESSOR-FORMS (CONC-NAME SLOTINFO TYPED) ...) ... done
; compiling (DEFCONSTANT *STRUCTURE-OPTIONS* (QUOTE #)) ... done
; compiling (DEFUN CHECK-STRUCTURE-SPECIFICATION (STRUCTSPEC) ...) ... done
; compiling (DEFUN FIND-STRUCTURE-OPTION (NAME OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-OPTION-SYMBOL (NAME OPTIONS OPTNAME ...) ...) ... done
; compiling (DEFUN GET-STRUCTURE-CONC-NAME (STRUCTNAME OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-COPIER (STRUCTNAME OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-CONSTRUCTOR (STRUCTNAME OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-INCLUDE (OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-PREDICATE (STRUCTNAME OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-PRINT-FUNCTION (OPTIONS) ...) ... done
; compiling (DEFUN GET-STRUCTURE-TYPE (OPTIONS) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-COPIER-FORM (COPIER) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-PREDICATE-FORM (STRUCTNAME PREDICATE TYPE) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-PRINT-FUNCTION-FORM (STRUCTNAME PRINTFUN TYPE) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-CONSTRUCTOR-FORM-BODY (STRUCTNAME SLOTNAMES TN) ...) ... done
; compiling (DEFUN MAKE-STANDARD-STRUCTURE-CONSTRUCTOR-FORM (STRUCTNAME SLOTINFO TN) ...) ... done
; compiling (DEFUN FIXUP-STRUCTURE-CONSTRUCTOR-ARGFORM (NAME A) ...) ... done
; compiling (DEFUN REMOVE-STRUCTURE-CONSTRUCTOR-SLOT (A SLOTS) ...) ... done
; compiling (DEFUN STRUCTURE-CONSTRUCTOR-ARGLIST (NAME ALIST SLOTS) ...) ... done
; compiling (DEFUN MAKE-BOA-STRUCTURE-CONSTRUCTOR-FORM (STRUCTNAME SLOTINFO ALIST ...) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-CONSTRUCTOR-FORM (STRUCTNAME SLOTINFO CONSTRUCTOR ...) ...) ... done
; compiling (DEFUN MAKE-SHARP-S-STRUCTURE-CONSTRUCTOR-FORM (STRUCTNAME SLOTINFO TN) ...) ... done
; compiling (DEFUN MAKE-STRUCTURE-INCLUDE-FORM (STRUCTNAME INCLUDE) ...) ... done
; compiling (DEFMACRO DEFSTRUCT (STRUCTSPEC &REST SLOTSPECS) ...) ... done
NIL
> echo "(compile-file \"common3.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.lsp"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "common3.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (DEFVAR *CMP-GLOBAL-MACROS* NIL) ... done
; compiling (DEFVAR *CMP-MACROS*) ... done
; compiling (DEFVAR *CMP-SPECIALS*) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN SPLIT-DECLARATIONS (X) ...) ... done
; compiling (DEFUN MAKE-MACRO-LAMBDA-EXPRESSION (NAME LAMBDA-LIST BODY) ...) ... done
; compiling (DEFUN ENCLOSE (EXPR &OPTIONAL ENV) ...) ... done
; compiling (DEFUN PARSE-MACRO (NAME LAMBDA-LIST BODY ...) ...) ... done
; compiling (EXPORT (QUOTE DEFINE-COMPILER-MACRO)) ... done
; compiling (DEFMACRO SET-CMP-MACRO (SYMARG FUNARG) ...) ... done
; compiling (DEFMACRO DEFINE-COMPILER-MACRO (SYM ARGS &REST ...) ...) ... done
; compiling (DEFMACRO DEFINE-SPECIAL-FORM-MACRO (SYM ARGS &REST ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN SPECIAL-VARIABLE-P (SYM) ...) ... done
; compiling (DEFUN AUGMENT-ENVIRONMENT (ENV &KEY VARIABLE ...) ...) ... done
; compiling (DEFUN GET-ENVIRONMENT-ENTRY (NAME ENV) ...) ... done
; compiling (DEFUN GLOBAL-SYMBOL-MACRO (SYM) ...) ... done
; compiling (DEFUN VARIABLE-INFORMATION (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN FUNCTION-INFORMATION (SYM &OPTIONAL ENV) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN MACROEXPAND-SYMBOL-1 (SYMBOL &OPTIONAL ENV) ...) ... done
; compiling (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (UNLESS # #)) ... done
; compiling (DEFUN MACROEXPAND-1 (FORM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN MACROEXPAND (FORM &OPTIONAL ENV) ...) ... done
; compiling (EXPORT (QUOTE DEFINE-SYMBOL-MACRO)) ... done
; compiling (DEFMACRO DEFINE-SYMBOL-MACRO (NAME FORM) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN GET-CMP-SETF-INFO (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-CMP-SETF-METHOD (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-CMP-SETF-LAMBDA (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-XLISP-SETF-METHOD (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-XLISP-SETF-LAMBDA (SYM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-SETF-METHOD (FORM &OPTIONAL ENV) ...) ... done
; compiling (DEFUN GET-APPLY-SETF-METHOD (FORM &OPTIONAL ENV) ...) ... done
; compiling (EXPORT (QUOTE *SIMPLIFY-SETF*)) ... done
; compiling (DEFVAR *SIMPLIFY-SETF* NIL) ... done
; compiling (DEFUN MAKE-SETF-FORM (FORM VALUE &OPTIONAL ...) ...) ... done
; compiling (DEFMACRO SETF (&REST PAIRS &ENVIRONMENT ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN NON-MACRO-VARIABLE-SYMBOL-P (PLACE ENV) ...) ... done
; compiling (DEFMACRO INCF (PLACE &OPTIONAL # ...) ...) ... done
; compiling (DEFMACRO DECF (PLACE &OPTIONAL # ...) ...) ... done
; compiling (DEFMACRO PUSH (VAL PLACE &ENVIRONMENT ...) ...) ... done
; compiling (DEFMACRO POP (PLACE &ENVIRONMENT ENV) ...) ... done
; compiling (DEFMACRO PUSHNEW (VAL PLACE &REST ...) ...) ... done
; compiling (DEFUN REM-F (LIST Y) ...) ... done
; compiling (DEFMACRO REMF (PLACE INDICATOR &ENVIRONMENT ...) ...) ... done
; compiling (DEFMACRO ROTATEF (&REST PLACES &ENVIRONMENT ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN EXPAND-PSET-FORM (NAME PAIRS) ...) ... done
; compiling (DEFMACRO PSETQ (&REST PAIRS) ...) ... done
; compiling (DEFMACRO PSETF (&REST PAIRS) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFUN (F ARGS &REST ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFMACRO (F ARGS &REST ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFMETH (OB SYM ARGS ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFPROTO (NAME &OPTIONAL IVARS ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFVAR (VAR &OPTIONAL # ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFPARAMETER (VAR VALUE &OPTIONAL ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DEFCONSTANT (VAR VALUE &OPTIONAL ...) ...) ... done
; compiling (DEFUN MAKE-PROGN-FORM (BODY) ...) ... done
; compiling (DEFUN MAKE-TAGBODY-BODY (BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO AND (&REST ARGS) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO OR (&REST ARGS) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO UNLESS (TEST &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO WHEN (TEST &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO COND (&REST CLAUSES) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO RETURN (&OPTIONAL VAL) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO PROG (VLIST &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO PROG* (VLIST &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO PROG1 (FIRST &REST REST) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO PROG2 (FIRST SECOND &REST ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO LOOP (&REST BODY) ...) ... done
; compiling (DEFUN DO-LOOP-BINDING-VARIABLES (BDS) ...) ... done
; compiling (DEFUN DO-LOOP-BINDING-VALUES (BDS) ...) ... done
; compiling (DEFUN DO-LOOP-BINDING-STEPS (BDS) ...) ... done
; compiling (DEFUN MAKE-DO-STEP-PAIRS (VARS STEPS) ...) ... done
; compiling (DEFUN MAKE-DO-LOOP (LETSYM SETSYM BDS ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DO (BDS TR &REST ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DO* (BDS TR &REST ...) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DOTIMES (# &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO DOLIST (# &REST BODY) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO IN-PACKAGE (NAME) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO TIME (EXPR) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO TRACE (&REST ARGS) ...) ... done
; compiling (DEFINE-SPECIAL-FORM-MACRO UNTRACE (&REST ARGS) ...) ... done
; compiling (EXPORT (QUOTE WITHOUT-INTERRUPTS) "SYSTEM") ... done
; compiling (DEFMACRO WITHOUT-INTERRUPTS (&REST BODY) ...) ... done
; compiling (PROVIDE "common") ... done
NIL
> echo "(compile-file \"help.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.lsp
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "help.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (PROVIDE "help") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN HELP (&OPTIONAL S) ...) ... done
; compiling (DEFUN HELP* (SL) ...) ... done
; compiling (DEFMETH *OBJECT* :DOC-TOPICS ...) ... done
; compiling (DEFMETH *OBJECT* :DOCUMENTATION ...) ... done
; compiling (DEFMETH *OBJECT* :DELETE-DOCUMENTATION ...) ... done
; compiling (DEFMETH *OBJECT* :HELP ...) ... done
NIL
> echo "(compile-file \"objects.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.lsp
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "objects.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (PROVIDE "objects") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFSETF SLOT-VALUE SLOT-VALUE) ... done
; compiling (DEFMETH *OBJECT* :NEW ...) ... done
; compiling (DEFMETH *OBJECT* :RETYPE ...) ... done
; compiling (DEFMETH *OBJECT* :PRINT ...) ... done
; compiling (DEFMETH *OBJECT* :SLOT-VALUE ...) ... done
; compiling (DEFMETH *OBJECT* :SLOT-NAMES ...) ... done
; compiling (DEFMETH *OBJECT* :METHOD-SELECTORS ...) ... done
; compiling (DEFMETH HARDWARE-OBJECT-PROTO :REMOVE ...) ... done
; compiling (DEFMETH HARDWARE-OBJECT-PROTO :ALLOCATED-P ...) ... done
; compiling (DEFMETH HARDWARE-OBJECT-PROTO :ADD-SUBORDINATE ...) ... done
; compiling (DEFMETH HARDWARE-OBJECT-PROTO :DELETE-SUBORDINATE ...) ... done
; compiling (DEFMETH HARDWARE-OBJECT-PROTO :CLOBBER ...) ... done
; compiling (EXPORT (QUOTE ACTIVE-WINDOWS)) ... done
; compiling (DEFUN ACTIVE-WINDOWS NIL ...) ... done
; compiling (SEND DIALOG-PROTO :SLOT-VALUE ...) ... done
; compiling (SEND DIALOG-PROTO :SLOT-VALUE ...) ... done
; compiling (DEFMETH DIALOG-PROTO :ITEMS ...) ... done
; compiling (DEFMETH DIALOG-ITEM-PROTO :DIALOG ...) ... done
; compiling (DEFPROTO EDIT-TEXT-ITEM-PROTO NIL ...) ... done
; compiling (SEND EDIT-TEXT-ITEM-PROTO :SLOT-VALUE ...) ... done
; compiling (DEFPROTO MODAL-DIALOG-PROTO (QUOTE #) ...) ... done
; compiling (SEND MODAL-DIALOG-PROTO :SLOT-VALUE ...) ... done
; compiling (SEND MODAL-DIALOG-PROTO :SLOT-VALUE ...) ... done
; compiling (DEFMETH MODAL-DIALOG-PROTO :MODAL-DIALOG ...) ... done
; compiling (DEFMETH MODAL-DIALOG-PROTO :MODAL-DIALOG-RETURN ...) ... done
; compiling (DEFPROTO MODAL-BUTTON-PROTO (QUOTE NIL) ...) ... done
; compiling (DEFMETH MODAL-BUTTON-PROTO :DO-ACTION ...) ... done
; compiling (DEFPROTO DASH-ITEM-PROTO NIL ...) ... done
; compiling (DEFMETH DASH-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH MENU-ITEM-PROTO :MENU ...) ... done
; compiling (DEFMETH MENU-PROTO :PRINT ...) ... done
; compiling (DEFMETH MENU-ITEM-PROTO :PRINT ...) ... done
; compiling (DEFMETH GRAPH-WINDOW-PROTO :ERASE-WINDOW ...) ... done
NIL
> echo "(compile-file \"linalg.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.lsp
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "linalg.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (PROVIDE "linalg") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN MULTIPLY-MATRIX-MATRIX (X Y) ...) ... done
; compiling (DEFUN MULTIPLY-MATRIX-VECTOR (X Y) ...) ... done
; compiling (DEFUN MULTIPLY-VECTOR-MATRIX (X Y) ...) ... done
; compiling (DEFUN INNER-PRODUCT (X Y &OPTIONAL ...) ...) ... done
; compiling (DEFUN BINARY-MATMULT (X Y) ...) ... done
; compiling (DEFUN MATMULT (X &REST MORE) ...) ... done
; compiling (SETF (SYMBOL-FUNCTION #) (FUNCTION MATMULT)) ... done
; compiling (DEFUN CROSS-PRODUCT (X &OPTIONAL #) ...) ... done
; compiling (DEFUN OUTER-PRODUCT (X Y &OPTIONAL ...) ...) ... done
; compiling (DEFUN IDENTITY-MATRIX (N) ...) ... done
; compiling (EXPORT (QUOTE TRANSPOSE)) ... done
; compiling (DEFUN TRANSPOSE (X) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN MAKE-SWEEP-MATRIX (X Y &OPTIONAL ...) ...) ... done
; compiling (DEFUN SWEEP-OPERATOR (A COLS &OPTIONAL ...) ...) ... done
; compiling (DEFUN SQUARE-MATRIX-P (X) ...) ... done
; compiling (DEFMACRO CHECK-SQUARE-MATRIX (X) ...) ... done
; compiling (DEFMACRO CHECK-MATRIX (X) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN LU-DECOMP (X) ...) ... done
; compiling (DEFUN RCONDEST (X) ...) ... done
; compiling (DEFUN DETERMINANT (X) ...) ... done
; compiling (DEFUN INVERSE (X) ...) ... done
; compiling (DEFUN LU-SOLVE (LU B) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN QR-DECOMP (X &OPTIONAL PIVOT) ...) ... done
; compiling (DEFUN SV-DECOMP (X) ...) ... done
; compiling (EXPORT (QUOTE EIGEN)) ... done
; compiling (DEFUN EIGEN (X) ...) ... done
NIL
> echo "(compile-file \"stats.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.fsl
; loading stats.lsp
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "stats.lsp"
; compiling (PROVIDE "stats") ... done
; compiling (DEFSETF SELECT SET-SELECT) ... done
; compiling (DEFUN COUNT-FILE-COLUMNS (FNAME) ...) ... done
; compiling (DEFVAR *XLISPTABLE* *READTABLE*) ... done
; compiling (UNLESS (FBOUNDP #) (DEFUN OPEN-FILE-DIALOG # ...)) ... done
; compiling (DEFUN READ-DATA-FILE (&OPTIONAL #) ...) ... done
; compiling (DEFUN READ-DATA-COLUMNS (&OPTIONAL # #) ...) ... done
; compiling (DEFUN LOAD-DATA (FILE) ...) ... done
; compiling (DEFUN LOAD-EXAMPLE (FILE) ...) ... done
; compiling (DEFVAR *VARIABLES* NIL) ... done
; compiling (DEFVAR *ASK-ON-REDEFINE* NIL) ... done
; compiling (DEFMACRO DEF (SYMBOL VALUE) ...) ... done
; compiling (DEFUN VARIABLES NIL ...) ... done
; compiling (DEFUN SAVEVAR (VARS FILE) ...) ... done
; compiling (DEFUN UNDEF (V) ...) ... done
; compiling (DEFUN STANDARD-DEVIATION (X) ...) ... done
; compiling (DEFUN QUANTILE (X P) ...) ... done
; compiling (DEFUN MEDIAN (X) ...) ... done
; compiling (DEFUN INTERQUARTILE-RANGE (X) ...) ... done
; compiling (DEFUN FIVNUM (X) ...) ... done
; compiling (DEFUN COVARIANCE-MATRIX (&REST ARGS) ...) ... done
; compiling (DEFUN DIFFERENCE (X) ...) ... done
; compiling (DEFUN RSEQ (A B NUM) ...) ... done
; compiling (DEFUN MATRIX (DIM DATA) ...) ... done
; compiling (DEFUN PRINT-MATRIX (A &OPTIONAL # ...) ...) ... done
; compiling (DEFUN ARRAY-TO-NESTED-LIST (ARRAY) ...) ... done
; compiling (DEFUN SOLVE (A B) ...) ... done
; compiling (DEFUN BACKSOLVE (A B) ...) ... done
; compiling (DEFUN EIGENVALUES (A) ...) ... done
; compiling (DEFUN EIGENVECTORS (A) ...) ... done
; compiling (DEFUN ACCUMULATE (F S) ...) ... done
; compiling (DEFUN CUMSUM (X) ...) ... done
; compiling (DEFUN COMBINE (&REST ARGS) ...) ... done
; compiling (DEFUN LOWESS (X Y &KEY ...) ...) ... done
; compiling (DEFPARAMETER *DEFAULT-SMOOTHER-POINTS* 30) ... done
; compiling (DEFUN SPLINE (X Y &KEY ...) ...) ... done
; compiling (DEFUN KERNEL-DENS (X &KEY # ...) ...) ... done
; compiling (DEFUN KERNEL-SMOOTH (X Y &KEY ...) ...) ... done
; compiling (DEFUN SORT-DATA (X) ...) ... done
; compiling (DEFUN ORDER (X) ...) ... done
; compiling (DEFUN XLISP::MAKE-COMPOUND (FORM SEQ) ...) ... done
; compiling (DEFUN RANK (X) ...) ... done
NIL
> echo "(compile-file \"dialogs.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.lsp
; loading linalg.fsl
; loading stats.fsl
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "dialogs.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (PROVIDE "dialogs") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN NUM-TO-STRING (N) ...) ... done
; compiling (DEFPROTO OK-OR-CANCEL-DIALOG-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH OK-OR-CANCEL-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFUN OK-OR-CANCEL-DIALOG (S &OPTIONAL # ...) ...) ... done
; compiling (DEFPROTO MESSAGE-DIALOG-PROTO (QUOTE NIL) ...) ... done
; compiling (DEFMETH MESSAGE-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFUN MESSAGE-DIALOG (&REST ARGS) ...) ... done
; compiling (DEFPROTO GET-STRING-DIALOG-PROTO NIL ...) ... done
; compiling (DEFMETH GET-STRING-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFUN GET-STRING-DIALOG (&REST ARGS) ...) ... done
; compiling (DEFUN GET-VALUE-DIALOG (PROMPT &REST ARGS ...) ...) ... done
; compiling (DEFPROTO CHOOSE-ITEM-DIALOG-PROTO NIL ...) ... done
; compiling (DEFMETH CHOOSE-ITEM-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFUN CHOOSE-ITEM-DIALOG (&REST ARGS) ...) ... done
; compiling (DEFPROTO CHOOSE-SUBSET-DIALOG-PROTO NIL ...) ... done
; compiling (DEFMETH CHOOSE-SUBSET-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFUN CHOOSE-SUBSET-DIALOG (&REST ARGS) ...) ... done
; compiling (DEFPROTO SEQUENCE-SCROLL-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :SCROLL-ACTION ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :VALUE ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :DISPLAY-VALUE ...) ... done
; compiling (DEFMETH SEQUENCE-SCROLL-ITEM-PROTO :USER-ACTION ...) ... done
; compiling (DEFPROTO SEQUENCE-SLIDER-DIALOG-PROTO NIL ...) ... done
; compiling (DEFMETH SEQUENCE-SLIDER-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SEQUENCE-SLIDER-DIALOG-PROTO :VALUE ...) ... done
; compiling (DEFUN SEQUENCE-SLIDER-DIALOG (&REST ARGS) ...) ... done
; compiling (DEFPROTO INTERVAL-SCROLL-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :VALUE ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :MAX ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :MIN ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :USER-ACTION ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :DISPLAY-VALUE ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :SCROLL-ACTION ...) ... done
; compiling (DEFMETH INTERVAL-SCROLL-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (DEFPROTO INTERVAL-SLIDER-DIALOG-PROTO NIL ...) ... done
; compiling (DEFMETH INTERVAL-SLIDER-DIALOG-PROTO :ISNEW ...) ... done
; compiling (DEFMETH INTERVAL-SLIDER-DIALOG-PROTO :VALUE ...) ... done
; compiling (DEFUN INTERVAL-SLIDER-DIALOG (&REST ARGS) ...) ... done
NIL
> echo "(compile-file \"graphics.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.lsp
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "graphics.lsp"
; compiling (PROVIDE "graphics") ... done
; compiling (REQUIRE "stats") ... done
; compiling (REQUIRE "dialogs") ... done
; compiling (DEFCONSTANT *CURSORS* (QUOTE #)) ... done
; compiling (DEFCONSTANT *COLORS* (QUOTE #)) ... done
; compiling (DEFCONSTANT *PLOT-SYMBOLS* (QUOTE #)) ... done
; compiling (DEFUN CLOSE-ALL-PLOTS NIL ...) ... done
; compiling (DEFUN GET-NEW-INTEGER (PROMPT LOW HIGH ...) ...) ... done
; compiling (DEFUN LINKED-PLOTS NIL ...) ... done
; compiling (DEFUN ACTIVE-GRAPH-WINDOWS NIL ...) ... done
; compiling (DEFUN COLOR-SYMBOLS NIL ...) ... done
; compiling (DEFUN CURSOR-SYMBOLS NIL ...) ... done
; compiling (DEFUN PLOT-SYMBOL-SYMBOLS NIL ...) ... done
; compiling (DEFUN PAUSE (N) ...) ... done
; compiling (DEFUN LINK-VIEWS (&REST ARGS) ...) ... done
; compiling (DEFUN UNLINK-VIEWS (&REST ARGS) ...) ... done
; compiling (DEFMETH GRAPH-PROTO :CURRENT-VARIABLES ...) ... done
; compiling (DEFMETH SPIN-PROTO :CURRENT-VARIABLES ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SCALE-TYPE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MENU-TITLE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :VARIABLE-LABELS ...) ... done
; compiling (DEFMETH GRAPH-PROTO :BLACK-ON-WHITE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :CENTER ...) ... done
; compiling (DEFMETH GRAPH-PROTO :DEPTH-CUING ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SET-SELECTION-SYMBOL ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SET-SELECTION-COLOR ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SHOW-ALL-POINTS ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SELECTION-DIALOG ...) ... done
; compiling (DEFMETH GRAPH-PROTO :DRAG-POINT ...) ... done
; compiling (DEFMETH GRAPH-WINDOW-PROTO :SAVE-IMAGE ...) ... done
; compiling (DEFMETH GRAPH-WINDOW-PROTO :ASK-SAVE-IMAGE ...) ... done
; compiling (SEND GRAPH-PROTO :MENU-TITLE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MENU-TEMPLATE ...) ... done
; compiling (SEND GRAPH-PROTO :MENU-TEMPLATE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MAKE-MENU-ITEM ...) ... done
; compiling (DEFMETH GRAPH-PROTO :NEW-MENU ...) ... done
; compiling (DEFMETH GRAPH-WINDOW-PROTO :CLOBBER ...) ... done
; compiling (DEFMETH GRAPH-WINDOW-PROTO :CLOSE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :REMOVE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADD-DIALOG ...) ... done
; compiling (DEFMETH GRAPH-PROTO :REMOVE-DIALOG ...) ... done
; compiling (DEFMETH GRAPH-PROTO :CLEAR ...) ... done
; compiling (DEFMETH GRAPH-PROTO :FOCUS-ON-SELECTION ...) ... done
; compiling (DEFPROTO GRAPH-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GRAPH-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GRAPH-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (DEFMETH GRAPH-ITEM-PROTO :UPDATE-MESSAGE ...) ... done
; compiling (DEFMETH GRAPH-ITEM-PROTO :UPDATE ...) ... done
; compiling (DEFPROTO LINK-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH LINK-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH LINK-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (DEFMETH LINK-ITEM-PROTO :UPDATE ...) ... done
; compiling (DEFPROTO MOUSE-MODE-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH MOUSE-MODE-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH MOUSE-MODE-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADD-MOUSE-MODE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :DELETE-MOUSE-MODE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SET-MODE-CURSOR ...) ... done
; compiling (SEND GRAPH-PROTO :ADD-MOUSE-MODE ...) ... done
; compiling (SEND GRAPH-PROTO :ADD-MOUSE-MODE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MOUSE-MODE-TITLE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MOUSE-MODES ...) ... done
; compiling (DEFMETH GRAPH-PROTO :CHOOSE-MOUSE-MODE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :REDRAW-OVERLAYS ...) ... done
; compiling (DEFMETH GRAPH-PROTO :RESIZE-OVERLAYS ...) ... done
; compiling (DEFMETH GRAPH-PROTO :OVERLAY-CLICK ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADD-OVERLAY ...) ... done
; compiling (DEFMETH GRAPH-PROTO :DELETE-OVERLAY ...) ... done
; compiling (DEFPROTO GRAPH-OVERLAY-PROTO (QUOTE #)) ... done
; compiling (DEFMETH GRAPH-OVERLAY-PROTO :GRAPH ...) ... done
; compiling (DEFMETH GRAPH-OVERLAY-PROTO :RESIZE ...) ... done
; compiling (DEFMETH GRAPH-OVERLAY-PROTO :REDRAW ...) ... done
; compiling (DEFMETH GRAPH-OVERLAY-PROTO :DO-CLICK ...) ... done
; compiling (REQUIRE "graph2") ... done
NIL
> echo "(compile-file \"graph2.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.lsp
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "graph2.lsp"
; compiling (PROVIDE "graph2") ... done
; compiling (REQUIRE "graphics") ... done
; compiling (SEND SCATMAT-PROTO :TITLE ...) ... done
; compiling (SEND SCATMAT-PROTO :MENU-TITLE ...) ... done
; compiling (SEND SCATMAT-PROTO :FIXED-ASPECT ...) ... done
; compiling (SEND SCATMAT-PROTO :MENU-TEMPLATE ...) ... done
; compiling (DEFMETH SCATMAT-PROTO :REDRAW-BACKGROUND ...) ... done
; compiling (SEND SPIN-PROTO :TITLE ...) ... done
; compiling (SEND SPIN-PROTO :MENU-TITLE ...) ... done
; compiling (SEND SPIN-PROTO :FIXED-ASPECT ...) ... done
; compiling (SEND SPIN-PROTO :MENU-TEMPLATE ...) ... done
; compiling (SEND SPIN-PROTO :VARIABLE-LABELS ...) ... done
; compiling (SEND SPIN-PROTO :BLACK-ON-WHITE ...) ... done
; compiling (SEND SPIN-PROTO :DEPTH-CUING ...) ... done
; compiling (SEND SPIN-PROTO :SHOWING-AXES ...) ... done
; compiling (SEND SPIN-PROTO :SCALE-TYPE ...) ... done
; compiling (DEFMETH SPIN-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SPIN-PROTO :ADJUST-TO-DATA ...) ... done
; compiling (DEFMETH SPIN-PROTO :ROTATION-TYPE ...) ... done
; compiling (DEFMETH SPIN-PROTO :MAKE-MENU-ITEM ...) ... done
; compiling (DEFMETH SPIN-PROTO :ADD-SURFACE ...) ... done
; compiling (DEFMETH SPIN-PROTO :ADD-FUNCTION ...) ... done
; compiling (DEFMETH SPIN-PROTO :ABCPLANE ...) ... done
; compiling (DEFPROTO SPIN-CONTROL-OVERLAY-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH SPIN-CONTROL-OVERLAY-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SPIN-CONTROL-OVERLAY-PROTO :RESIZE ...) ... done
; compiling (DEFMETH SPIN-CONTROL-OVERLAY-PROTO :REDRAW ...) ... done
; compiling (DEFMETH SPIN-CONTROL-OVERLAY-PROTO :DO-CLICK ...) ... done
; compiling (DEFPROTO SPIN-SPEED-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH SPIN-SPEED-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SPIN-SPEED-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (WHEN (EQ # #) (SETF XLISP::OLD-SPIN-IDLE #) ...) ... done
; compiling (DEFUN SPIN-FUNCTION (F XMIN XMAX ...) ...) ... done
; compiling (SEND NAME-LIST-PROTO :TITLE ...) ... done
; compiling (SEND NAME-LIST-PROTO :MENU-TITLE ...) ... done
; compiling (SEND NAME-LIST-PROTO :MENU-TEMPLATE ...) ... done
; compiling (DEFMETH NAME-LIST-PROTO :CLEAR-CONTENT ...) ... done
; compiling (SEND HISTOGRAM-PROTO :TITLE ...) ... done
; compiling (SEND HISTOGRAM-PROTO :MENU-TITLE ...) ... done
; compiling (SEND HISTOGRAM-PROTO :FIXED-ASPECT ...) ... done
; compiling (SEND HISTOGRAM-PROTO :SIZE ...) ... done
; compiling (SEND HISTOGRAM-PROTO :MENU-TEMPLATE ...) ... done
; compiling (DEFMETH HISTOGRAM-PROTO :MAKE-MENU-ITEM ...) ... done
; compiling (DEFMETH HISTOGRAM-PROTO :DRAG-POINT ...) ... done
; compiling (DEFPROTO CHANGE-HIST-BINS-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH CHANGE-HIST-BINS-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH CHANGE-HIST-BINS-ITEM-PROTO :DO-ACTION ...) ... done
; compiling (SEND SCATTERPLOT-PROTO :TITLE ...) ... done
; compiling (SEND SCATTERPLOT-PROTO :MENU-TITLE ...) ... done
; compiling (SEND SCATTERPLOT-PROTO :FIXED-ASPECT ...) ... done
; compiling (SEND SCATTERPLOT-PROTO :MENU-TEMPLATE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADD-FUNCTION ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ABLINE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :PLOTLINE ...) ... done
; compiling (DEFUN PLOT-FUNCTION (F XMIN XMAX ...) ...) ... done
; compiling (DEFMETH SCATTERPLOT-PROTO :ADD-BOXPLOT ...) ... done
; compiling (DEFUN BOXPLOT (DATA &KEY #) ...) ... done
; compiling (DEFUN BOXPLOT-X (X DATA &KEY ...) ...) ... done
; compiling (DEFUN QUANTILE-PLOT (X &KEY # ...) ...) ... done
; compiling (DEFUN PROBABILITY-PLOT (X &KEY # ...) ...) ... done
; compiling (DEFMETH SCATTERPLOT-PROTO :ADD-SURFACE-CONTOUR ...) ... done
; compiling (DEFMETH SCATTERPLOT-PROTO :ADD-SURFACE-CONTOURS ...) ... done
; compiling (DEFMETH SCATTERPLOT-PROTO :ADD-FUNCTION-CONTOURS ...) ... done
; compiling (DEFUN CONTOUR-FUNCTION (F XMIN XMAX ...) ...) ... done
; compiling (REQUIRE "graph3") ... done
NIL
> echo "(compile-file \"graph3.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.lsp
; loading regress.lsp
> ; compiling file "graph3.lsp"
; compiling (PROVIDE "graph3") ... done
; compiling (REQUIRE "graphics") ... done
; compiling (DEFPROTO GRAPH-TOGGLE-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GRAPH-TOGGLE-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GRAPH-TOGGLE-ITEM-PROTO :SET-VALUE ...) ... done
; compiling (DEFPROTO GRAPH-BACKCOLOR-CHOICE-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GRAPH-BACKCOLOR-CHOICE-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GRAPH-BACKCOLOR-CHOICE-ITEM-PROTO :SET-VALUE ...) ... done
; compiling (DEFPROTO GRAPH-SCALING-CHOICE-ITEM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GRAPH-SCALING-CHOICE-ITEM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GRAPH-SCALING-CHOICE-ITEM-PROTO :SET-VALUE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SET-OPTIONS ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MAKE-OPTIONS-DIALOG-ITEMS ...) ... done
; compiling (DEFMETH SCATMAT-PROTO :MAKE-OPTIONS-DIALOG-ITEMS ...) ... done
; compiling (DEFMETH SPIN-PROTO :MAKE-OPTIONS-DIALOG-ITEMS ...) ... done
; compiling (DEFPROTO GRAPH-DIALOG-PROTO (QUOTE #)) ... done
; compiling (DEFMETH GRAPH-DIALOG-PROTO :INSTALL ...) ... done
; compiling (DEFMETH GRAPH-DIALOG-PROTO :CLOBBER ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADD-SLICER ...) ... done
; compiling (DEFMETH GRAPH-PROTO :REMOVE-SLICER ...) ... done
; compiling (DEFPROTO GRAPH-SLICER-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GRAPH-SLICER-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GRAPH-SLICER-PROTO :INSTALL ...) ... done
; compiling (DEFMETH GRAPH-SLICER-PROTO :CLOBBER ...) ... done
; compiling (DEFMETH GRAPH-SLICER-PROTO :SELECTION ...) ... done
; compiling (DEFMETH GRAPH-SLICER-PROTO :TYPE ...) ... done
; compiling (DEFMETH GRAPH-PROTO :ADJUST-SLICES ...) ... done
; compiling (DEFMETH GRAPH-PROTO :SLICER ...) ... done
; compiling (DEFMETH GRAPH-PROTO :MAKE-SLICER-DIALOG ...) ... done
NIL
> echo "(compile-file \"regress.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.lsp
> ; compiling file "regress.lsp"
; compiling (PROVIDE "regress") ... done
; compiling (REQUIRE "stats") ... done
; compiling (REQUIRE "graphics") ... done
; compiling (REQUIRE "help") ... done
; compiling (DEFPROTO REGRESSION-MODEL-PROTO (QUOTE #) ...) ... done
; compiling (DEFUN REGRESSION-MODEL (X Y &KEY ...) ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :ISNEW ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :SAVE ...) ... done
; compiling (DEFPARAMETER *REGRESSION-TOLERANCE* 1.0E-9 ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :COMPUTE ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :NEEDS-COMPUTING ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :DISPLAY ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :X ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :Y ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :INTERCEPT ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :WEIGHTS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :TOTAL-SUM-OF-SQUARES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :RESIDUAL-SUM-OF-SQUARES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :BASIS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :SWEEP-MATRIX ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :INCLUDED ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :PREDICTOR-NAMES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :RESPONSE-NAME ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :CASE-LABELS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :NUM-CASES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :NUM-INCLUDED ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :NUM-COEFS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :DF ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :X-MATRIX ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :LEVERAGES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :FIT-VALUES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :RAW-RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :SUM-OF-SQUARES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :SIGMA-HAT ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :R-SQUARED ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :COEF-ESTIMATES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :XTXINV ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :COEF-STANDARD-ERRORS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :STUDENTIZED-RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :EXTERNALLY-STUDENTIZED-RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :COOKS-DISTANCES ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :PLOT-RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :PLOT-BAYES-RESIDUALS ...) ... done
NIL
> echo "(compile-file \"menus.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.lsp
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "menus.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (PROVIDE "menus") ... done
; compiling (PROGN (EXPORT #) (DEFUN MAKE-FAKE-MENU-BAR NIL ...) ...) ... done
NIL
> echo "(compile-file \"loadfsl.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.lsp
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "loadfsl.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (DEFUN ADD-METHOD (OBJECT NAME METHOD ...) ...) ... done
; compiling (DEFUN CMP-MAKE-STRUCTURE-CONSTRUCTOR (STRUCTNAME) ...) ... done
; compiling (DEFUN CMP-DO-DEFSTRUCT (STRUCTNAME INCOPT OTHERS ...) ...) ... done
; compiling (DEFCONSTANT *FSL-MAJOR-VERSION* 1) ... done
; compiling (DEFCONSTANT *FSL-MINOR-VERSION* 4) ... done
; compiling (DEFCONSTANT *FSL-OLDEST-MINOR-VERSION* 3) ... done
; compiling (DEFUN CHECK-FSL-VERSION (MAJOR MINOR) ...) ... done
NIL
> echo "(compile-file \"conditns.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.fsl
; loading conditns.lsp
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "conditns.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (REQUIRE "common") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE WARN)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (EXPORT (QUOTE RESTART)) ... done
; compiling (DEFVAR *BREAK-ON-SIGNALS* NIL) ... done
; compiling (DEFVAR *DEBUGGER-HOOK* NIL) ... done
; compiling (DEFVAR *EOF-MARK* (GENSYM "EOF")) ... done
; compiling (DEFVAR *NOT-FOUND* (GENSYM "NOT-FOUND")) ... done
; compiling (DEFVAR *DEFAULT-HANDLER* NIL) ... done
; compiling (DEFVAR *ACTIVE-HANDLERS* NIL) ... done
; compiling (DEFVAR *DEFAULT-RESTART* NIL) ... done
; compiling (DEFVAR *ACTIVE-RESTARTS* NIL) ... done
; compiling (DEFVAR *CONTINUE-RESTARTS* NIL) ... done
; compiling (DEFVAR *CONDITION-RESTARTS* NIL) ... done
; compiling (DEFVAR *DEBUG-LEVEL* 0) ... done
; compiling (DEFVAR *DEBUG-ENV* NIL) ... done
; compiling (DEFVAR *DEBUG-FRAME* NIL) ... done
; compiling (DEFVAR *DEBUG-PRINT-LENGTH* NIL) ... done
; compiling (DEFVAR *DEBUG-PRINT-LEVEL* NIL) ... done
; compiling (DEFUN USE-CONDITIONS (&OPTIONAL #) ...) ... done
; compiling (DEFUN UNUSE-CONDITIONS NIL ...) ... done
; compiling (DEFSTRUCT (RESTART #) NAME ...) ... done
; compiling (DEFUN PRINT-RESTART (RESTART STREAM DEPTH) ...) ... done
; compiling (SETF *DEFAULT-RESTART* (MAKE-RESTART :NAME # ...)) ... done
; compiling (DEFUN PUSH-RESTARTS (C RESLIST) ...) ... done
; compiling (DEFUN EXPAND-RESTART-BINDING-FORM (X) ...) ... done
; compiling (DEFUN MAKE-RESTART-CASE-PARTS (TAGSYM ARGSYM CASES) ...) ... done
; compiling (DEFUN TRANSFORM-RESTART-CASE-OPTIONS (C) ...) ... done
; compiling (DEFUN RESTART-CASE-CASE-BODY (C) ...) ... done
; compiling (DEFUN CONDITION-RESTARTS (EXPR CLIST) ...) ... done
; compiling (SETF (GET # #) NIL) ... done
; compiling (SETF (GET # #) (QUOTE PRINT-CONDITION)) ... done
; compiling (DEFUN TRANSFORM-CONDITION-REPORT-OPTION (X) ...) ... done
; compiling (DEFUN PLIST-TO-ALIST (PLIST) ...) ... done
; compiling (DEFUN TRANSFORM-CONDITION-SLOT-OPTIONS (SPEC) ...) ... done
; compiling (DEFUN PRINT-CONDITION (C S D) ...) ... done
; compiling (DEFUN MAKE-CONDITION-CLASS (NAME PARENT REPORT ...) ...) ... done
; compiling (DEFUN INITIALIZE-CONDITION (C INFO ARGS) ...) ... done
; compiling (DEFUN REVERSE-EXPAND-HANDLER-BIND-FORMS (TH) ...) ... done
; compiling (DEFUN PUSH-CONDITION-HANDLERS (CLIST ACTIVE) ...) ... done
; compiling (DEFUN HANDLER-CASE-HANDLER-BIND-FORMS (HFORMS VARSYM TAGSYMS) ...) ... done
; compiling (DEFUN EXPAND-HANDLER-CASE-BODIES (HFORMS BSYM VARSYM ...) ...) ... done
; compiling (DEFUN HANDLE-CONDITION (C) ...) ... done
; compiling (DEFUN CONDITION-ARGUMENT (DATUM ARGS &OPTIONAL ...) ...) ... done
; compiling (DEFUN BASE-CONDITION-HOOK (TYPE *DEBUG-FRAME* *DEBUG-ENV* ...) ...) ... done
; compiling (DEFUN CONDITION-HOOK (&REST ARGS) ...) ... done
; compiling (DEFUN DO-ERROR (DATUM &REST ARGS) ...) ... done
; compiling (DEFUN DO-CERROR (CMSG DATUM &REST ...) ...) ... done
; compiling (DEFUN DO-SIGNAL (DATUM &REST ARGS) ...) ... done
; compiling (DEFUN DO-WARN (DATUM &REST ARGS) ...) ... done
; compiling (DEFUN DO-BREAK (&OPTIONAL # &REST ...) ...) ... done
; compiling (DEFUN DO-DEBUGGER (CONDITION) ...) ... done
; compiling (DEFUN DEBUG-FUN NIL ...) ... done
; compiling (DEFUN CLEAN-UP (&OPTIONAL C) ...) ... done
; compiling (DEFUN BAKTRACE (&OPTIONAL LEVELS #) ...) ... done
; compiling (DEFUN SHOW-BINDINGS (&OPTIONAL VARS) ...) ... done
; compiling (DEFMACRO GET-VALUE (FORM) ...) ... done
; compiling (DEFMACRO SET-VALUE (FORM VAL) ...) ... done
; compiling (DEFUN PROMPT-FOR (TYPE FMT-STRING &REST ...) ...) ... done
; compiling (DEFUN TYPE-CHECK (X SPEC) ...) ... done
; compiling (DEFMACRO BASE-CHECK-TYPE (PLACE SPEC &OPTIONAL ...) ...) ... done
; compiling (DEFMACRO CHECK-TYPE (PLACE SPEC &OPTIONAL ...) ...) ... done
; compiling (DEFMACRO ASSERT (TESTFORM &OPTIONAL PLACES ...) ...) ... done
; compiling (DEFMACRO ETYPECASE (VAR &REST FORMS) ...) ... done
; compiling (DEFMACRO CTYPECASE (VAR &REST BODY) ...) ... done
; compiling (DEFUN COMPUTE-CASE-MATCH-TYPE (CASES) ...) ... done
; compiling (DEFMACRO ECASE (VAR &REST FORMS) ...) ... done
; compiling (DEFMACRO CCASE (VAR &REST BODY) ...) ... done
; compiling (DEFMACRO HANDLER-CASE (EXPR &REST HFORMS) ...) ... done
; compiling (DEFMACRO IGNORE-ERRORS (&REST FORMS) ...) ... done
; compiling (DEFMACRO HANDLER-BIND (TH &REST BODY) ...) ... done
; compiling (DEFMACRO HANDLER-BIND (TH &REST BODY) ...) ... done
; compiling (DEFMACRO DEFINE-CONDITION (NAME PLIST &OPTIONAL ...) ...) ... done
; compiling (DEFUN MAKE-CONDITION (TYPE &REST ARGS) ...) ... done
; compiling (DEFMACRO WITH-SIMPLE-RESTART (RFA &REST FORMS) ...) ... done
; compiling (DEFMACRO RESTART-CASE (EXPR &REST CASES) ...) ... done
; compiling (DEFMACRO RESTART-BIND (BDS &REST BODY) ...) ... done
; compiling (DEFMACRO WITH-CONDITION-RESTARTS (CONDITION RLIST &REST ...) ...) ... done
; compiling (DEFUN COMPUTE-RESTARTS (&OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN RESTART-ENTRY-APPLICABLE-P (CR CONDITION) ...) ... done
; compiling (DEFUN FIND-RESTART (IDENTIFIER &OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN INVOKE-RESTART (IDENTIFIER &REST ARGS) ...) ... done
; compiling (DEFUN INVOKE-RESTART-INTERACTIVELY (IDENTIFIER) ...) ... done
; compiling (DEFUN ABORT (&OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN CONTINUE (&OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN MUFFLE-WARNING (&OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN STORE-VALUE (VALUE &OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN USE-VALUE (VALUE &OPTIONAL CONDITION) ...) ... done
; compiling (DEFUN PRINT-SIMPLE-CONDITION (C S) ...) ... done
; compiling (DEFINE-CONDITION SIMPLE-CONDITION (CONDITION) ...) ... done
; compiling (DEFINE-CONDITION SERIOUS-CONDITION (CONDITION)) ... done
; compiling (DEFINE-CONDITION ERROR (SERIOUS-CONDITION)) ... done
; compiling (DEFINE-CONDITION SIMPLE-ERROR (ERROR) ...) ... done
; compiling (DEFINE-CONDITION WARNING (CONDITION)) ... done
; compiling (DEFINE-CONDITION SIMPLE-WARNING (WARNING) ...) ... done
; compiling (DEFINE-CONDITION STORAGE-CONDITION (CONDITION)) ... done
; compiling (DEFINE-CONDITION CELL-ERROR (ERROR) ...) ... done
; compiling (DEFINE-CONDITION UNBOUND-VARIABLE (CELL-ERROR) ...) ... done
; compiling (DEFINE-CONDITION UNDEFINED-FUNCTION (CELL-ERROR) ...) ... done
; compiling (DEFINE-CONDITION TYPE-ERROR (ERROR) ...) ... done
; compiling (DEFINE-CONDITION CHECK-TYPE-ERROR (TYPE-ERROR) ...) ... done
; compiling (DEFINE-CONDITION SIMPLE-TYPE-ERROR (TYPE-ERROR)) ... done
NIL
> echo "(compile-file \"pathname.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.lsp"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "pathname.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN NAMESTRING (X) ...) ... done
; compiling (DEFUN FILE-NAMESTRING (PATHNAME) ...) ... done
; compiling (DEFUN DIRECTORY-NAMESTRING (PATHNAME) ...) ... done
; compiling (DEFUN PARSE-NAMESTRING (X &OPTIONAL HOST ...) ...) ... done
; compiling (DEFUN PATHNAME (X) ...) ... done
; compiling (DEFUN PATHNAME-HOST (X) ...) ... done
; compiling (DEFUN PATHNAME-VERSION (X) ...) ... done
; compiling (DEFVAR *DEFAULT-PATHNAME-DEFAULTS* "") ... done
; compiling (DEFUN PATHNAME-DEVICE (X) ...) ... done
; compiling (DEFCONSTANT *WILD-PATHNAME-STRING* "*") ... done
; compiling (DEFCONSTANT *BACK-PATHNAME-STRING* "..") ... done
; compiling (DEFUN SIMPLIFY-DIRECTORY (DIR) ...) ... done
; compiling (DEFUN MAKE-PATHNAME (&KEY # # ...) ...) ... done
; compiling (DEFUN PATHNAME-DIRECTORY (X) ...) ... done
; compiling (DEFUN PATHNAME-NAME (X) ...) ... done
; compiling (DEFUN PATHNAME-TYPE (X) ...) ... done
; compiling (DEFUN MERGE-PATHNAMES (PATH &OPTIONAL # ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFVAR *LOAD-PRINT* NIL) ... done
; compiling (DEFVAR *LOAD-VERBOSE* T) ... done
; compiling (DEFVAR *LOAD-PATHNAME*) ... done
; compiling (DEFVAR *LOAD-TRUENAME*) ... done
; compiling (DEFVAR *LOAD-PATHNAME-DEFAULTS* NIL ...) ... done
; compiling (DEFUN DO-LOAD (PATH VFLAG PFLAG) ...) ... done
; compiling (DEFUN DO-DOES-NOT-EXIST (FILE FLAG) ...) ... done
; compiling (DEFUN LOAD (FILE &KEY # ...) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN WILD-PATHNAME-P (PATHNAME) ...) ... done
; compiling (DEFUN PATHNAME-MATCH-P (PATHNAME WILDNAME) ...) ... done
; compiling (DEFUN DIRECTORY (ARG &KEY ALL) ...) ... done
; compiling (IN-PACKAGE "SYSTEM") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN AUTOLOAD-FUNCTION (NAME) ...) ... done
; compiling (DEFUN AUTOLOAD-VARIABLE (NAME) ...) ... done
; compiling (LET (# #) (DEFUN FIND-FUNCTION-MODULE-PATH # ...) ...) ... done
; compiling (DEFMACRO DEFINE-AUTOLOAD-MODULE (MODULE &REST CLAUSES) ...) ... done
; compiling (DEFUN REGISTER-AUTOLOADS (DIR) ...) ... done
; compiling (DEFUN CREATE-AUTOLOAD-PATH NIL ...) ... done
NIL
> echo "(compile-file \"shlib.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.lsp
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "shlib.lsp"
; compiling (DEFPACKAGE "SHARED-LIBRARY" (:USE "XLISP") ...) ... done
; compiling (IN-PACKAGE "SHARED-LIBRARY") ... done
; compiling (DEFSTRUCT (SHARED-LIBRARY # #) NAME ...) ... done
; compiling (DEFUN PRINT-SHLIB (SHLIB STREAM DEPTH) ...) ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFUN LOAD-SHARED-LIBRARY (PATH &OPTIONAL # ...) ...) ... done
; compiling (DEFUN CLOSE-SHARED-LIBRARY (SHLIB) ...) ... done
; compiling (DEFUN SHARED-LIBRARY-INFORMATION (PATH &OPTIONAL #) ...) ... done
NIL
> echo "(compile-file \"cmpload.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.lsp
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "cmpload.lsp"
; compiling (DEFPACKAGE "XLSCMP" (:USE "XLISP") ...) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "backquot" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "cmpmacro" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "convert" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "cells" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "simplify" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "lift" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "gencode" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "peephole" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "assemble" ...)) ... done
; compiling (REQUIRE (MAKE-PATHNAME :NAME "cmpfront" ...)) ... done
NIL
> echo "(compile-file \"oneway.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "oneway.lsp"
; compiling (PROVIDE "oneway") ... done
; compiling (REQUIRE "regress") ... done
; compiling (DEFPROTO ONEWAY-MODEL-PROTO (QUOTE #) ...) ... done
; compiling (DEFUN ONEWAY-MODEL (DATA &KEY # ...) ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :DISPLAY ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :SAVE ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :GROUPED-DATA ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :GROUP-NAMES ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :Y ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :X ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :INTERCEPT ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :PREDICTOR-NAMES ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :STANDARD-DEVIATIONS ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :GROUP-DF ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :GROUP-SUM-OF-SQUARES ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :GROUP-MEAN-SQUARE ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :ERROR-DF ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :ERROR-MEAN-SQUARE ...) ... done
; compiling (DEFMETH ONEWAY-MODEL-PROTO :BOXPLOTS ...) ... done
NIL
> echo "(compile-file \"nonlin.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "nonlin.lsp"
; compiling (PROVIDE "nonlin") ... done
; compiling (REQUIRE "regress") ... done
; compiling (DEFPROTO NREG-MODEL-PROTO (QUOTE #) ...) ... done
; compiling (DEFUN NREG-MODEL (MEAN-FUNCTION Y THETA ...) ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :SAVE ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :COMPUTE ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :NEW-INITIAL-GUESS ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :THETA-HAT ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :MEAN-FUNCTION ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :EPSILON ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :COUNT-LIMIT ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :PARAMETER-NAMES ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :VERBOSE ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :X ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :INTERCEPT ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :FIT-VALUES ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :COEF-ESTIMATES ...) ... done
; compiling (DEFMETH NREG-MODEL-PROTO :PREDICTOR-NAMES ...) ... done
; compiling (DEFUN REGRESSION-COEFFICIENTS (X Y &KEY ...) ...) ... done
; compiling (DEFUN NLREG1 (F J Y ...) ...) ... done
; compiling (DEFUN MAKE-JACOBIAN (F N) ...) ... done
; compiling (DEFUN NLREG (F Y GUESS ...) ...) ... done
NIL
> echo "(compile-file \"maximize.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "maximize.lsp"
; compiling (PROVIDE "maximize") ... done
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFPARAMETER *DEFAULT-DERIVATIVE-STEP* (^ MACHINE-EPSILON #)) ... done
; compiling (DEFMACRO MAKE-FUNDATA NIL ...) ... done
; compiling (DEFMACRO FUNDATA-F (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-ARG (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-TYPX (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-FSUM (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-N (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-CHANGESIGN (FD) ...) ... done
; compiling (DEFMACRO FUNDATA-H (FD) ...) ... done
; compiling (DEFMACRO GET-FUNCTION-VALUE (F X ARG ...) ...) ... done
; compiling (DEFUN CHANGE-ARRAY-SIGN (X) ...) ... done
; compiling (DEFUN MAKE-FUNCTION-DATA (F N CHANGESIGN ...) ...) ... done
; compiling (DEFUN EVAL-FUNCTION (FUNC X GRAD ...) ...) ... done
; compiling (DEFUN CMPGRAD (N X GRAD ...) ...) ... done
; compiling (DEFUN CMPHESS (N X HESS ...) ...) ... done
; compiling (DEFUN NUMGRAD (F X &OPTIONAL ...) ...) ... done
; compiling (DEFUN NUMHESS (F X &OPTIONAL ...) ...) ... done
; compiling (DEFMACRO MAKE-INTERNALS NIL ...) ... done
; compiling (DEFMACRO INTERNALS-F (I) ...) ... done
; compiling (DEFMACRO INTERNALS-X (I) ...) ... done
; compiling (DEFMACRO INTERNALS-SCALE (I) ...) ... done
; compiling (DEFMACRO INTERNALS-DELF (I) ...) ... done
; compiling (DEFMACRO INTERNALS-HESSF (I) ...) ... done
; compiling (DEFMACRO INTERNALS-IPARS (I) ...) ... done
; compiling (DEFMACRO INTERNALS-DPARS (I) ...) ... done
; compiling (DEFMACRO MAKE-IPARS NIL ...) ... done
; compiling (DEFMACRO IPARS-N (IPARS) ...) ... done
; compiling (DEFMACRO IPARS-MAXITER (I) ...) ... done
; compiling (DEFMACRO IPARS-BACKTRACK (I) ...) ... done
; compiling (DEFMACRO IPARS-VERBOSE (I) ...) ... done
; compiling (DEFMACRO IPARS-VALS-SUPPL (I) ...) ... done
; compiling (DEFMACRO IPARS-COUNT (I) ...) ... done
; compiling (DEFMACRO IPARS-TERMCODE (I) ...) ... done
; compiling (DEFMACRO IPARS-CHANGE-SIGN (I) ...) ... done
; compiling (DEFMACRO IPARS-MAXTAKEN (I) ...) ... done
; compiling (DEFMACRO IPARS-CONSECMAX (I) ...) ... done
; compiling (DEFMACRO IPARS-RETCODE (I) ...) ... done
; compiling (DEFMACRO MAKE-DPARS NIL ...) ... done
; compiling (DEFMACRO DPARS-TYPF (D) ...) ... done
; compiling (DEFMACRO DPARS-DERIVSTEP (D) ...) ... done
; compiling (DEFMACRO DPARS-GRADTOL (D) ...) ... done
; compiling (DEFMACRO DPARS-STEPTOL (D) ...) ... done
; compiling (DEFMACRO DPARS-MAXSTEP (D) ...) ... done
; compiling (DEFMACRO DPARS-HESSADD (D) ...) ... done
; compiling (DEFMACRO DPARS-F (D) ...) ... done
; compiling (DEFMACRO DPARS-NEW-F (D) ...) ... done
; compiling (DEFUN NEWINTERNALS (F X SCALE ...) ...) ... done
; compiling (DEFPARAMETER *INIT-GRAD-FRAC* 0.001) ... done
; compiling (DEFPARAMETER *CONSEC-MAX-LIMIT* 5) ... done
; compiling (DEFPARAMETER *ALPHA* 1.0E-4) ... done
; compiling (DEFPARAMETER *MAX-STEP-FACTOR* 1000) ... done
; compiling (DEFPARAMETER *GRADTOL-POWER* (/ 1.0 3.0)) ... done
; compiling (DEFPARAMETER *STEPTOL-POWER* (/ 2.0 3.0)) ... done
; compiling (DEFPARAMETER *ITNLIMIT* 100) ... done
; compiling (DEFPARAMETER *VERBOSE* 0) ... done
; compiling (DEFPARAMETER *USE-SEARCH* T) ... done
; compiling (DEFPARAMETER *TERMCODES* (VECTOR "not yet terminated" "gradient size is less than gradient tolerance" ...)) ... done
; compiling (DEFMACRO MAKE-ITERATION NIL ...) ... done
; compiling (DEFMACRO ITERATION-FFUN (I) ...) ... done
; compiling (DEFMACRO ITERATION-X (I) ...) ... done
; compiling (DEFMACRO ITERATION-NEW-X (I) ...) ... done
; compiling (DEFMACRO ITERATION-SX (I) ...) ... done
; compiling (DEFMACRO ITERATION-DELF (I) ...) ... done
; compiling (DEFMACRO ITERATION-NEW-DELF (I) ...) ... done
; compiling (DEFMACRO ITERATION-QNSTEP (I) ...) ... done
; compiling (DEFMACRO ITERATION-L (I) ...) ... done
; compiling (DEFMACRO ITERATION-HESSF (I) ...) ... done
; compiling (DEFMACRO ITERATION-WORK (I) ...) ... done
; compiling (DEFMACRO ITERATION-IP (I) ...) ... done
; compiling (DEFMACRO ITERATION-DP (I) ...) ... done
; compiling (DEFMACRO ITERATION-N (I) ...) ... done
; compiling (DEFMACRO ITERATION-ITNLIMIT (I) ...) ... done
; compiling (DEFMACRO ITERATION-BACKTRACK (I) ...) ... done
; compiling (DEFMACRO ITERATION-VERBOSE (I) ...) ... done
; compiling (DEFMACRO ITERATION-VALS-SUPPL (I) ...) ... done
; compiling (DEFMACRO ITERATION-COUNT (I) ...) ... done
; compiling (DEFMACRO ITERATION-TERMCODE (I) ...) ... done
; compiling (DEFMACRO ITERATION-MAXTAKEN (I) ...) ... done
; compiling (DEFMACRO ITERATION-CONSECMAX (I) ...) ... done
; compiling (DEFMACRO ITERATION-RETCODE (I) ...) ... done
; compiling (DEFMACRO ITERATION-CHANGE-SIGN (I) ...) ... done
; compiling (DEFMACRO ITERATION-TYPF (I) ...) ... done
; compiling (DEFMACRO ITERATION-GRADTOL (I) ...) ... done
; compiling (DEFMACRO ITERATION-STEPTOL (I) ...) ... done
; compiling (DEFMACRO ITERATION-MAXSTEP (I) ...) ... done
; compiling (DEFMACRO ITERATION-HESSADD (I) ...) ... done
; compiling (DEFMACRO ITERATION-F (I) ...) ... done
; compiling (DEFMACRO ITERATION-NEW-F (I) ...) ... done
; compiling (DEFUN GRADSIZE (ITER NEW) ...) ... done
; compiling (DEFUN INCRSIZE (ITER) ...) ... done
; compiling (DEFUN STOPTEST0 (ITER) ...) ... done
; compiling (DEFUN STOPTEST (ITER) ...) ... done
; compiling (DEFUN EVAL-FUNVAL (ITER) ...) ... done
; compiling (DEFUN EVAL-NEXT-FUNVAL (ITER) ...) ... done
; compiling (DEFUN EVAL-GRADIENT (ITER) ...) ... done
; compiling (DEFUN EVAL-NEXT-GRADIENT (ITER) ...) ... done
; compiling (DEFUN EVAL-HESSIAN (ITER) ...) ... done
; compiling (DEFUN LINESEARCH (ITER) ...) ... done
; compiling (DEFUN PRINT-HEADER (ITER) ...) ... done
; compiling (DEFUN PRINT-STATUS (ITER) ...) ... done
; compiling (DEFUN FINDQNSTEP (ITER) ...) ... done
; compiling (DEFUN ITERUPDATE (ITER) ...) ... done
; compiling (DEFUN MINDRIVER (ITER TRFUN) ...) ... done
; compiling (DEFUN MINRESULTSTRING (CODE) ...) ... done
; compiling (DEFUN MINSETUP (FFUN X TYPX ...) ...) ... done
; compiling (DEFMACRO MODE-INFO-F NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-X NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-SCALE NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-DELF NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-HESSF NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-IPARS NIL ...) ... done
; compiling (DEFMACRO MODE-INFO-DPARS NIL ...) ... done
; compiling (DEFMACRO IPARS-N (IPARS) ...) ... done
; compiling (DEFMACRO IPARS-MAXITER (IPARS) ...) ... done
; compiling (DEFMACRO IPARS-BACKTRACK (IPARS) ...) ... done
; compiling (DEFMACRO IPARS-VERBOSE (IPARS) ...) ... done
; compiling (DEFMACRO DPARS-DERIVSTEP (DPARS) ...) ... done
; compiling (DEFMACRO DPARS-F (DPARS) ...) ... done
; compiling (DEFPROTO MINFO-PROTO (QUOTE #)) ... done
; compiling (DEFMETH MINFO-PROTO :ISNEW ...) ... done
; compiling (DEFMETH MINFO-PROTO :MAXIMIZE ...) ... done
; compiling (DEFMETH MINFO-PROTO :X ...) ... done
; compiling (DEFMETH MINFO-PROTO :SCALE ...) ... done
; compiling (DEFMETH MINFO-PROTO :DERIVSTEP ...) ... done
; compiling (DEFMETH MINFO-PROTO :F ...) ... done
; compiling (DEFMETH MINFO-PROTO :FVALS ...) ... done
; compiling (DEFMETH MINFO-PROTO :COPY ...) ... done
; compiling (DEFMETH MINFO-PROTO :DERIVSCALE ...) ... done
; compiling (DEFMETH MINFO-PROTO :VERBOSE ...) ... done
; compiling (DEFMETH MINFO-PROTO :BACKTRACK ...) ... done
; compiling (DEFMETH MINFO-PROTO :MAXITER ...) ... done
; compiling (DEFUN NEWTONMAX (F START &KEY ...) ...) ... done
; compiling (DEFUN NELMEADMAX (F START &KEY ...) ...) ... done
; compiling (DEFPROTO SIMPLEX-PROTO (QUOTE #)) ... done
; compiling (DEFMETH SIMPLEX-PROTO :MAKE-POINT ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :POINT-VALUE ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :POINT-LOCATION ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :IS-WORSE ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :SIMPLEX ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :F ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :SORT-SIMPLEX ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :BEST-POINT ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :WORST-POINT ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :SECOND-WORST-POINT ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :REPLACE-POINT ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :MEAN-OPPOSITE-FACE ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :EXTRAPOLATE-FROM-WORST ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :SHRINK-TO-BEST ...) ... done
; compiling (DEFMETH SIMPLEX-PROTO :RELATIVE-RANGE ...) ... done
NIL
> echo "(compile-file \"bayes.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "bayes.lsp"
; compiling (REQUIRE "maximize") ... done
; compiling (PROVIDE "bayes") ... done
; compiling (DEFPROTO C2-FUNCTION-PROTO (QUOTE #)) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :ISNEW ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :F ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :GRAD-H ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :HESS-H ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :NUM-DERIVS ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :VALUE ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :GRADIENT ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :HESSIAN ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :VALS ...) ... done
; compiling (DEFMETH C2-FUNCTION-PROTO :VALS ...) ... done
; compiling (DEFPROTO SCALED-C2-FUNCTION-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH SCALED-C2-FUNCTION-PROTO :ISNEW ...) ... done
; compiling (DEFPROTO TILT-FUNCTION-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :ISNEW ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :TILT ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :EXPTILT ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :VALUE ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :GRADIENT ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :HESSIAN ...) ... done
; compiling (DEFMETH TILT-FUNCTION-PROTO :VALS ...) ... done
; compiling (DEFPROTO SCALED-LOGPOST-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH SCALED-LOGPOST-PROTO :ISNEW ...) ... done
; compiling (DEFMETH SCALED-LOGPOST-PROTO :LOG-LAPLACE ...) ... done
; compiling (DEFMETH SCALED-LOGPOST-PROTO :TILT-NEWTON ...) ... done
; compiling (DEFMETH SCALED-LOGPOST-PROTO :TILT-LAPLACE ...) ... done
; compiling (DEFMETH SCALED-LOGPOST-PROTO :TILT-MODE ...) ... done
; compiling (DEFPROTO BAYES-MODEL-PROTO (QUOTE #)) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :ISNEW ...) ... done
; compiling (DEFUN BAYES-MODEL (LOGPOST MODE &REST ...) ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :DISPLAY ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :PARAMETER-NAMES ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :SET-BAYES-INTERNALS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :LOGPOST ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :DOMAIN ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MODE-VALUES ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :PARAMETER-SCALE ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :PARAMETER-DIMENSION ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :DERIVSTEP ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :NEEDS-MAXIMIZING ...) ... done
; compiling (DEFUN FUNCTION-LIST (G &OPTIONAL N) ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MODE ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :NEW-MODE-GUESS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :TRANSFORMED-LOGPOST ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :TRANSFORMED-FUNCTIONS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MAXIMIZE ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :CHECK-DERIVATIVES ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :1STMOMENTS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MGFMOMENTS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :FULLMOMENTS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :2NDMOMENTS ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MOMENTS ...) ... done
; compiling (DEFPROTO LAPLACE-MARGIN-PROTO (QUOTE #)) ... done
; compiling (DEFMETH LAPLACE-MARGIN-PROTO :ISNEW ...) ... done
; compiling (DEFMETH LAPLACE-MARGIN-PROTO :ADJUST-INTERNALS ...) ... done
; compiling (DEFMETH LAPLACE-MARGIN-PROTO :MOVE-TO ...) ... done
; compiling (DEFMETH LAPLACE-MARGIN-PROTO :LOG-DENSITY ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :LOG-MARGIN1 ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :MARGIN1 ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :IMPSAMPLE ...) ... done
; compiling (DEFMETH BAYES-MODEL-PROTO :IMPMOMENTS ...) ... done
NIL
> echo "(compile-file \"stepper.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "stepper.lsp"
; compiling (IN-PACKAGE "XLISP") ... done
; compiling (EXPORT (QUOTE #)) ... done
; compiling (DEFPACKAGE "TOOLS" (:USE "XLISP")) ... done
; compiling (IN-PACKAGE "TOOLS") ... done
; compiling (DEFMACRO WHILE (TEST &REST FORMS) ...) ... done
; compiling (DEFPARAMETER *HOOKLEVEL* 0) ... done
; compiling (DEFVAR *STEPPER-DEPTH* 3) ... done
; compiling (DEFVAR *STEPPER-LENGTH* 3) ... done
; compiling (DEFPARAMETER *FCN* (QUOTE *ALL*)) ... done
; compiling (DEFVAR *STEPLIST* NIL) ... done
; compiling (DEFPARAMETER *STEPTRACE* (QUOTE #)) ... done
; compiling (DEFPARAMETER *CALLIST* NIL) ... done
; compiling (DEFMACRO STEP (FORM &AUX #) ...) ... done
; compiling (DEFUN EVAL-HOOK-FUNCTION (FORM ENV &AUX ...) ...) ... done
; compiling (DEFUN STEP-PRINT-COMPRESSED (FORM) ...) ... done
; compiling (DEFUN STEP-SPACES (N) ...) ... done
; compiling (DEFUN STEP-FLUSH NIL ...) ... done
; compiling (DEFUN STEP-HELP NIL ...) ... done
; compiling (DEFUN STEP-DO-FORM (F1 ENV) ...) ... done
; compiling (DEFUN STEP-SET-DEPTH (CF) ...) ... done
; compiling (DEFUN STEP-SET-LENGTH (CF) ...) ... done
; compiling (DEFUN STEP-PRINT-ENV (ENV) ...) ... done
; compiling (DEFUN STEP-SET-BREAKS (L) ...) ... done
; compiling (DEFUN STEP-CLEAR-BREAKS (L) ...) ... done
; compiling (DEFUN STEP-BAKTRACE (&AUX L N) ...) ... done
; compiling (DEFUN STEP-ADD-LEVEL (FORM ENV) ...) ... done
; compiling (DEFUN STEP-PRUNE-LEVEL NIL ...) ... done
; compiling (DEFUN STEP-FIX-LEVELS NIL ...) ... done
; compiling (DEFUN STEP-FIX-THROW NIL ...) ... done
; compiling (DEFUN IS-BRK-IN-FORM (FORM BRKLST) ...) ... done
; compiling (DEFUN GET-KEY NIL ...) ... done
NIL
> echo "(compile-file \"glim.lsp\") (exit)" | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> ; compiling file "glim.lsp"
; compiling (PROVIDE "glim") ... done
; compiling (DEFPROTO GLIM-LINK-PROTO) ... done
; compiling (DEFMETH GLIM-LINK-PROTO :ETA ...) ... done
; compiling (DEFMETH GLIM-LINK-PROTO :MEANS ...) ... done
; compiling (DEFMETH GLIM-LINK-PROTO :DERIVS ...) ... done
; compiling (DEFMETH GLIM-LINK-PROTO :PRINT ...) ... done
; compiling (DEFMETH GLIM-LINK-PROTO :SAVE ...) ... done
; compiling (DEFPROTO IDENTITY-LINK NIL ...) ... done
; compiling (DEFPROTO LOG-LINK NIL ...) ... done
; compiling (DEFMETH LOG-LINK :ETA ...) ... done
; compiling (DEFMETH LOG-LINK :MEANS ...) ... done
; compiling (DEFMETH LOG-LINK :DERIVS ...) ... done
; compiling (DEFPROTO INVERSE-LINK NIL ...) ... done
; compiling (DEFMETH INVERSE-LINK :ETA ...) ... done
; compiling (DEFMETH INVERSE-LINK :MEANS ...) ... done
; compiling (DEFMETH INVERSE-LINK :DERIVS ...) ... done
; compiling (DEFPROTO SQRT-LINK NIL ...) ... done
; compiling (DEFMETH SQRT-LINK :ETA ...) ... done
; compiling (DEFMETH SQRT-LINK :MEANS ...) ... done
; compiling (DEFMETH SQRT-LINK :DERIVS ...) ... done
; compiling (DEFPROTO POWER-LINK-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :ISNEW ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :POWER ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :PRINT ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :SAVE ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :ETA ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :MEANS ...) ... done
; compiling (DEFMETH POWER-LINK-PROTO :DERIVS ...) ... done
; compiling (DEFPROTO LOGIT-LINK NIL ...) ... done
; compiling (DEFMETH LOGIT-LINK :ETA ...) ... done
; compiling (DEFMETH LOGIT-LINK :MEANS ...) ... done
; compiling (DEFMETH LOGIT-LINK :DERIVS ...) ... done
; compiling (DEFPROTO PROBIT-LINK NIL ...) ... done
; compiling (DEFMETH PROBIT-LINK :ETA ...) ... done
; compiling (DEFMETH PROBIT-LINK :MEANS ...) ... done
; compiling (DEFMETH PROBIT-LINK :DERIVS ...) ... done
; compiling (DEFPROTO CLOGLOG-LINK NIL ...) ... done
; compiling (DEFMETH CLOGLOG-LINK :ETA ...) ... done
; compiling (DEFMETH CLOGLOG-LINK :MEANS ...) ... done
; compiling (DEFMETH CLOGLOG-LINK :DERIVS ...) ... done
; compiling (DEFPROTO GLIM-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH GLIM-PROTO :YVAR ...) ... done
; compiling (DEFMETH GLIM-PROTO :LINK ...) ... done
; compiling (DEFMETH GLIM-PROTO :OFFSET ...) ... done
; compiling (DEFMETH GLIM-PROTO :PWEIGHTS ...) ... done
; compiling (DEFMETH GLIM-PROTO :SCALE ...) ... done
; compiling (DEFMETH GLIM-PROTO :ESTIMATE-SCALE ...) ... done
; compiling (DEFMETH GLIM-PROTO :EPSILON ...) ... done
; compiling (DEFMETH GLIM-PROTO :EPSILON-DEV ...) ... done
; compiling (DEFMETH GLIM-PROTO :COUNT-LIMIT ...) ... done
; compiling (DEFMETH GLIM-PROTO :RECYCLE ...) ... done
; compiling (DEFMETH GLIM-PROTO :VERBOSE ...) ... done
; compiling (DEFMETH GLIM-PROTO :ETA ...) ... done
; compiling (DEFMETH GLIM-PROTO :SET-ETA ...) ... done
; compiling (DEFMETH GLIM-PROTO :DEVIANCES ...) ... done
; compiling (DEFMETH GLIM-PROTO :SET-DEVIANCES ...) ... done
; compiling (DEFMETH GLIM-PROTO :SAVE ...) ... done
; compiling (DEFMETH GLIM-PROTO :SIGMA-HAT ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-VALUES ...) ... done
; compiling (DEFMETH GLIM-PROTO :X ...) ... done
; compiling (DEFMETH GLIM-PROTO :RAW-RESIDUALS ...) ... done
; compiling (DEFMETH REGRESSION-MODEL-PROTO :RESIDUALS ...) ... done
; compiling (DEFMETH GLIM-PROTO :COMPUTE ...) ... done
; compiling (DEFMETH GLIM-PROTO :COMPUTE-STEP ...) ... done
; compiling (DEFMETH GLIM-PROTO :DEVIANCE ...) ... done
; compiling (DEFMETH GLIM-PROTO :MEAN-DEVIANCE ...) ... done
; compiling (DEFMETH GLIM-PROTO :INITIALIZE-SEARCH ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-MEANS ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-LINK-DERIVS ...) ... done
; compiling (DEFMETH GLIM-PROTO :DISPLAY ...) ... done
; compiling (DEFMETH GLIM-PROTO :INITIAL-MEANS ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-VARIANCES ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-DEVIANCES ...) ... done
; compiling (DEFMETH GLIM-PROTO :FIT-SCALE ...) ... done
; compiling (SEND GLIM-PROTO :SCALE ...) ... done
; compiling (SEND GLIM-PROTO :OFFSET ...) ... done
; compiling (SEND GLIM-PROTO :LINK ...) ... done
; compiling (SEND GLIM-PROTO :ESTIMATE-SCALE ...) ... done
; compiling (SEND GLIM-PROTO :EPSILON ...) ... done
; compiling (SEND GLIM-PROTO :EPSILON-DEV ...) ... done
; compiling (SEND GLIM-PROTO :COUNT-LIMIT ...) ... done
; compiling (SEND GLIM-PROTO :VERBOSE ...) ... done
; compiling (DEFMETH GLIM-PROTO :ISNEW ...) ... done
; compiling (DEFMETH GLIM-PROTO :CHI-RESIDUALS ...) ... done
; compiling (DEFMETH GLIM-PROTO :STANDARDIZED-CHI-RESIDUALS ...) ... done
; compiling (DEFMETH GLIM-PROTO :DEVIANCE-RESIDUALS ...) ... done
; compiling (DEFMETH GLIM-PROTO :STANDARDIZED-DEVIANCE-RESIDUALS ...) ... done
; compiling (DEFMETH GLIM-PROTO :G2-RESIDUALS ...) ... done
; compiling (DEFPROTO NORMALREG-PROTO NIL ...) ... done
; compiling (DEFUN NORMALREG-MODEL (X Y &REST ...) ...) ... done
; compiling (DEFPROTO POISSONREG-PROTO NIL ...) ... done
; compiling (DEFMETH POISSONREG-PROTO :INITIAL-MEANS ...) ... done
; compiling (DEFMETH POISSONREG-PROTO :FIT-VARIANCES ...) ... done
; compiling (DEFMETH POISSONREG-PROTO :FIT-DEVIANCES ...) ... done
; compiling (SEND POISSONREG-PROTO :ESTIMATE-SCALE ...) ... done
; compiling (SEND POISSONREG-PROTO :LINK ...) ... done
; compiling (DEFUN POISSONREG-MODEL (X Y &REST ...) ...) ... done
; compiling (DEFUN LOGLINREG-MODEL (X Y &REST ...) ...) ... done
; compiling (DEFPROTO BINOMIALREG-PROTO (QUOTE #) ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :TRIALS ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :FIT-MEANS ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :FIT-LINK-DERIVS ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :INITIALIZE-SEARCH ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :INITIAL-PROBS ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :INITIAL-MEANS ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :FIT-VARIANCES ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :FIT-DEVIANCES ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :FIT-PROBABILITIES ...) ... done
; compiling (DEFMETH BINOMIALREG-PROTO :ISNEW ...) ... done
; compiling (SEND BINOMIALREG-PROTO :ESTIMATE-SCALE ...) ... done
; compiling (SEND BINOMIALREG-PROTO :LINK ...) ... done
; compiling (DEFUN BINOMIALREG-MODEL (X Y N ...) ...) ... done
; compiling (DEFUN LOGITREG-MODEL (X Y N ...) ...) ... done
; compiling (DEFUN PROBITREG-MODEL (X Y N ...) ...) ... done
; compiling (DEFPROTO GAMMAREG-PROTO NIL ...) ... done
; compiling (DEFMETH GAMMAREG-PROTO :INITIAL-MEANS ...) ... done
; compiling (DEFMETH GAMMAREG-PROTO :FIT-VARIANCES ...) ... done
; compiling (DEFMETH GAMMAREG-PROTO :FIT-DEVIANCES ...) ... done
; compiling (SEND GAMMAREG-PROTO :LINK ...) ... done
; compiling (DEFUN GAMMAREG-MODEL (X Y &REST ...) ...) ... done
; compiling (DEFUN INDICATORS (X &KEY # ...) ...) ... done
; compiling (DEFUN CROSS-TERMS (X &REST ARGS) ...) ... done
; compiling (DEFUN LEVEL-NAMES (X &KEY # ...) ...) ... done
; compiling (DEFUN CROSS-NAMES (X &REST ARGS) ...) ... done
NIL
> rm -f xlisp.wks
echo '(save-workspace "xlisp") (exit)' | ./xlisp
XLISP-PLUS version 3.04
Portions Copyright (c) 1988, by David Betz.
Modified by Thomas Almy and others.
XLISP-STAT Release 3.52.20 (Beta).
Copyright (c) 1989-1999, by Luke Tierney.

; loading "init.lsp"
; loading "common.fsl"
; loading "common2.fsl"
; loading "common3.fsl"
; loading "pathname.fsl"
; loading loadfsl.fsl
; loading conditns.fsl
; loading shlib.fsl
; loading cmpload.fsl
; loading compiler/backquot.fsl
; loading compiler/cmpmacro.fsl
; loading compiler/convert.fsl
; loading compiler/cells.fsl
; loading compiler/simplify.fsl
; loading compiler/lift.fsl
; loading compiler/gencode.fsl
; loading compiler/peephole.fsl
; loading compiler/assemble.fsl
; loading compiler/cmpfront.fsl
; loading help.fsl
; loading objects.fsl
; loading menus.fsl
; loading dialogs.fsl
; loading linalg.fsl
; loading stats.fsl
; loading graphics.fsl
; loading graph2.fsl
; loading graph3.fsl
; loading regress.fsl
> cp oneway.fsl nonlin.fsl maximize.fsl bayes.fsl stepper.fsl glim.fsl Autoload
./setup.shell xlispstat /usr/lib/xlispstat
chmod a+x xlispstat
>>> Source compiled.
>>> Test phase [none]: dev-lisp/xlispstat-3.52.20

>>> Install xlispstat-3.52.20 into /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image/ category dev-lisp
make -j14 -j1 prefix=/var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr/ install 
mkdir -p /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//bin
mkdir -p /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat
mkdir /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Data
mkdir /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Examples
mkdir /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Autoload
cp xlispstat /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//bin/xlispstat
cp xlisp /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat
cp xlisp.wks /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat
cp xlisp.hlp /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat
cp Autoload/_autoidx.lsp Autoload/*.fsl /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Autoload
cp Data/*.lsp /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Data
cp Examples/*.lsp /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image//usr//lib/xlispstat/Examples
>>> Completed installing xlispstat-3.52.20 into /var/tmp/portage/dev-lisp/xlispstat-3.52.20/image/

strip: i686-pc-linux-gnu-strip --strip-unneeded -R .comment
   usr/lib/xlispstat/xlisp

 * QA Notice: Files built without respecting LDFLAGS have been detected
 *  Please include the following list of files in your report:
 * /usr/lib/xlispstat/xlisp


 * QA Notice: Package has poor programming practices which may compile
 *            fine but exhibit random runtime failures.
 * graphics.c:95:10: warning: incompatible implicit declaration of built-in function ‘sprintf’
 * graphics.c:220:8: warning: incompatible implicit declaration of built-in function ‘strlen’
 * graphics.c:223:9: warning: incompatible implicit declaration of built-in function ‘sprintf’

 * Please do not file a Gentoo bug and instead report the above QA
 * issues directly to the upstream developers of this software.
 * Homepage: http://www.stat.uiowa.edu/~luke/xls/xlsinfo/xlsinfo.html
 * Gentoo contact information ...
herds:
    common-lisp
maintainers: