#60: compile-file and export problem --------------------+------------------------------------------------------- Reporter: rtoy | Owner: somebody Type: defect | Status: new Priority: major | Milestone: Component: Core | Version: 2012-05 Keywords: | --------------------+------------------------------------------------------- Put the following in a file and {{{compile-file}}}. This shouldn't cause any problems but it does. {{{ (defpackage fail (:use cl)) (in-package fail) (defvar *x* '^) (export *x*) }}}
#60: compile-file and export problem ---------------------+------------------------------------------------------ Reporter: rtoy | Owner: somebody Type: defect | Status: closed Priority: major | Milestone: Component: Core | Version: 2012-05 Resolution: fixed | Keywords: ---------------------+------------------------------------------------------ Changes (by toy.raymond@…):
* status: new => closed * resolution: => fixed
Comment:
commit 2970ca060d1c2677b00cec111d6e64d8c92ef42c Author: Raymond Toy toy.raymond@gmail.com Date: Mon May 28 09:11:46 2012 -0700
Fix ticket:60
src/compiler/main.lisp: o Remove special treatment of EXPORT (and others) in the compiler. I think we only need to treat IN-PACKAGE and DEFPACKAGE specially.
src/contrib/defsyste/defsystem.lisp: o Add FIND-SYSTEM to the defpackage export list for MAKE.
src/tools/hemcom.lisp: o Add defpackage for hemlock-internals since export no longer has the compile-time effect.
#60: compile-file and export problem ---------------------+------------------------------------------------------ Reporter: rtoy | Owner: somebody Type: defect | Status: closed Priority: major | Milestone: Component: Core | Version: 2012-05 Resolution: fixed | Keywords: ---------------------+------------------------------------------------------
Comment(by toy.raymond@…):
commit cdf11377fbdb369d3a3810dd9bd01a8a73007255 Author: Raymond Toy toy.raymond@gmail.com Date: Sat Dec 22 08:29:09 2012 -0800
Fix ticket:60.
This fixes the immediate issue, but there are still problems with very long strings. The bit-index for such strings won't fit in an (unsigned-byte 32).
vm-fndb.lisp: o Correct the defknown to have the correct arg types (vm::offset instead of index).
vm-tran.lisp: o Update deftransform to use vm::offset instead of index.
-
cmucl