defsystem 3.2i and Allegro's excl:*fasl-default-type*

[Bob R. <ro...@rg...>]

   I recently started using the excl:*fasl-default-type* feature of
Allegro Common Lisp, which lead me to notice that defsystem ignores it.
To fix this, one can change the line that reads

         #+excl                               ("cl"   . "fasl")

(line 501, interestingly) to something like

         #+excl                               ("cl" . ,excl:*fasl-default-type*)

I notice similar changes have been made for CMUCL and LispWorks.

   It is also possible to delete this line altogether so that the
catch-all case at the bottom kicks in:

	("lisp" . ,(pathname-type (compile-file-pathname "foo.lisp")))

The Allegro compile-file-pathname implementation uses
excl:*fasl-default-type*, so this has the same effect for the fasl type,
but winds up changing the nominal preferred Lisp source file type
incompatibly to "lisp" (which is my personal preference, though).

   Hope this is useful,

					-- Bob Rogers
					   ESS Technology, Inc.
					   http://rgrjr.dyndns.org/icancad/