[hunchentoot-devel] Starting a server hangs

[Jonathon McKitrick]

On Mon, Dec 18, 2006 at 06:35:48PM +0100, Edi Weitz wrote:
: On Mon, 18 Dec 2006 17:14:59 +0000, Jonathon McKitrick <jcm at FreeBSD-uk.eu.org> wrote:
: 
: > I'm experimenting with hunchentoot with a view to porting my web
: > app.  I have 0.4.11 running on SBCL-1.0 and Ubuntu Linux.
: >
: > I have a default handler set up, and call:
: > (hunchentoot:start-server :port 8888)
: >
: > and it works fine.
: >
: > However, when I call the above function from inside the startup
: > sequence of the asdf system that loads the app, it hangs.
: >
: > What am I doing wrong here?
: 
: You should send real code so we can see what you're doing.  FWIW, I
: don't know what you mean with "from inside the startup sequence."

Well, it's difficult to simulate, but I'll try.  The last file loaded by asdf
does this:

(defun rlg-start ()
  "Entry point after loading via asdf/require."
  (db:connect-to-rlg)
  (ajax:rlg-web-start :port 9000))

(rlg-start)

------------------------

And another file has this:

(in-package :ajax)

(defparameter *rlg-server* nil)

(defun rlg-web-start (&key port)
  "Start the server, initialize dispatch table."
    (setf *dispatch-table*
        (list (create-static-file-dispatcher-and-handler "/index.html" #P
		"web/ah01/")
              'default-dispatcher))
    (format t "; --> Starting...~%")
    (setf *rlg-server* (hunchentoot:start-server :port 4242))
    (format t "; --> Ready!~%"))




Jonathon McKitrick
--
My other computer is your Windows box.