On 12 June 2012 09:42, CRLF0710 <crlf0...@gmail.com> wrote:
> I think you might want to try something like
> (asdf:make-build :hyde :type :program :epilogue-code '(funcall (intern "
MY-PKG-MAIN" 'cl-user)))
> and maybe there are some even better ways to do this.

Thanks for trying to solve this problem. Unfortunately, using funcall did
not work. I still get undefined function (but server-start is both defined
and exported in my package). Since my clumsy hack works, I will stick to
that until I find a better working solution. The reason I want to run the
init code in the cl-user package and not in my package is I do not want
user-level Lisp code to be able to access the internals (private functions)
of the server package. asdf:make-build does not seem to provide a simple
way to do it. Moreover another library using my package would want to have
full control on when to start the server, that is not necessarily on
package loading.

[ant@mira hyde]$ ./server
;;; Loading #P"/usr/lib/ecl-12.2.1/sockets.fas"

|start-server|
Condition of type: UNDEFINED-FUNCTION
The function |start-server| is undefined.

No restarts available.

Top level in: #<process TOP-LEVEL>.

PS: Wir müssen wissen; wir werden wissen! is Vogliamo sapere e sapremo! in
Italian
------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to