Delivery and symbol names

Hi!

The test code below works fine at delivery level 1 but ceases to work
at level 2.  I get an error message which is obviously the result of
FIND-SYMBOL returning NIL.  I think I've read the relevant parts of
the Delivery User Guide and I thought the delivery keywords I'm using
should be enough to make FIND-SYMBOL happy but obviously that's not
the case.  What am I missing?

Thanks,
Edi.


  (defpackage :foo)

  (defun foo::foo () (capi:display-message "42~%"))

  (compile 'foo::foo)

  (defun bar ()
    (funcall (find-symbol "FOO" :foo)))

  (compile 'bar)

  (deliver 'bar "test"
           2
           :packages-to-keep '(:foo)
           :packages-to-keep-symbol-names '(:foo)
           :keep-symbol-names '(foo::foo)
           :interface :capi)

  (quit)

Re: Delivery and symbol names

Hello Edi,

| The test code below works fine at delivery level 1 but ceases to work
| at level 2.  I get an error message which is obviously the result of
| FIND-SYMBOL returning NIL.  I think I've read the relevant parts of
| the Delivery User Guide and I thought the delivery keywords I'm using
| should be enough to make FIND-SYMBOL happy but obviously that's not
| the case.  What am I missing?
| 
| Thanks,
| Edi.
| 
| 
|   (defpackage :foo)
| 
|   (defun foo::foo () (capi:display-message "42~%"))
| 
|   (compile 'foo::foo)
| 
|   (defun bar ()
|     (funcall (find-symbol "FOO" :foo)))
| 
|   (compile 'bar)
| 
|   (deliver 'bar "test"
|            2
|            :packages-to-keep '(:foo)
|            :packages-to-keep-symbol-names '(:foo)
|            :keep-symbol-names '(foo::foo)
|            :interface :capi)
| 
|   (quit)

Maybe :keep-package-manipulation is of value.
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru

Re: Delivery and symbol names

Edi Weitz <edi@agharta.de> writes:

> Hi!
> 
> The test code below works fine at delivery level 1 but ceases to work
> at level 2.  I get an error message which is obviously the result of
> FIND-SYMBOL returning NIL.  I think I've read the relevant parts of
> the Delivery User Guide and I thought the delivery keywords I'm using
> should be enough to make FIND-SYMBOL happy but obviously that's not
> the case.  What am I missing?

>   (deliver 'bar "test"
>            2
>            :packages-to-keep '(:foo)
>            :packages-to-keep-symbol-names '(:foo)
>            :keep-symbol-names '(foo::foo)
>            :interface :capi)
> 
Hi Edi,

 I think you are looking for :keep-symbols . It looks like 
 the symbol name for foo::foo is kept but then the symbol itself
 gets shaken out when delivering.

Cheers,
  Sean.

-- 
"My doctor says that I have a malformed public-duty gland and a
 natural  deficiency in moral fibre," he muttered to himself, "and
 that I am therefore excused from saving Universes."
 - Life, the Universe, and Everything     Douglas Adams.

Confidentiality Notice: http://ucs.co.za/conf.html