[Ecls-list] Very strange problem loading cmp.fsl

[Juan Jose Garcia-Ripoll]

The error below has been hopefully solved. It was made of two problems:

1) When *read-suppress* was not nil, the package of a symbol might not
be ignored.

2) When loading a binary file, ECL creates a list of packages that
appear in interned constants and waits for the program to create them.
This list should be emptied after loading that file, but it was not
always so.

Both problems combined in the bug report that Dan sent. Sorry for the
big delay -- it was not easy to find out the real problem.

Juanjo

2007/1/27, Dan Corkill <corkill at gbbopen.org>:
> This bug has been around for a while (so it's not related to the recent
> sets of CVS changes), but until recently I didn't have time to whittle
> it down to a simple case.  It is a very strange bug, as it is triggered
> by conditional input lines that should be ignored by ECL!
>
> Here goes:
>
> $ ecl -norc
> ECL (Embeddable Common-Lisp) 0.9i
> Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
> Copyright (C) 1993 Giuseppe Attardi
> Copyright (C) 2000 Juan J. Garcia-Ripoll
> ECL is free software, and you are welcome to redistribute it
> under certain conditions; see file 'Copyright' for details.
> Type :h for Help.  Top level.
> > (load "ecl-cmp-bug.lsp")
> ;;; Loading "/home/cork/Desktop/ecl-cmp-bug.lsp"
> ;;; Loading #P"/usr/local/lib/ecl/cmp.fas"
> The value of *PACKAGE*, NIL, was not a package
>
> ;;;; -*- Mode:Common-Lisp; Package:CL-USER; Syntax:common-lisp -*-
> ;;;; *-* File: /home/cork/Desktop/ecl-cmp-bug.lsp *-*
> ;;;; *-* Edited-By: cork *-*
> ;;;; *-* Last-Edit: Sat Jan 20 09:06:29 2007 *-*
> ;;;; *-* Machine: ruby.corkills.org *-*
>
> (in-package :common-lisp-user)
>
> ;; If either of the following two conditional forms are deleted, cmp will
> ;; load fine!! (?!):
>
> #+cmu
> (c:backend-fasl-file-type c:*backend*)
>
> #+lispworks
> compiler:*fasl-extension-string*
>
> (load "SYS:cmp")
>

-- 
Facultad de Fisicas, Universidad Complutense,
Ciudad Universitaria s/n Madrid 28040 (Spain)
http://juanjose.garciaripoll.googlepages.com