[Gcl-devel] ANSI on Windows build failure.

[Mike Thomas]

Hi Camm.

I think I may be onto something.

In a message to James Amundsen a few minutes ago re this issue in relation
to Maxima, I looked at the cut and pasted error message and thought, "Hang
on, safety is zero, speed three".


So I reversed these values in the PCL code and look what happens:

===========================================================================
......
Finished compiling c:/cvs/stable/gcl-2.6.1.ansi/unixport/../pcl/pcl_boot.o.
 Loading binary of PCL_BOOT...

 Error: The function |SYSTEM:%SET-COMPILED-FUNCTION-NAME inline| is
undefined.
 Fast links are on: do (si::use-fast-links nil) for debugging
 Error signalled by SYSTEM:%SET-COMPILED-FUNCTION-NAME.
 Broken at SYSTEM:%SET-COMPILED-FUNCTION-NAME.  Type :H for Help.
 PCL>>
===========================================================================


Earlier on I get a bunch of warnings from pcl_pkg.lisp which implies that
this function is not actually being exported:



===========================================================================

Compiling PCL_PKG...
 Compiling c:/cvs/stable/gcl-2.6.1.ansi/unixport/../pcl/pcl_pkg.lisp.
 ; (EXPORT (INTERN # ...) ...) is being compiled.
 ;; Warning: The package operation (EXPORT (INTERN
                                            (SYMBOL-NAME :ITERATE)
                                            (FIND-PACKAGE :ITERATE))
                                           (FIND-PACKAGE :ITERATE)) was in a
bad place.
 ; (IN-PACKAGE :WALKER) is being compiled.
 ;; Warning: The package operation (IN-PACKAGE :WALKER) was in a bad place.
 ; (EXPORT '(DEFINE-WALKER-TEMPLATE WALK-FORM ...)) is being compiled.
 ;; Warning: The package operation (EXPORT '(DEFINE-WALKER-TEMPLATE
                                             WALK-FORM
                                             WALK-FORM-EXPAND-MACROS-P
                                             NESTED-WALK-FORM
                                             VARIABLE-LEXICAL-P
                                             VARIABLE-SPECIAL-P
                                             VARIABLE-GLOBALLY-SPECIAL-P
                                             *VARIABLE-DECLARATIONS*
                                             VARIABLE-DECLARATION
                                             MACROEXPAND-ALL)) was in a bad
place.
 ; (IN-PACKAGE :ITERATE) is being compiled.
 ;; Warning: The package operation (IN-PACKAGE :ITERATE) was in a bad place.
 ; (EXPORT '(ITERATE ITERATE* ...)) is being compiled.
 ;; Warning: The package operation (EXPORT '(ITERATE ITERATE* GATHERING
                                             GATHER WITH-GATHERING
                                             INTERVAL ELEMENTS
                                             LIST-ELEMENTS LIST-TAILS
                                             PLIST-ELEMENTS EACHTIME
                                             WHILE UNTIL COLLECTING
                                             JOINING MAXIMIZING
                                             MINIMIZING SUMMING
                                             *ITERATE-WARNINGS*)) was in a
bad place.
 ; (IN-PACKAGE :PCL) is being compiled.
 ;; Warning: The package operation (IN-PACKAGE :PCL) was in a bad place.
 ; (IMPORT '(STRUCTUREP STRUCTURE-DEF ...)) is being compiled.
 ;; Warning: The package operation (IMPORT '(STRUCTUREP STRUCTURE-DEF
                                             STRUCTURE-REF)) was in a bad
place.
 ; (SHADOW 'DOTIMES) is being compiled.
 ;; Warning: The package operation (SHADOW 'DOTIMES) was in a bad place.
 ; (IN-PACKAGE "SI") is being compiled.
 ;; Warning: The package operation (IN-PACKAGE "SI") was in a bad place.
 ; (EXPORT '(%STRUCTURE-NAME %COMPILED-FUNCTION-NAME ...)) is being
compiled.
 ;; Warning: The package operation (EXPORT '(%STRUCTURE-NAME
                                             %COMPILED-FUNCTION-NAME
                                             %SET-COMPILED-FUNCTION-NAME
                                             %INSTANCE-REF
                                             %SET-INSTANCE-REF)) was in a
bad place.
 ; (IN-PACKAGE 'PCL) is being compiled.
 ;; Warning: The package operation (IN-PACKAGE 'PCL) was in a bad place.
 ; (SHADOW 'DOCUMENTATION) is being compiled.
 ;; Warning: The package operation (SHADOW 'DOCUMENTATION) was in a bad
place.
 End of Pass 1.
 End of Pass 2.
 OPTIMIZE levels: Safety=3, Space=0, Speed=1
 Finished compiling c:/cvs/stable/gcl-2.6.1.ansi/unixport/../pcl/pcl_pkg.o.
===========================================================================



Any ideas about this missing function?  Do you get the same problem on
Linux?


Cheers

Mike Thomas.