Re: [Gcl-devel] Compiling GCL

[Faré]

On Thu, Oct 24, 2013 at 3:55 PM, Faré <address@hidden> wrote:
> Note that if I in the makefile I replace (reset-sys-paths ...) by
> (system::reset-sys-paths ...) I can complete the installation, though
> I notice it doesn't install the ANSI variant of GCL, so I did that
> manually.

Some bugs while compiling ASDF with the latest GCL from git master in ANSI mode:

(compile (defun foo (&key (x () xp)) (declare (ignorable xp)) (list x)))
;; Compiling /tmp/tunes/gazonk_29875_0.lsp.
; (DEFUN FOO) is being compiled.
;; Warning: Ignore/ignorable declaration was found for not bound variable XP.
;; Warning: The variable XP is not used.

>(compile (defun foo (&optional (x () xp)) (declare (ignorable xp)) (list x)))
;; Compiling /tmp/tunes/gazonk_29875_0.lsp.
; (DEFUN FOO) is being compiled.
;; Warning: Ignore/ignorable declaration was found for not bound variable XP.

Apparently, the present variables aren't visible in the declaration,
and that causes the ignorable declaration not to apply.
Yet in the &optional case there's no warning that variable XP wasn't used.

Later, the compilation aborts while compiling a defgeneric in an eval-when:

;;; gcl.lsp:
(eval-when (:compile-toplevel :load-toplevel :execute)
(defgeneric foo (a))

(compile-file "gcl.lsp")

;; Compiling /home/tunes/bug/gcl.lsp.

Error:
Fast links are on: do (si::use-fast-links nil) for debugging
Signalled by FUNCTION.
INTERNAL-SIMPLE-UNDEFINED-FUNCTION: Cell error on FOO: Undefined function:


GCL has changed significantly since 2.6.7, and in good ways,
but there doesn't seem to be any easy #+feature check to distinguish
the good-enough recent versions from the old ones.
Could you push something onto feature?
Maybe :gcl-2.7.0 or :gcl2.7.

Because ASDF fails to compile, I cannot run further tests.

I didn't try any branch but master. Tell me if I should.

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
Being really good at C++ is like being really good at using rocks
to sharpen sticks. — Thant Tessman